MACD日

{MACD日}

           {日: 12    44     9 }

 

DIFF : EMA(CLOSE,12) - EMA(CLOSE,44),COLORYELLOW;

DEA : EMA(DIFF,9),Colorgreen;

MACD : 2*(DIFF-DEA), COLORSTICK;

 

 

低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;

STICKLINE(低位金叉,0,-0.10,6,0),COLORYELLOW;

DRAWTEXT(低位金叉,-0.05,' 低位金叉'),COLORYELLOW;

JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));

二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;

STICKLINE(二次金叉,0,-0.10,6,0),ColorFF00FF;

DRAWICON(二次金叉,dea*1.04,13) ;

DRAWTEXT(二次金叉,-0.08,' 二次金叉'),ColorFF00FF;

 

三次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=3,72)=1;

DRAWTEXT(三次金叉,-0.13,' 三次金叉'),Colorred;

 

A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);

STICKLINE(底背离,0,0.13,6,0),Colorred;

DRAWTEXT(底背离,dea,' 底背离'),Colorred;

A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));

顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);

DRAWTEXT(顶背离,dea,' 顶背离'),Colorgreen;

a1:=DIFF<0 and DEA<0;

a2:=a1>REF(a1,1);

a3:=BARSLAST(a2);

a4:=COUNT(DEA>0 and DIFF>0,a3)=0;

a5:=CROSS(DIFF,DEA);{金叉}

a6:=BARSLAST(a5);

a7:=REF(a6,a6+1)+a6;

a8:=(DIFF+DEA)/2;

a9:=(HIGH+LOW)/2;

a10:=a5 and a7<a3 and a4 and a8>REF(a8,a7) and a9<REF(a9,a7) and macd>0;

DRAWTEXT(a10,diff*0.95,'★金叉介入'),COLORyellow;

 

{MACD根据条件划柱线}

STICKLINE(MACD<REF(MACD,1)and MACD>0,0,MACD,0.1,0 ),COLORYELLOW;

STICKLINE(MACD>=REF(MACD,1)and MACD>0,0,MACD,0.1 ,0 ),colorRed;

STICKLINE(MACD>REF(MACD,1)and MACD<0,0,MACD,0.1,0 ),COLORFF8080;

STICKLINE(MACD<=REF(MACD,1)and MACD<0,0,MACD,0.1,0 ),colorgreen;

 

DIFF30:MA("MACD.DIFF#MIN"(26,12,9),180),COLORred;

DEA30:MA("MACD.DEA#MIN"(26,12,9),180),COLORgreen;

DIFF60:MA("MACD.DIFF#MIN"(26,12,9),60);

DEA60:MA("MACD.DEA#MIN"(26,12,9),60);

 

Var5:=CROSS(DIFF,DEA),color0055CC;

DRAWTEXT(Var5,DEA,'B'),LINETHICK2,COLORRED;

Var6:=CROSS(DEA,DIFF),color0055CC;

DRAWTEXT(Var6, DEA *1.15,'S'),colorgreen;