同花顺macd底背离公式源码

DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
 DEA  : EMA(DIFF,M);
 MACD=2*(DIFF-DEA);
 Zero : 0;
 gj:=MAX(C,O);
 STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,2,0),color0000ff;
 STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,2,0),colorffff00;
 STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),colorff00ff;
 STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),color00ff00;
 L4:=LLV(gj,4);
 jl:=(HHV(diff,55)-LLV(diff,55))/5;
 gt:=dea>REF(dea,1) AND REF(dea,1)<REF(dea,2);
 A1:=BARSLAST(REF(gt,1));
 底背离:=REF(L4,A1+1)>CLOSE AND diff>REF(diff,A1+1) AND gt;
 DRAWLINE(A1=0,DEA,底背离,REF(DEA,A1),0),colorred,LINETHICK2;
 DRAWLINE(底背离,DEA,底背离,REF(DEA,A1),0),colorred,LINETHICK2;
 DRAWTEXT(底背离,REF(DEA,A1)*1.18,' 底背离'),COLORFF00FF;
 
H4:=HHV(gj,4);
 gt2:=dea<REF(dea,1) AND REF(dea,1)>REF(dea,2);
 A2:=BARSLAST(REF(gt2,1));
 顶背离:= REF(H4,A2+1)<H4 AND  diff<REF(diff,A2+1) AND gt2;
 DRAWLINE(A2=0  ,DEA,顶背离,REF(DEA,A2),0),colorgreen,LINETHICK2;
 DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),colorgreen,LINETHICK2;
 DRAWTEXT(顶背离,REF(DEA,A2)*1.18,' 顶背离'),colorgreen;