通达信分时MACD指标 有顶底背离

通达信分时MACD指标 有顶底背离

{分时MACD}
 ZRS:=CONST(DYNAINFO(3)),NODRAW;
 DIF1:3.5*(EMA(CLOSE,12)-EMA(CLOSE,26))+ZRS,COLORLIMAGENTA;
 DEA1:EMA(DIF1,9),COLORLIBLUE;
 MACD:=(DIF1-DEA1)*2+ZRS;
 {DRAWKLINE(H,O,L,C);}
 STICKLINE(DIF1>=DEA1,ZRS,MACD ,0,1),COLORRED;
 STICKLINE(DIF1<DEA1,ZRS,MACD ,0,1),COLORCYAN;
 C,COLORWHITE,LINETHICK2;
均价:SUM(V*C,0)/SUM(V,0),COLORGREEN,LINETHICK1;
 IF(均价<=REF(均价,1),均价,DRAWNULL),COLORGREEN,LINETHICK1;
 IF(均价>=REF(均价,1),均价,DRAWNULL),COLORYELLOW,LINETHICK1;
 DRAWTEXT(CURRBARSCOUNT=4,均价,'均'),COLORYELLOW,LINETHICK3;
 DRAWNUMBER(CURRBARSCOUNT=2,均价,均价),COLORYELLOW,LINETHICK3;
 DRAWTEXT_FIX(1,0.000,1-0.05,0,DYBLOCK),COLORWHITE;
 DRAWTEXT_FIX(1,0.0550,1-0.05,0,HYBLOCK),COLORYELLOW;
 DRAWTEXT_FIX(1,0.1050,1-0.05,0,GNBLOCK),COLORYELLOW; 

 A1:=BARSLAST(REF(CROSS(DIF1,DEA1),1));
背离:=REF(CLOSE,A1+1)>CLOSE AND DIF1>REF(DIF1,A1+1) AND CROSS(DIF1,DEA1);
 {STICKLINE(背离,DIF1,0.05,2,0),COLORWHITE;}
 DRAWTEXT(背离,DIF1-0.01,'背离'),COLORCYAN;