通达信大牛顶背离选股指标公式源码

通达信大牛顶背离选股指标公式源码

源码正文：

N1:=5;N2:=10{XG51};
LC:=REF(CLOSE,1){XG51};
A0:=(2*C+H+L)/4{XG51};
均线:=ma(A0,3)>REF(MA(A0,3),1){XG51};
安全线:2,COLORWHITE,POINTDOT,LINETHICK4{XG51};
A1:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*10{XG51};
K:MA(3*SMA(A1,6,1)-2*SMA(SMA(A1,5,1),5,1),3),LINETHICK1,COLORF00FF0{XG51};
D:MA(K,3),COLORFF0000,LINETHICK1{XG51};
J:3*K-2*D,LINETHICK1,COLORF00FF0{XG51};
DRAWBAND(K,RGB(155,50,50),D,RGB(0,100,50)){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};
DRAWTEXT(BT,3,'短牛'),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};
DRAWTEXT(TJ1,2,'中牛'),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};
DRAWTEXT(TJ2,1,'大牛'),COLOR00FFFF{XG51};
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1){XG51};
STICKLINE(ST,10,9,5,0),COLOR008800{XG51};
STICKLINE(ST,10,9,2,0),COLOR00AA00{XG51};
STICKLINE(ST,10,9,1,0),COLOR00CC00{XG51};
STICKLINE(ST,10,9,0.2,0),COLOR00FF00{XG51};
DRAWTEXT(ST,9,'卖'),COLOR00FF00{XG51};
difF:EMA(DCLOSE,12)-EMA(DCLOSE,26){XG51};
DEA:EMA(DIFF,9),COLORFFFF00{XG51};
A11:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A11+1)>CLOSE AND DIFF>REF(DIFF,A11+1) AND CROSS(DIFF,DEA){XG51};
DRAWTEXT(底背离,-0.6,'底背离'),COLORRED{XG51};
A22:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A22+1)<CLOSE AND REF(DIFF,A22+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWTEXT(顶背离,11,'顶背离'),COLORRED{X-G-5_1-C-N-{};