通达信底背离起爆未加密选股指标公式源码

源码正文：

difF:ema(CLOSE,12)-Ema(CLOSE,27){XG51};
DEA:EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA){XG51};
stICKLINE(MacD>=0,MACD,0,4,1),COLORF00FF0{XG51};
STICKLINE(MACD<0,MACD,0,4,1),COLORRED{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR00AAFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3.3,0 ),COLOR00BBFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR00CCFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.65,0 ),COLOR00ddfF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.1,0 ),COLOR00EEFF{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0.55,0 ),COLOR00FFFF{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4 ,0 ),COLOR0000AA{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3.3 ,0 ),COLOR0011BB{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),COLOR0022CC{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.65 ,0 ),COLOR0033DD{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.1 ,0 ),COLOR0044EE{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0.55 ,0 ),COLOR0055FF{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORAA00BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3.3 ,0 ),COLORBB11BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),COLORCC22BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.65,0 ),COLORDD33BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1,0 ),COLOREE44BB{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,0.55 ,0 ),COLORFF55BB{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLORFFAA00{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3.3 ,0 ),COLORFFBB11{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),COLORFFCC22{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.65 ,0 ),COLORFFDD33{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.1 ,0 ),COLORFFEE44{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0.55 ,0 ),COLORFFFF55{XG51};
IF(DIFF<0,DIFF,0),COLORWHITE,LINETHICK1{XG51};
IF(DIFF<0,0,DIFF),COLORBLUE,LINETHICK1{XG51};
IF(DIFF<DEA,DIFF,DEA),COLOR00FF00,LINETHICK1{XG51};
IF(DIFF>DEA,DEA,DEA),COLORRED,LINETHICK1{XG51};
低位金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低位金叉,0,-0.18,6,0),COLORBLUE{XG51};
DRAWTEXT(低位金叉,-0.3, '低位金叉'),COLORBLUE{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,-0.18,6,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*1.1,13) {XG51};
DRAWTEXT(二次金叉,-0.4, '二次金叉'),COLORFF00FF{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.13,6,0),COLOR00FF00{XG51};
DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(底背离,0.2, '底背离'),COLOR00FF00{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORCYAN,LINETHICK2{X!G=5~1!C!N!{};

源码正文：

A1:=ma(C,13);A2:=MA(C,77);A3:=MA(C,99){XG51};
B1:=MA(C,13);B2:=MA(C,77);B3:=MA(C,99){XG51};
C1:=MA(C,13);C2:=MA(C,77);C3:=MA(C,99){XG51};
D1:=MA(C,13);D2:=MA(C,77);D3:=MA(C,99){XG51};
E1:=MA(C,5);E2:=MA(C,10);E3:=MA(C,20){XG51};
MA1:IF(PERIOD=2,A1,IF(PERIOD=3,B1,IF(PERIOD=4,C1,IF(PERIOD=5,D1,E1)))){XG51};
MA2:IF(PERIOD=2,A2,IF(PERIOD=3,B2,IF(PERIOD=4,C2,IF(PERIOD=5,D2,E2)))){XG51};
MA3:IF(PERIOD=2,A3,IF(PERIOD=3,B3,IF(PERIOD=4,C3,IF(PERIOD=5,D3,E3)))){XG51};
MA4:MA(C,60), COLOR0088FF{XG51};
拉升放量:=vol>=REF(MA(VOL,5),1)*2 AND C/REF(C,1)>1.03,LINETHICK0,COLORCYAN{XG51};
stICKLINE(拉升放量,OPEN,CLOSE,8,0),COLORBLUE{XG51};
高量柱:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01,COLORBLUE, LINETHICK0{XG51};
K1:=SUMBARS(高量柱,1){XG51};
STICKLINE(K1,REF(C,K1-1),REF(C,K1-1),10,0),COLORFF00FF{XG51};
STICKLINE(高量柱,OPEN,CLOSE,8,0),COLORBLUE{XG51};
A:=IF(HHV(V,20)=V,H,0){XG51};
PL:=BArslAST(A){XG51};
J:="kdj.J"{XG51};
AA:=crOSS(J,0){XG51};
SEL1:=FILTER(REF(J,1)>75 AND J<REF(J,1),3){XG51};
B:=SEL1{XG51};
STICKLINE(A,C,O,8,0),COLORLIMAGENTA{XG51};
STICKLINE(B,OPEN,CLOSE,6,0),COLORYELLOW{X-G+5_1-C-N-{};