小白龙（通达信公式 主图 源码 测试图）

 小白龙

上轨:EMA(H,55),COLORGREEN;

下轨:EMA(L,55),COLORGREEN;

A1:=PLOYLINE(C>上轨,上轨);

NOTEXT_A2:IF(C>上轨,A1,DRAWNULL),COLORRED;

B1:=PLOYLINE(C>下轨,下轨);

NOTEXT_B2:IF(C>下轨,B1,DRAWNULL),COLORRED;

DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100;DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2;

{神龙抄底13号}

CDYH:=DIF/C<-下偏离值 && DIF/C<0;

抄底一号:=MACD>REF(MACD,1) && DIF<REF(DIF,1)*1.01 && CDYH,COLORWHITE;

底一号:=抄底一号 AND REF(抄底一号,1)=0,COLORWHITE;

DRAWTEXT(底一号,L*0.99,'←偏离'),COLORMAGENTA;

JJCC:=CROSS(DIF,DEA);

X0ZHH:=BARSLAST(CROSS(0,DIF))+1;

SCCTS:=BARSLAST(CROSS(DEA,DIF))+1,NODRAW;

DIFZDZ1:=LLV(DIF,SCCTS),NODRAW;

GJJZDZ:=LLV(L,SCCTS),NODRAW;

DIFZDZ2:=LLV(DIF,X0ZHH),NODRAW;

DIFWS0ZZ:=HHV(DIF,SCCTS)<-0.08;

LGLJXX:=REF(MACD,1)<0 && REF(MACD,2)<0;

BLLL:=LGLJXX && DIFWS0ZZ && (DIFZDZ1>=REF(DIFZDZ1,SCCTS) || DIFZDZ1>=REF(DIFZDZ2,SCCTS)) && GJJZDZ<=REF(GJJZDZ,SCCTS);

三号:=JJCC && DIF<0 && BLLL,COLORMAGENTA;

DRAWTEXT(三号,L*0.99,'←背离'),COLORMAGENTA;

{神龙逃顶13号}

CCDD1:=DIF/C>上偏离值 && DIF/C>0;

逃顶一号:=MACD<REF(MACD,1) && DIF>REF(DIF,1) && CCDD1,COLORWHITE;

顶一号:=逃顶一号 AND REF(逃顶一号,1)=0,COLORWHITE;

DRAWTEXT(顶一号,H*1.0,'←偏离'),COLORGREEN;

JJC:=CROSS(DEA,DIF);

X0ZHHL:=BARSLAST(CROSS(DIF,0))+1;

SCCTSS:=BARSLAST(CROSS(DIF,DEA))+1,NODRAW;

DIFZDZ11:=HHV(DIF,SCCTSS),NODRAW;

GJJZDZZ:=HHV(H,SCCTSS),NODRAW;

{DIFZDZ2:=HHV(DIF,X0ZHH),NODRAW;}

DIFWS0ZZZ:=HHV(DIF,SCCTSS)>0.08;

LGLJXXX:=REF(MACD,1)>0 && REF(MACD,2)>0;

BLLLL:=LGLJXXX && DIFWS0ZZZ && (DIFZDZ11<=REF(DIFZDZ11,SCCTSS) {|| DIFZDZ11<=REF(DIFZDZ2,SCCTSS)}) && GJJZDZZ>=REF(GJJZDZZ,SCCTSS);

顶三号:=JJC && DIF>0 && BLLLL,COLORMAGENTA;

DRAWTEXT(顶三号,H*1.0,'←背离'),COLORGREEN;

202039124525787.png

p202039124833808.jpg