MACD背离全项

DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK2;
金叉:=CROSS(DIFF,DEA);
DRAWICON(金叉,DEA-0.02,1);
死叉:=CROSS(DEA,DIFF);
DRAWICON(死叉,DEA+0.02,2);
低位金叉:=金叉 AND DIFF<-0.1;
STICKLINE(低位金叉,0,0.08,6,0),COLORYELLOW;
DRAWTEXT(低位金叉,0.16,' 低位金叉'),COLORWHITE;
JCCOUNT:=COUNT(金叉,BARSLAST(DEA>=0));
二次金叉:=金叉 AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;
DRAWICON(二次金叉,DEA*0.9,1) ;
DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORYELLOW;
A1:=BARSLAST(REF(金叉,1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND 金叉 AND DEA<0;
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;
底背:DRAWLINE(A1=0,REF(DIFF,3),底背离,REF(DIFF,3),0),COLORRED,LINETHICK1;
DRAWTEXT(底背离,REF(DIFF,3)-0.01,' 底背离'),COLORFF00FF;
A2:=BARSLAST(REF(死叉,1));
顶背离:=REF(CLOSE,A2+1)DIFF AND 死叉 AND DEA>0;
顶背:DRAWLINE(A2=0,REF(DIFF,3),顶背离,REF(DIFF,3),0),COLORGREEN,LINETHICK1;
DRAWTEXT(顶背离,REF(DIFF,3)+0.01,' 顶背离'),COLOR40FF00;
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;
JC := DEA-DIFF;
绿柱面积:=IF(MACD<0,SUM(MACD,BARSLAST(JC<0)),0);
红柱面积:=IF(MACD>0,SUM(MACD,BARSLAST(JC>0)),0);
本次最低价:=LLV(L,BARSLAST(JC<0));
本次最高价:=HHV(H,BARSLAST(JC>0));
X1:=IF (MACD<0,BARSLAST(CROSS(DIFF,DEA)),0);
前次绿柱面积:=REF(绿柱面积,X1+1);
前次最低价:=REF(本次最低价,X1+1);
Y1:=IF((绿柱面积<0 AND ABS(绿柱面积)
AND 本次最低价<前次最低价 ),1,0);
RS1:= MACD<0 AND REF(MACD,1)<0 AND C<前次最低价
AND ABS(绿柱面积)
面积底背驰:= IF (CROSS(DIFF,DEA),REF(Y1,1),0);
DRAWTEXT(面积底背驰,-0.2,'面积底背离'),COLOR0000FF;
STICKLINE(面积底背驰,0,-0.2,4,0),COLOR0000FF;
DRAWICON(面积底背驰,0,23),COLORYELLOW;
X2:=IF (MACD>0,BARSLAST(CROSS(DEA,DIFF)),0);
前次红柱面积:=REF(红柱面积,X2+1);
前次最高价:=REF(本次最高价,X2+1);
Y2:=IF((红柱面积>0 AND 红柱面积<前次红柱面积 AND 本次最高价>前次最高价 ),1,0);
RS2:= MACD>0 AND REF(MACD,1)>0 AND C>前次最高价 AND ABS(红柱面积)
面积顶背驰:= IF (CROSS(DEA,DIFF),REF(Y2,1),0);
DRAWICON(面积顶背驰,0,19),COLOR00FF00;
STICKLINE(面积顶背驰,0,0.2,4,0),COLOR00FF00;
DRAWTEXT(面积顶背驰,0.2,'面积顶背离'),COLOR40FF00;
绿柱变短:=REF(MACD,1)<0 AND REF(MACD,1)REF(MACD,1) AND MACD<0 AND DEA<0;
红柱变短:=REF(MACD,1)>0 AND REF(MACD,1)>REF(MACD,2) AND MACD0 AND DEA>0;
C1:=BARSLAST(REF(绿柱变短,1));
柱线底背:=REF(CLOSE,C1+1)>CLOSE AND MACD>REF(MACD,C1+1) AND 绿柱变短;
STICKLINE(柱线底背,0,-0.03,6,0),COLOR0000FF;
柱线底背离:DRAWLINE(C1=0,REF(MACD,1),柱线底背,REF(MACD,1),0),COLORRED,LINETHICK1;
DRAWTEXT(柱线底背,REF(MACD,1),' 柱线底背离'),COLORFF00FF;
C2:=BARSLAST(REF(红柱变短,1));
柱线顶背:=REF(CLOSE,C2+1)
STICKLINE(柱线顶背,0,0.03,6,0),COLOR40FF00;
柱线顶背离:DRAWLINE(C2=0,REF(MACD,1),柱线顶背,REF(MACD,1),0),COLOR40FF00,LINETHICK1;
DRAWTEXT(柱线顶背,REF(MACD,1),' 柱线顶背离'),COLOR80FF00;

3主图叠加KDJ均线变色公式

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
A1:=J>=100;
A2:=J<=0;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
B1:=RSI1>=80;
B2:=RSI<=20;
PSY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
C1:=PSY>=75;
C2:=PSY<=25;
MA5:MA(CLOSE,5)COLORWHITE;
IF(A1,MA5,DRAWNULL),COLORGREEN,LINETHICK3;
IF(A2,MA5,DRAWNULL),COLORRED,LINETHICK3;
MA10:MA(CLOSE,10)COLORYELLOW;
IF(B1,MA10,DRAWNULL),COLORGREEN,LINETHICK3;
IF(B2,MA10,DRAWNULL),COLORRED,LINETHICK3;
MA20:MA(CLOSE,20)COLORGREEN;
MA30:MA(CLOSE,30)COLORMAGENTA;
IF(C1,MA30,DRAWNULL),COLORGREEN,LINETHICK3;
IF(C2,MA30,DRAWNULL),COLORRED,LINETHICK3;
MA60:MA(CLOSE,60)COLORBROWN;
MA120:MA(CLOSE,120)COLORLIBLUE;
MA250:MA(CLOSE,250)COLORRED;

MACD背离2DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK2;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,0,0.08,6,0),COLORYELLOW;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;
DRAWICON(二次金叉,DEA*0.9,1);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;
底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK4;
DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)DIFF AND CROSS(DEA,DIFF);
顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK4;
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;
死叉:=CROSS(DEA,DIFF) AND DIFF>0.1;
STICKLINE(死叉,0,0.08,6,0),COLORGREEN;
DRAWICON(死叉,DEA*0.9,2);

