同花顺背离金叉副图源码

顶底背离发生金叉时为重要买卖点

DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
 DEA : EMA(DIFF,9);
 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;
 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;