下偏离值:=6.4;
上偏离值:=5.4;
上轨: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;
DRAWTEXT_FIX(1,0,0.95,0,'公众号:指标公式源码'),COLORMAGENTA;
抄底一号:=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;
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;