同花顺顶底背离公式

源码

DIFF:EMA(CLOSE,5) - EMA(CLOSE,34),COLORFF00FF;

DEA:EMA(DIFF,5),colorliblue;

MACD:=2*(DIFF-DEA);

ZERO:0,colorliblue;

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;

DRAWLINE(顶背离,DEA,顶背离,REF(DEA,A2),0),colorgreen;

DRAWTEXT(顶背离,REF(DEA,A2)*1.18,' 顶背离'),colorgreen;

A0:=DIFF<0 AND DEA<0;

A11:=A0>REF(A0,1);

A3:=BARSLAST(A11);

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;

DRAWICON(CROSS(DIFF,DEA),DEA,1);

DRAWICON(CROSS(DEA,DIFF),DIFF,2);