笔参数:=2;
段参数:=3;
DIF:EMA(CLOSE,12)-EMA(CLOSE,26)COLORRED,LINETHICK2;
DEA:EMA(DIF,9);
IF(DIF<DEA,DIF,DRAWNULL),COLORC0C0C0,LINETHICK2;
MACD:(DIF-DEA)*2,COLORSTICK;
笔低A:=LOW<=LLV(LOW,笔参数),NODRAW;
笔高A:=HIGH>=HHV(HIGH,笔参数),NODRAW;
笔低:=笔低A AND 笔高A=0,NODRAW;
笔高:=笔高A AND 笔低A=0,NODRAW;
上笔:=DRAWLINE(笔低,LOW,笔高,HIGH,0)COLOR0000FF;
下笔:=DRAWLINE(笔高,HIGH,笔低,LOW,0),COLOR00FF00;
拐下:=上笔>REF(上笔,1) AND 下笔>REFX(下笔,1),NODRAW;
拐上:=下笔<REF(下笔,1) AND 上笔<REFX(上笔,1),NODRAW;
段低A:=LOW<=LLV(LOW,段参数*笔参数),NODRAW;
段高A:=HIGH>=HHV(HIGH,段参数*笔参数),NODRAW;
段低:=段低A AND 段高A=0,NODRAW;
段高:=段高A AND 段低A=0,NODRAW;
上段:=DRAWLINE(段低,LOW,段高,HIGH,0),LINETHICK2,COLORMAGENTA;
DRAWTEXT_FIX(1,0,0.95,0,'公众号:指标公式源码'),COLORMAGENTA;
下段:=DRAWLINE(段高,HIGH,段低,LOW,0),LINETHICK2,COLORFF8000;
特殊底:=下段=上段 AND 段低 AND MACD<0,NODRAW;
TTT:=REF(BARSLAST(特殊底),1)+1;
底背离1:=特殊底 AND LOW<REF(LOW,TTT) AND DIF>REF(DIF,TTT) AND LLV(DIF,BARSLASTCOUNT(MACD<0))>REF(DIF,TTT),NODRAW;
底背左点1:=BACKSET(底背离1,TTT+1) AND REF(BACKSET(底背离1,TTT+1),1)=0 AND 特殊底;
DRAWLINE(底背左点1,DIF,底背离1,DIF,0),COLORFF00FF,LINETHICK2;
底背离2:=特殊底 AND LOW<REF(LOW,TTT) AND MACD>REF(MACD,TTT) AND LLV(MACD,BARSLASTCOUNT(MACD<0))>REF(MACD,TTT),NODRAW;
底背左点2:=BACKSET(底背离2,TTT+1) AND REF(BACKSET(底背离2,TTT+1),1)=0 AND 特殊底;
DRAWLINE(底背左点2,MACD,底背离2,MACD,0),COLORFF00FF,LINETHICK1;
特殊顶:=下段=上段 AND 段高 AND MACD>0,NODRAW;
TTTG:=REF(BARSLAST(特殊顶),1)+1;
顶背离1:=特殊顶 AND HIGH>REF(HIGH,TTTG) AND DIF<REF(DIF,TTTG) AND HHV(DIF,BARSLASTCOUNT(MACD>0))<REF(DIF,TTTG),NODRAW;
顶背左点1:=BACKSET(顶背离1,TTTG+1) AND REF(BACKSET(顶背离1,TTTG+1),1)=0 AND 特殊顶;
DRAWLINE(顶背左点1,DIF,顶背离1,DIF,0),COLORGREEN,LINETHICK2;
顶背离2:=特殊顶 AND HIGH>REF(HIGH,TTTG) AND MACD<REF(MACD,TTTG) AND HHV(MACD,BARSLASTCOUNT(MACD>0))<REF(MACD,TTTG),NODRAW;
顶背左点2:=BACKSET(顶背离2,TTTG+1) AND REF(BACKSET(顶背离2,TTTG+1),1)=0 AND 特殊顶;
DRAWLINE(顶背左点2,MACD,顶背离2,MACD,0),COLORGREEN,LINETHICK1;
DRAWTEXT(底背离2=1,MACD,' 柱背离'),COLORFF00FF;
DRAWTEXT(底背离1=1,DIF,' 线背离'),COLORFF00FF;
DRAWTEXT(顶背离2=1,MACD,' 柱背离'),COLORGREEN;
DRAWTEXT(顶背离1=1,DIF,' 线背离'),COLORGREEN;
DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORGREEN;
DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORRED;
XA_2:=BARSLAST(REF(MACD,1)<0 AND MACD>0);
XA_3:=LLVBARS(MACD,XA_2+20);
XA_4:=IF(XA_3>XA_2,REF(MACD,XA_3),0);
XA_5:=MACD<0 AND MACD>XA_4 AND LOW=LLV(LOW,XA_2+20) AND XA_4<0;
柱背离1:=(REF(XA_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,XA_3)<0 AND MACD<0),NODRAW;
DRAWLINE(XA_4=XA_3,MACD,柱背离1,MACD,0),COLORRED,LINETHICK1;
DRAWICON(柱背离1,0,26);
柱背离A:BARSLAST(柱背离1>0)+1,COLORFF8000,NODRAW;
柱背离:BARSLAST(底背离2>0)+1,COLORMAGENTA,NODRAW;
线背离:BARSLAST(底背离1>0)+1,COLORWHITE,NODRAW;
飞吻:REF(DIF,1)<REF(DIF,2) AND REF(MACD,1)<REF(MACD,2) AND REF(DIF,1)-REF(DEA,1)>0 AND REF(DIF,1)<DIF AND REF(DIF,1)-REF(DEA,1)<0.03 AND REF(MACD,1)<MACD,COLOR4080FF,NODRAW;
DRAWTEXT(飞吻,DIF,'飞吻'),COLOR4080FF;