MACD三背离
文件包括：1个副图， 2个选股 公式
{MACD三背离}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2,NODRAW;
MACD2:=2*(DIF-DEA);
STICKLINE(MACD2>=0 AND MACD2>REF(MACD2,1),0,MACD2,1.2,0),COLOR0000A5;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,1.2,0),COLORAA7800;
STICKLINE(MACD2<0 AND MACD2<REF(MACD2,1),0,MACD2,1.2,0),COLOR00A500;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,1.2,0),COLORA500A5;
DIF1:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA1:EMA(DIF1,9);
MACD1:(DIF1-DEA1)*2,NODRAW;
JCCOUNT:=COUNT(CROSS(DIF1,DEA1),BARSLAST(DEA1>=0));
二次金叉:=CROSS(DIF1,DEA1) AND DEA1<0 AND COUNT(JCCOUNT=2,21)=1;
DRAWTEXT(二次金叉,DEA1*1.25,'零下二金'),COLORWHITE;
A1:=BARSLAST(REF(CROSS(DIF1,DEA1),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF1>REF(DIF1,A1+1) AND CROSS(DIF1,DEA1);
DRAWTEXT(底背离,DIF1*0.5,'日底背'),COLORRED;
A2:=BARSLAST(REF(CROSS(DEA1,DIF1),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF1,A2+1)>DIF1 AND CROSS(DEA1,DIF1);
DRAWTEXT(顶背离,DIF1*1.12,'日顶背'),COLORGREEN;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
K:=SMA(RSV,9,3),NODRAW;
D:=SMA(K,9,3),NODRAW;
J:=3*K-2*D,NODRAW;
M_K金共:=CROSS(DIF1,DEA1) AND CROSS(K,D) AND CROSS(J,D);
DRAWTEXT(M_K金共,DEA1*1.12,'金叉共振'),COLORYELLOW;
MACD高:=HHV(MACD1,5);
C1:=BARSLAST(REF(CROSS(DEA1,DIF1),1));
E:=REF(C,C1+1)>C AND DEA1>0 AND REF(MACD高,C1+1)<MACD高 AND CROSS(DEA1,DIF1) ;
DRAWTEXT(E>0,-0.5,'柱顶背'),COLORCYAN;
F:=REF(C,A1+1)>C AND DEA1<0 AND REF(MACD高,A1+1)<MACD高 AND CROSS(DIF1,DEA1);
DRAWTEXT(F>0,0.5,'柱底背'),COLORLIRED;
JC:= DEA1-DIF1;
绿柱面积:=IF(MACD1<0,SUM(MACD1,BARSLAST(JC<0)),0);
红柱面积:=IF(MACD1>0,SUM(MACD1,BARSLAST(JC>0)),0);
本次最低价:=LLV(L,BARSLAST(JC<0));
本次最高价:=HHV(H,BARSLAST(JC>0));
X1:=IF (MACD1<0,BARSLAST(CROSS(DIF1,DEA1)),0);
前次绿柱面积:=REF(绿柱面积,X1+1);
前次最低价:=REF(本次最低价,X1+1);
Y1:=IF((绿柱面积<0 AND ABS(绿柱面积)<ABS(前次绿柱面积) AND 本次最低价<前次最低价 ),1,0);
RS1:= MACD1<0 AND REF(MACD1,1)<0 AND C<前次最低价
AND ABS(绿柱面积)<ABS(前次绿柱面积) AND ABS(MACD1)<ABS(REF(MACD1,1));
底背驰:= IF (CROSS(DIF1,DEA1),REF(Y1,1),0);
DRAWTEXT(底背驰,DEA1*0.8,'积底背'),COLORFF80FF;
X2:=IF (MACD1>0,BARSLAST(CROSS(DEA1,DIF1)),0);
前次红柱面积:=REF(红柱面积,X2+1);
前次最高价:=REF(本次最高价,X2+1);
Y2:=IF((红柱面积>0 AND 红柱面积<前次红柱面积 AND 本次最高价>前次最高价 ),1,0);
RS2:= MACD1>0 AND REF(MACD1,1)>0 AND C>前次最高价 AND ABS(红柱面积)<ABS(前次红柱面积) AND ABS(MACD1)<ABS(REF(MACD1,1));
顶背驰:= IF (CROSS(DEA1,DIF1),REF(Y2,1),0);
DRAWTEXT(顶背驰,DEA1*0.8,'积顶背'),COLORCYAN;
DIF2:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA2:=EMA(DIF2,9);
MACD3:=(DIF2-DEA2)*2;
A3:=BARSLAST(REF(CROSS(DIF2,DEA2),1));
底背离2:=REF(CLOSE,A3+1)>CLOSE AND DIF2>REF(DIF2,A3+1) AND CROSS(DIF2,DEA2);
MACD高2:=HHV(MACD3,5);
F2:=REF(C,A3+1)>C AND DEA2<0 AND REF(MACD高2,A3+1)<MACD高2 AND CROSS(DIF2,DEA2);
柱底背:=F2>0;
JC2:= DEA2-DIF2;
绿柱面积2:=IF(MACD3<0,SUM(MACD3,BARSLAST(JC2<0)),0);
红柱面积2:=IF(MACD3>0,SUM(MACD3,BARSLAST(JC2>0)),0);
本次最低价2:=LLV(L,BARSLAST(JC2<0));
本次最高价2:=HHV(H,BARSLAST(JC2>0));
X3:=IF (MACD3<0,BARSLAST(CROSS(DIF2,DEA2)),0);
前次绿柱面积2:=REF(绿柱面积2,X3+1);
前次最低价2:=REF(本次最低价2,X3+1);
Y3:=IF((绿柱面积2<0 AND ABS(绿柱面积2)<ABS(前次绿柱面积2) AND 本次最低价2<前次最低价2 ),1,0);
RS3:= MACD3<0 AND REF(MACD3,1)<0 AND C<前次最低价2
AND ABS(绿柱面积2)<ABS(前次绿柱面积2) AND ABS(MACD3)<ABS(REF(MACD3,1));
积底背:= IF (CROSS(DIF2,DEA2),REF(Y3,1),0);
AA1:=底背离2 AND 柱底背;
AA2:=底背离2 AND 积底背;
AA3:=柱底背 AND 积底背;
XG:AA1 OR AA2 OR AA3;
DIF3:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA3:=EMA(DIF3,9);
MACD4:=(DIF3-DEA3)*2;
A4:=BARSLAST(REF(CROSS(DIF3,DEA3),1));
底背离3:=REF(CLOSE,A4+1)>CLOSE AND DIF3>REF(DIF3,A4+1) AND CROSS(DIF3,DEA3);
MACD高3:=HHV(MACD4,5);
F3:=REF(C,A4+1)>C AND DEA3<0 AND REF(MACD高3,A4+1)<MACD高3 AND CROSS(DIF3,DEA3);
柱底背3:=F3>0;
JC3:= DEA3-DIF3;
绿柱面积3:=IF(MACD4<0,SUM(MACD4,BARSLAST(JC3<0)),0);
红柱面积3:=IF(MACD4>0,SUM(MACD4,BARSLAST(JC3>0)),0);
本次最低价3:=LLV(L,BARSLAST(JC3<0));
本次最高价3:=HHV(H,BARSLAST(JC3>0));
X4:=IF (MACD4<0,BARSLAST(CROSS(DIF3,DEA3)),0);
前次绿柱面积3:=REF(绿柱面积3,X4+1);
前次最低价3:=REF(本次最低价3,X4+1);
Y4:=IF((绿柱面积3<0 AND ABS(绿柱面积3)<ABS(前次绿柱面积3) AND 本次最低价3<前次最低价3 ),1,0);
RS4:= MACD4<0 AND REF(MACD4,1)<0 AND C<前次最低价3
AND ABS(绿柱面积3)<ABS(前次绿柱面积3) AND ABS(MACD4)<ABS(REF(MACD4,1));
积底背3:= IF (CROSS(DIF3,DEA3),REF(Y4,1),0);
三背离:底背离3 AND 柱底背3 AND 积底背3;
