通达信超准持仓空仓选股指标公式源码

通达信超准持仓空仓选股指标公式源码

源码正文：

买线:=ema(C,2){XG51};
卖线:=Ema(SLOPE(C,21)*20+C,42){XG51};
stICKLINE(买线>=卖线,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR001050{XG51};
STICKLINE(买线<卖线,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR404050{XG51};
DRAWKLINE(H,O,L,C){XG51};
指导:=EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2){XG51};
界:=MA(CLOSE,27){XG51};
B买:IF(crOSS(指导,界) OR CROSS(买线,卖线),C,DRAWNULL),COLORLIMAGENTA,NODRAW{XG51};
持仓:IF(买线>=卖线,C,DRAWNULL),COLORWHITE,NODRAW{XG51};
S卖:IF(CROSS(界,指导) OR CROSS(卖线,买线),C,DRAWNULL),COLORBLACK,NODRAW{XG51};
空仓:IF(买线<卖线,C,DRAWNULL),COLORCYAN,NODRAW{XG51};
DRAWICON(CROSS(买线,卖线),L,1){XG51};
DRAWICON(CROSS(卖线,买线),H,2){XG51};
N1:=5;N2:=10{XG51};
STICKLINE(C>0,0,10,15,0),COLORBLacK{XG51};
LC:=REF(CLOSE,1){XG51};
VAR1:=C-REF(C,1){XG51};
VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(Abs(VAR1),6),6){XG51};
MA5:=EMA(C,5){XG51};
MA13:=EMA(C,13){XG51};
UP:=DRAWLINE(L=LLV(L,BArslAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF{XG51};
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00{XG51};
BT:(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1){XG51};
0,COLORFF00FF{XG51};
10,COLORFF0000{XG51};
STICKLINE(UP,0,0.2,3,0),COLOR0000FF{XG51};
STICKLINE(DOWN,0,0.2,3,0),COLOR00FF00{XG51};
STICKLINE(BT,0,3,2,0),COLOR000088{XG51};
STICKLINE(BT,0,3,1,0),COLOR0000CC{XG51};
STICKLINE(BT,0,3,0.22,0),COLOR0000FF{XG51};
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82{XG51};
STICKLINE(TJ1,0,2,3,0),COLOR880088{XG51};
STICKLINE(TJ1,0,2,1.5,0),COLORAA00AA{XG51};
STICKLINE(TJ1,0,2,0.8,0),COLORCC00CC{XG51};
STICKLINE(TJ1,0,2,0.2,0),COLORFF00FF{XG51};
HR:=HHV(HIGH,55){XG51};
HRY:=LLV(LOW,55){XG51};
HRY11:=HR*HRY{XG51};
HRY33:=SQRT(HRY11){XG51};
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33{XG51};
STICKLINE(TJ2,0,1,5,0),COLOR008888{XG51};
STICKLINE(TJ2,0,1,2,0),COLOR00AAAA{XG51};
STICKLINE(TJ2,0,1,1,0),COLOR00CCCC{XG51};
STICKLINE(TJ2,0,1,0.2,0),COLOR00FFFF{XG51};
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1){XG51};
STICKLINE(ST,10,9.8,5,0),COLOR008800{XG51};
STICKLINE(ST,10,9.8,2,0),COLOR00AA00{XG51};
STICKLINE(ST,10,9.8,1,0),COLOR00CC00{XG51};
STICKLINE(ST,10,9.8,0.2,0),COLOR00FF00{XG51};
K:=(C+H+L)/3{XG51};
D:=MA(K,4){XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)){XG51};
FILTER(买,5) AND REF(C,1)<D AND C>D AND D<REF(D,1),COLORLIMAGENTA{X=G+5~1=C=N={};