通达信MACD风云未加密选股指标公式源码

源码正文：

N:=12;N1:=26;M:=9{XG51};
difF:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIFF,9){XG51};
macd:2*(DIFF-DEA),NODRAW{XG51};
连续走强:BArslAstCOUNT(MacD>REF(MACD,1) AND MACD>0),NODRAW,COLOR0030FF,{XG51};
强势回调:BARSLASTCOUNT(MACD<REF(MACD,1) AND MACD>0),NODRAW,COLOR0030FF,{XG51};
连续走弱:BARSLASTCOUNT(MACD<REF(MACD,1) AND MACD<0),NODRAW,COLOR00FF30,;{XG51};
连续反弹:BARSLASTCOUNT(MACD>REF(MACD,1) AND MACD<0),NODRAW,COLOR00FF30,;{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),COLORYELLOW,LINETHICK1{XG51};
低位金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低位金叉,0,-0.10,3,0),COLORBLUE{XG51};
DRAWTEXT(低位金叉,-0.05,' 低位金叉'),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.10,3,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*1.04,13) {XG51};
DRAWTEXT(二次金叉,-0.08,' 二次金叉'),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,3,0),COLORWHITE{XG51};
DRAWTEXT(底背离,DEA,' 底背离'),COLORWHITE{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};
DRAWTEXT(顶背离,DEA,' 顶背离'),COLORCYAN{XG51};
A11:=DIFF<0 AND DEA<0{XG51};
A22:=A11>REF(A11,1){XG51};
A3:=BARSLAST(A22){XG51};
A4:=COUNT(DEA>0 AND DIFF>0,A3)=0{XG51};
A5:=CROSS(DIFF,DEA){XG51};
A6:=BARSLAST(A5){XG51};
A7:=REF(A6,A6+1)+A6{XG51};
A8:=(DIFF+DEA)/2{XG51};
A9:=(HIGH+LOW)/2{XG51};
A110:=A5 AND A7<A3 AND A4 AND A8>REF(A8,A7) AND A9<REF(A9,A7) AND MACD>0{XG51};
DRAWTEXT(A110,DIFF*0.95,'★金叉介入'),COLORBLUE{X-G-5_1-C-N-{};

源码正文：

CC:=IF(WEEkdAY=4,C,1){XG51};
B1:=ema(CLOSE,11){XG51};
B2:=Ema(CLOSE,21){XG51};
B3:=EMA(CLOSE,15){XG51};
A2:stICKLINE(CC=1 AND B1>=B2,REF(B3,BArslAST(CC!=1)),REF(B3,BARSLAST(CC!=1)),2,0),COLORWHITE{XG51};
A4:DRAWICON(CC!=1 AND B1<B2,L,9){X?G?5?1?C?N?{};