MACD 多周期多头共振选股
一，15分钟，60分钟，日线MACD共振 DIF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA := EMA(DIF,9);
MACD:=2*(DIF-DEA);
DIF60:='MACD.DIF#MIN60'(12,26,9);
DIF15:='MACD.DIF#MIN15'(12,26,9);
DEA60:='MACD.DEA#MIN60'(12,26,9);
DEA15:='MACD.DEA#MIN15'(12,26,9);
选股:CROSS(DIF,DEA) AND CROSS(DIF60,DEA60) AND CROSS(DIF15,DEA15);
二，60分钟，日线，周线MACD共振
DIF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA := EMA(DIF,9);
MACD:=2*(DIF-DEA);
DIF5:='MACD.DIF#week'(12,26,9);
DEA5:='MACD.DEA#week'(12,26,9);
DIF60:='MACD.DIF#MIN60'(12,26,9);
DEA60:='MACD.DEA#MIN60'(12,26,9);
选股:CROSS(DIF,DEA) AND CROSS(DIF60,DEA60) AND CROSS(DIF5,DEA5);
三，月线，周线，日线MACD共振
DIF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA := EMA(DIF,9);
MACD:=2*(DIF-DEA);
DIF周:='MACD.DIF#week'(12,26,9);
DEA周:='MACD.DEA#week'(12,26,9);
DIF月:='MACD.DIF#month'(12,26,9);
DEA月:='MACD.DEA#month'(12,26,9);