{MACD-背变}

{设置缺省值：short:9,M:12,long:26}

DRAWTEXTREL(10,5,'正面负面：'+BKNAME),COLORwhite;

DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),COLORgreen;  
DEA : EMA(DIFF,M),COLORyellow;  
MACD : 2*(DIFF-DEA), COLORSTICK,COLOR5454FF;  
DD:=C=HHV(C,180);  
EE:=DEA< REF(DEA,1) AND REF(DEA< REF(DEA,1),1)=1;  
CC:=C> REF(C,1) AND REF(C> REF(C,1),1)=1;  
上升背离:(CC AND EE)*DEA,COLOR00FFFF;  
顶背离:(DD AND EE AND DEA< HHV(DEA,180))*DEA,STICK,LINETHICK3,COLORGREEN;  
FF:=C=LLV(C,180);  
GG:= DEA> REF(DEA,1) AND REF(DEA> REF(DEA,1),1)=1;  
LL:=C< REF(C,1) AND REF(C< REF(C,1),1)=1;  
下降背离:(LL AND GG)*DEA,COLORMAGENTA;  
底背离:(FF AND GG AND DEA> LLV(DEA,180))*DEA,STICK,LINETHICK3,COLORRED;  
MM:=IF(MACD< 0,MACD,0);  
JJ:=MM> REF(MM,1);  
ZZ:=REF(JJ,1)=1;  
介入区:(JJ AND ZZ)*DEA,POINTDOT,COLORRED;
STICKLINE(介入区=DEA,DEA,DIFF,3,0),COLORRED;
DRAWTEXT(CROSS(DIFF,DEA ),0,'金叉'),ColorFFFFFF;
DRAWTEXT(CROSS(DEA,DIFF ),0,'死叉'),COLORGREEN;

PARTLINE(DIFF,DIFF>(REF(DIFF,1)+0.008),RGB(255,0,0)){,COLORMAGENTA},LINETHICK2;
PARTLINE(DEA,DIFF<=(REF(DIFF,1)+0.008){长期线<=REF(长期线,1)},RGB(50,100,100)){,COLORFFFF00,LINETHICK2};

FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);
FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1;
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
FH4:=FH1 AND FH2 AND ABS((DIFF-DEA)/C)<0.018;
FH5:=FH1 AND FH2 AND MACD<0.10;

DRAWTEXT(FH3 OR FH4 OR FH5,DIFF,'★'),COLORred;