[通达信指标]十四款背离合集 MACD KD RSI DMI CCI各种背离(纯源码提供) 1 MACD背离指标
MCD1:EMA(C,12)-EMA(C,26),COLORRED;
MCD2:EMA(MCD1,9),COLORWHITE;
MCD3:(MCD1-MCD2)*2,COLORSTICK;
STICKLINE(((MCD3< REF(MCD3,1)) AND (MCD3>0)),0,MCD3,1,0),COLORLIBLUE;
STICKLINE(((MCD3>REF(MCD3,1)) AND (MCD3< 0)),0,MCD3,1,0),COLORFF00FF;
IF(MCD1< 0,MCD1,0),COLORYELLOW;
IF(MCD1< 0,0,MCD1),COLORRED;
IF(MCD1< MCD2,MCD1,MCD2),COLORWHITE;
IF(MCD1>MCD2,MCD2,MCD2),COLORFF937F;
MCD4:=COUNT(CROSS(MCD1,MCD2),BARSLAST(MCD2>=0));
MCD5:=CROSS(MCD1,MCD2) AND MCD2< 0 AND COUNT(MCD4=2,21)=1;
DRAWTEXT(MCD5,0.2,' 二次金叉'),COLORYELLOW;
MCD6:=BARSLAST(REF(CROSS(MCD1,MCD2),1));
MCD7:=REF(C,MCD6+1)>C AND MCD1>REF(MCD1,MCD6+1) AND CROSS(MCD1,MCD2);
STICKLINE(MCD7,0,0.03,6,0),COLOR00FF00;
MCD8:DRAWLINE(MCD6=0,MCD2,MCD7,MCD2,0),COLORRED;
DRAWTEXT(MCD7,0.12,' 底背离'),COLORFF00FF;
MCD9:=BARSLAST(REF(CROSS(MCD2,MCD1),1));
MCD10:=REF(C,MCD9+1)< C AND REF(MCD1,MCD9+1)>MCD1 AND CROSS(MCD2,MCD1);
MCD11:DRAWLINE(MCD9=0,MCD2,MCD10,MCD2,0),COLORGREEN;
2 KDJ背离指标
KDBL1:=9;
KDBL2:=3;
KDBL3:=3;
KDBL4:=(CLOSE-LLV(LOW,KDBL1))/(HHV(HIGH,KDBL1)-LLV(LOW,KDBL1))*100;
KDBL5:SMA(KDBL4,KDBL2,1);
KDBL6:SMA(KDBL5,KDBL3,1);
KDBL7:3*KDBL5-2*KDBL6;
KDBL8:=CROSS(KDBL5,KDBL6) AND KDBL6< 20;
STICKLINE(KDBL8,KDBL6,KDBL6+8,5,0),COLORYELLOW;
KDBL9:=COUNT(CROSS(KDBL5,KDBL6),BARSLAST(KDBL5>=KDBL6));
KDBL10:=CROSS(KDBL5,KDBL6) AND KDBL6< 20 AND COUNT(KDBL9=2,34)=1;
STICKLINE(KDBL10,KDBL6,KDBL6+5,5,0),COLORFF80FF;
DRAWICON(KDBL10,KDBL6*0.85,1) ;
KDBL11:=BARSLAST(REF(CROSS(KDBL5,KDBL6),1));
KDBL12:=REF(CLOSE,KDBL11+1)>CLOSE AND KDBL5>REF(KDBL5,KDBL11+1) AND CROSS(KDBL5,KDBL6);
STICKLINE(KDBL12,KDBL6,KDBL6+5,5,0),COLORRED;
DRAWLINE(KDBL11=0,KDBL6,KDBL12,KDBL6,0),COLORRED,LINETHICK2;
DRAWTEXT(KDBL12>0,KDBL7,'D底背离'),COLORRED;
KDBL13:=BARSLAST(REF(CROSS(KDBL6,KDBL5),1));
KDBL14:=REF(CLOSE,KDBL13+1)< CLOSE AND REF(KDBL6,KDBL13+1)>KDBL6 AND CROSS(KDBL6,KDBL5);
DRAWLINE(KDBL13=0,KDBL6,KDBL14,KDBL6,0),COLORGREEN,LINETHICK2;
DRAWTEXT(KDBL14>0,KDBL5+2,'D顶背离'),COLORGREEN;
3 KDJ优化背离指标
LOWV:=EMA(LLV(LOW,34),3);
HIGHV:=EMA(HHV(HIGH,34),3);
RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,3);
K:=SMA(RSV,8,1);
D:=SMA(K,6,1);
J:3*K-2*D;
J1:MA(J,3);
A1:=BARSLAST(REF(CROSS(J,J1),1));
AA:=REF(CLOSE,A1+1)>CLOSE AND J>REF(J,A1+1) AND CROSS(J,J1) AND J< 20;
STICKLINE(AA,0,25,3,0),COLORMAGENTA;
DRAWTEXT(AA>0,30,'底背离');
A2:=BARSLAST(REF(CROSS(J1,J),1));
BB:=REF(CLOSE,A2+1)< CLOSE AND REF(J1,A2+1)>J1 AND CROSS(J1,J) AND J>90;
DRAWTEXT(BB>0,75,'顶背离');
STICKLINE(BB,100,80,3,0),COLORGREEN;
100;
50;
0;
4 RSI背离指标
LC :=REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
A12022:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
R底背离:=REF(C,A12022+1)>C AND RSI1>REF(RSI1,A12022+1) AND CROSS(RSI1,RSI2);
DRAWTEXT(R底背离,RSI2,' 底背离'),COLORYELLOW;
A22022:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
R顶背离:=REF(C,A22022+1)< C AND REF(RSI1,A22022+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(R顶背离,RSI2,'顶背离'),COLORGREEN;
DD2022:=CROSS(RSI2,RSI1);
DRAWICON(DD2022,RSI1,1);
KK2022:=CROSS(RSI1,RSI2);
DRAWICON(KK2022,RSI1,2);
DRAWLINE(A12022=0,RSI2,R底背离,RSI2,0),COLORRED;
DRAWLINE(A22022=0,RSI2,R顶背离,RSI2,0),COLORGREEN;
5 CCI背离指标
CIBL1:=14;
CIBL2:=(HIGH+LOW+CLOSE)/3;
CIBL3:(CIBL2-MA(CIBL2,CIBL1))/(0.015*AVEDEV(CIBL2,CIBL1));
CIBL4:=CIBL3;
CIBL5:=REF(CIBL4,CIBL1)=HHV(CIBL4,2*CIBL1+1);
CIBL6:=BACKSET(CIBL5,CIBL1+1);
CIBL7:=FILTER(CIBL6,CIBL1) AND CIBL4=HHV(CIBL4,CIBL1+1);
CIBL8:=BARSLAST(REF(CIBL7,1));
CIBL9:=REF(CLOSE,CIBL8+1)< CLOSE AND REF(CIBL4,CIBL8+1)>CIBL4 AND CIBL7;
DRAWICON(CIBL9,CIBL3*0.9,1);
CIBL10:=BACKSET(CIBL9,REF(BARSLAST(CIBL7),1)+2);
DRAWLINE(CROSS(CIBL10,0.5),CIBL4,CROSS(FILTER(CIBL9>0,5),0.5),CIBL4,0),COLORGREEN,LINETHICK2;
CIBL11:=REF(CIBL4,CIBL1)=LLV(CIBL4,2*CIBL1+1);
CIBL12:=BACKSET(CIBL11,CIBL1+1);
CIBL13:=FILTER(CIBL12,CIBL1) AND CIBL4=LLV(CIBL4,CIBL1+1);
CIBL14:=BARSLAST(REF(CIBL13,1));
CIBL15:=REF(CLOSE,CIBL14+1)>CLOSE AND REF(CIBL4,CIBL14+1)< CIBL4 AND CIBL13;
CIBL16:=BACKSET(CIBL15,REF(BARSLAST(CIBL13),1)+2);
DRAWLINE(CROSS(CIBL16,0.5),CIBL4,CROSS(FILTER(CIBL15>0,5),0.5),CIBL4,0),COLORMAGENTA,LINETHICK2;
DRAWICON(CIBL15,-130,2);
IF(CIBL3>=100,CIBL3,DRAWNULL),COLORGREEN;
IF(CIBL3<=-100,CIBL3,DRAWNULL),COLORRED;
6 三指标组合背离
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,8);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)< DIFF AND CROSS(DIFF,DEA);
DRAWTEXT(IF(B1>0,1,0),L,'MACD底背'),COLORGREEN;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)< K AND CROSS(K,D);
DRAWTEXT(IF(B2>0,1,0),L*0.999,'KDJ底背'),COLORYELLOW;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)< RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L*0.998,'RSI底背'),COLORCYAN;
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)< C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(IF(D1>0,1,0),H,'MACD顶背'),COLORWHITE;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)< C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT(IF(D2>0,1,0),H*1.001,'KDJ顶背'),COLORWHITE;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)< C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H*1.002,'RSI顶背'),COLORMAGENTA;
7 四指标组合背离
ZHBL1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
ZHBL2:=SMA(ZHBL1,3,1);
ZHBL3:=SMA(ZHBL2,3,1);
ZHBL4:=3*ZHBL2-2*ZHBL3;
ZHBL5:=REF(C,1);
ZHBL6:=SMA(MAX(C-ZHBL5,0),6,1)/SMA(ABS(C-ZHBL5),6,1)*100;
ZHBL7:=SMA(MAX(C-ZHBL5,0),12,1)/SMA(ABS(C-ZHBL5),12,1)*100;
ZHBL8:=SMA(MAX(C-ZHBL5,0),24,1)/SMA(ABS(C-ZHBL5),24,1)*100;
ZHBL9:ZHBL6-ZHBL8, COLORSTICK,LINETHICK0;
ZHBL10:=BARSLAST(REF(CROSS(ZHBL2,ZHBL3),1));
ZHBL11:=REF(C,ZHBL10+1)>C AND REF(ZHBL2,ZHBL10+1)< ZHBL2 AND CROSS(ZHBL2,ZHBL3);
ZHBL12:=BARSLAST(REF(CROSS(ZHBL6,ZHBL7),1));
ZHBL13:=REF(C,ZHBL12+1)>C AND REF(ZHBL6,ZHBL12+1)< ZHBL6 AND CROSS(ZHBL6,ZHBL7);
ZHBL14:=BARSLAST(REF(CROSS(ZHBL3,ZHBL2),1));
ZHBL15:=REF(C,ZHBL14+1)< C AND REF(ZHBL2,ZHBL14+1)>ZHBL2 AND CROSS(ZHBL3,ZHBL2);
ZHBL16:=BARSLAST(REF(CROSS(ZHBL7,ZHBL6),1));
ZHBL17:=REF(C,ZHBL16+1)< C AND REF(ZHBL6,ZHBL16+1)>ZHBL6 AND CROSS(ZHBL7,ZHBL6);
ZHBL18:IF(ZHBL11>0,1,0),COLORRED,POINTDOT;
ZHBL19:IF(ZHBL13>0,1,0),COLORYELLOW,POINTDOT;
ZHBL20:IF(ZHBL15>0,1,0),COLORBLUE,POINTDOT;
ZHBL21:IF(ZHBL17>0,1,0),COLORGREEN,POINTDOT;
ZHBL22:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORYELLOW;
ZHBL23:=EMA(ZHBL22,9),COLORCYAN;
ZHBL24:=2*(ZHBL22-ZHBL23),COLORSTICK;
ZHBL25:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
ZHBL26:=HIGH-REF(HIGH,1);
ZHBL27:=REF(LOW,1)-LOW;
ZHBL28:=SUM(IF(ZHBL26>0 AND ZHBL26>ZHBL27,ZHBL26,0),14);
ZHBL29:=SUM(IF(ZHBL27>0 AND ZHBL27>ZHBL26,ZHBL27,0),14);
ZHBL30:=ZHBL28*100/ZHBL25;
ZHBL31:=ZHBL29*100/ZHBL25;
ZHBL32:=BARSLAST(REF(CROSS(ZHBL22,ZHBL23),1));
ZHBL33:=REF(CLOSE,ZHBL32+1)>CLOSE && REF(ZHBL22,ZHBL32+1)< ZHBL22 && CROSS(ZHBL22,ZHBL23);
ZHBL34:=BARSLAST(REF(CROSS(ZHBL23,ZHBL22),1));
ZHBL35:=REF(CLOSE,ZHBL34+1)< CLOSE && REF(ZHBL22,ZHBL34+1)>ZHBL22 && CROSS(ZHBL23,ZHBL22);
ZHBL36:=BARSLAST(REF(CROSS(ZHBL31,ZHBL30),1));
ZHBL37:=REF(C,C+1)< C AND REF(ZHBL31,ZHBL36+1)>ZHBL31 AND CROSS(ZHBL31,ZHBL30);
ZHBL38:=BARSLAST(REF(CROSS(ZHBL30,ZHBL31),1));
ZHBL39:=REF(C,ZHBL38+1)>C AND REF(ZHBL30,ZHBL38+1)< ZHBL30 AND CROSS(ZHBL30,ZHBL31);
ZHBL40:IF(ZHBL33>0,1,0),COLORRED,NODRAW;
ZHBL41:IF(ZHBL39>0,1,0),NODRAW;
ZHBL42:IF(ZHBL35>0,1,0),COLOR00FF00,NODRAW;
ZHBL43:IF(ZHBL37>0,1,0),COLORRED,NODRAW;
DRAWTEXT(ZHBL40,ZHBL9,'M低'),COLORRED;
DRAWTEXT(ZHBL18,ZHBL9,'K低'),COLORFF00FF;
DRAWTEXT(ZHBL19,ZHBL9,'R低'),COLORYELLOW;
DRAWTEXT(ZHBL41,ZHBL9,'D低'),COLORRED;
DRAWTEXT(ZHBL42,ZHBL9,'M顶'),COLOR00FF00;
DRAWTEXT(ZHBL20,ZHBL9,'K顶'),COLORFFCC66;
DRAWTEXT(ZHBL21,ZHBL9,'R顶'),COLORWHITE;
DRAWTEXT(ZHBL43,ZHBL9,'D顶'),COLORMAGENTA;
STICKLINE(ZHBL11>0 ,-25,0,5,0),COLORRED;
STICKLINE(ZHBL13>0 ,-25,0,5,0),COLORYELLOW;
STICKLINE(ZHBL15>0 ,25,0,5,0),COLORBLUE;
STICKLINE(ZHBL17>0,25,0,5,0),COLORGREEN;
8 MACD新高低背离
M:=20;
DIFF:EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :EMA(DIFF,9),COLORGREEN;
MACD:2*(DIFF-DEA), COLORSTICK;
AA2000:=CLOSE>REF(HHV(HIGH,M),1) AND MACD< REF(HHV(MACD,M),1) ;
BB2000:=CLOSE< REF(LLV(LOW,M),1) AND MACD>REF(LLV(MACD,M),1) ;
DRAWTEXT(AA2000,MACD,'▲顶背离'),COLORYELLOW;
DRAWTEXT(BB2000,MACD,'▼低背离'),COLORGREEN;
9 MACD均线背离
DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORWHITE;
DEA:EMA(DIF,9),COLORYELLOW;
MACD:(DIF-DEA)*2,COLORSTICK;
A1:=BARSLAST(REF(CROSS(DEA,DIF),1));
A2:=BARSLAST(REF(CROSS(DIF,DEA),1));
DD2022:=HHV(MA(C,2),9)>REF(HHV(MA(C,2),9),A1) AND HHV(DIF,5)< REF(HHV(DIF,5),A1) AND CROSS(DEA,DIF);
KK2022:=LLV(MA(C,2),9)< REF(LLV(MA(C,2),9),A2) AND LLV(DIF,5)>REF(LLV(DIF,5),A2) AND CROSS(DIF,DEA);
DRAWTEXT(DD2022,DEA+0.1,'顶背离'),COLORGREEN ;
DRAWTEXT(KK2022,DEA-0.1,'底背离'),COLORYELLOW;
DRAWICON(CROSS(DEA,DIF),DEA,5);
DRAWICON(CROSS(DIF,DEA),DEA,4);
10 MACD结构背离
JGBL1:100*(EMA(CLOSE,12)-EMA(CLOSE,26));
JGBL2:EMA(JGBL1,9);
JGBL3:(JGBL1-JGBL2)*2,COLORSTICK;
JGBL4:=CROSS(JGBL2,JGBL1);
JGBL5:=BARSLAST(JGBL4),NODRAW;
JGBL6:=REF(BARSLAST(JGBL4),JGBL5+1),NODRAW;
JGBL7:=REF(BARSLAST(JGBL4),JGBL6+JGBL5+2),NODRAW;
JGBL8:=LLV(C,JGBL5+1),NODRAW;
JGBL9:=LLV(JGBL1,JGBL5+1),NODRAW;
JGBL10:=REF(JGBL8,JGBL5+1),NODRAW;
JGBL11:=REF(JGBL9,JGBL5+1),NODRAW;
JGBL12:=REF(JGBL10,JGBL5+1),NODRAW;
JGBL13:=REF(JGBL11,JGBL5+1),NODRAW;
JGBL14:=IF(JGBL11>0,INTPART(LOG(JGBL11))-1,INTPART(LOG(-(JGBL11)))-1);
JGBL15:=INTPART(JGBL11/POW(10,JGBL14));
JGBL16:=IF(JGBL13>0,INTPART(LOG(JGBL13))-1,INTPART(LOG(-(JGBL13)))-1);
JGBL17:=INTPART(JGBL13/POW(10,JGBL16));
JGBL18:=INTPART(JGBL1/POW(10,JGBL14));
JGBL19:=INTPART(JGBL1/POW(10,JGBL16));
JGBL20:=(JGBL8< JGBL10 ) AND (JGBL18>JGBL15) AND (JGBL3< 0 AND REF(JGBL3,1)< 0) AND JGBL18<=REF(JGBL18,1);
JGBL21:=(JGBL8< JGBL12 AND JGBL12< JGBL10 ) AND (JGBL19>JGBL17) AND (JGBL3< 0 AND REF(JGBL3,1)< 0) AND JGBL19<=REF(JGBL19,1);
JGBL22:JGBL20 OR JGBL21,NODRAW;
JGBL23:((JGBL18>REF(JGBL18,1))*REF(JGBL20,1)) OR ((JGBL19>REF(JGBL19,1))*REF(JGBL21,1)),NODRAW;
JGBL24:=(REF(JGBL20,1) AND JGBL9<=JGBL11 ) OR (REF(JGBL21,1) AND JGBL9<=JGBL13);
JGBL25:=BARSLAST(JGBL3>0);
DRAWTEXT(COUNT(JGBL22,JGBL25)=1 AND NOT(REF(COUNT(JGBL22,JGBL25)=1 ,1)),(JGBL1+JGBL3),'钝化'),COLORRED;
STICKLINE(JGBL22 OR JGBL23,JGBL1,JGBL2,1,0),COLORRED;
JGBL26:=BARSLAST(JGBL22);
DRAWTEXT(JGBL24,(JGBL3),'消失'),COLORYELLOW;
JGBL27:=BARSLAST(JGBL3>0);
DRAWTEXT(COUNT(JGBL23,JGBL27)=1 AND NOT(REF(COUNT(JGBL23,JGBL27)=1,1)),JGBL1*1.1,'结构形成'),COLORMAGENTA;
JGBL28:=CROSS(JGBL1,JGBL2);
JGBL29:=BARSLAST(JGBL28),NODRAW;
JGBL30:=REF(BARSLAST(JGBL28),JGBL29+1),NODRAW;
JGBL31:=REF(BARSLAST(JGBL28),JGBL30+JGBL29+2),NODRAW;
JGBL32:=HHV(C,JGBL29+1),NODRAW;
JGBL33:=HHV(JGBL1,JGBL29+1),NODRAW;
JGBL34:=REF(JGBL32,JGBL29+1),NODRAW;
JGBL35:=REF(JGBL33,JGBL29+1),NODRAW;
JGBL36:=REF(JGBL34,JGBL29+1),NODRAW;
JGBL37:=REF(JGBL35,JGBL29+1),NODRAW;
JGBL38:=IF(JGBL35>0,INTPART(LOG(JGBL35))-1,INTPART(LOG(-(JGBL35)))-1);
JGBL39:=INTPART(JGBL35/POW(10,JGBL38));
JGBL40:=IF(JGBL37>0,INTPART(LOG(JGBL37))-1,INTPART(LOG(-(JGBL37)))-1);
JGBL41:=INTPART(JGBL37/POW(10,JGBL40));
JGBL42:=INTPART(JGBL1/POW(10,JGBL38));
JGBL43:=INTPART(JGBL1/POW(10,JGBL40));
JGBL44:=(JGBL32>JGBL34 ) AND (JGBL42< JGBL39) AND (JGBL3>0 AND REF(JGBL3,1)>0) AND JGBL42>=REF(JGBL42,1);
JGBL45:=(JGBL32>JGBL36 AND JGBL36>JGBL34 ) AND (JGBL43< JGBL41) AND (JGBL3>0 AND REF(JGBL3,1)>0) AND JGBL43>=REF(JGBL43,1);
JGBL46:JGBL44 OR JGBL45,NODRAW;
JGBL47:((JGBL42< REF(JGBL42,1))*REF(JGBL44,1)) OR ((JGBL43< REF(JGBL43,1))*REF(JGBL45,1)),NODRAW;
JGBL48:=(REF(JGBL44,1) AND JGBL33>=JGBL35 ) OR (REF(JGBL45,1) AND JGBL33>=JGBL37);
JGBL49:=BARSLAST(JGBL3< 0);
DRAWTEXT(COUNT(JGBL46,JGBL49)=1 AND REF(COUNT(JGBL46,JGBL49),1)< 1,(JGBL1+JGBL3),'钝化'),COLORGREEN;
JGBL50:=BARSLAST(JGBL46);
DRAWTEXT(JGBL48,(JGBL3),'消失'),COLORYELLOW;
STICKLINE(JGBL46 OR JGBL47,JGBL1,JGBL2,1,0),COLORGREEN;
DRAWTEXT(COUNT(JGBL47,JGBL49)=1 AND REF(COUNT(JGBL47,JGBL49),1)< 1,JGBL1*1.02,'结构形成'),COLORMAGENTA;
JGBL51:JGBL44 OR JGBL45,NODRAW,COLORGREEN;
JGBL52:JGBL20 OR JGBL21,NODRAW,COLORYELLOW;
DRAWTEXT(JGBL51,0,'顶背'),COLORGREEN;
DRAWTEXT(JGBL52,0,'底背'),COLORGREEN;
11 特殊MACD背离
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26),COLORBFFF10;
DEA : EMA(DIFF,9);
IF(DIFF>DEA AND DIFF< 0,DIFF,DRAWNULL),COLORBFA4D9,LINETHICK2;
IF(DIFF>DEA AND DIFF>0,DIFF,DRAWNULL),COLORRED,LINETHICK2;
IF(DEA< 0,DEA,DRAWNULL),COLORBLUE,LINETHICK2;
MACD : 2*(DIFF-DEA), COLORSTICK;
MA1:=REF(MACD,1),POINTDOT,COLORGRAY;
STICKLINE(DEA>0 AND MACD< MA1 AND MACD>=0,0,MACD,1,1),COLORBFA4D9;
STICKLINE(DEA< 0 AND MACD>=MA1 AND MACD< 0,0,MACD,1,1),COLORBFFF10;
MN:=BARSLAST(CROSS(DEA,0))+1;
SN:=BARSLAST(CROSS(DIFF,DEA))+1;
数:=COUNT(CROSS(DEA,DIFF) AND DEA>0,MN);
顶背离:=CROSS(DEA,DIFF) AND 数>1 AND HHV(DIFF,SN)< HHV(DIFF,MN) AND HHV(H,SN)=HHV(H,MN),NODRAW;
顶:=HHV(DIFF,MN),POINTDOT,COLORGREEN;
STICKLINE(顶=REF(顶,1) AND DEA>0,顶,顶,5,0),COLORGREEN;
DRAWTEXT(顶背离,顶,'顶背离');
DRAWNUMBER(CROSS(DEA,DIFF) AND DEA>0,顶*1.3,数),COLORGREEN;
MN1:=BARSLAST(CROSS(0,DEA))+1;
JN:=BARSLAST(CROSS(DEA,DIFF))+1;
数1:=COUNT(CROSS(DIFF,DEA) AND DEA< 0,MN1);
底背离:CROSS(DIFF,DEA) AND 数1>1 AND LLV(DIFF,MN1)< LLV(DIFF,JN) AND LLV(L,JN)=LLV(L,MN1),NODRAW;
底:=LLV(DIFF,MN1),POINTDOT,COLORRED;
STICKLINE(底=REF(底,1) AND DEA< 0,底,底,5,0),COLORYELLOW;
DRAWTEXT(底背离,底,'底背离');
DRAWNUMBER(CROSS(DIFF,DEA) AND DEA< 0,底*0.7,数1),COLORYELLOW;
12 MACD连线背离
DYKD1:=7;
DYKD2:=7;
DYKD3:=9;
DYKD4:=3;
DYKD5:=3;
DYKD6:=(CLOSE-LLV(LOW,DYKD3))/(HHV(HIGH,DYKD3)-LLV(LOW,DYKD3))*100;
DYKD7:SMA(DYKD6,DYKD4,1);
DYKD8:SMA(DYKD7,DYKD5,1);
DYKD9:3*DYKD7-2*DYKD8,LINETHICK2;
IF(DYKD9>100-10,95-10,100-10),COLORGREEN,LINETHICK2;
IF(DYKD9< 0+10,5+10,0),COLORRED,LINETHICK2;
IF(DYKD9>100-10,DYKD9,DRAWNULL),COLORBLUE,LINETHICK3;
IF(DYKD9< -5+10,DYKD9,DRAWNULL),COLORRED,LINETHICK3;
DYKD10:(C-REF(C,1))/REF(C,1)*100,NODRAW;
DYKD11:=REF(DYKD9,1)< -15 AND DYKD9>REF(DYKD9,1) AND C< REF(C,1) AND COUNT(DYKD10< -4,2)>=1;
DRAWICON(DYKD11,DYKD9,1);
DYKD12:=REF(DYKD9,1)>=110 AND DYKD9< REF(DYKD9,1) AND C>=REF(C,1) AND DYKD9>105;
DRAWICON(DYKD12,DYKD9,2);
DYKD13:=CROSS(DYKD7,DYKD8) AND REF(DYKD9,1)< 0;
STICKLINE(DYKD13,0,20,3,0),COLORYELLOW;
DYKD14:=CROSS(DYKD7,DYKD8) AND COUNT(CROSS(DYKD7,DYKD8),5)>=2 ;
DYKD15:=BARSLAST(REF(CROSS(DYKD7,DYKD8),1));
DYKD16:=REF(CLOSE,DYKD15+1)>CLOSE AND DYKD7>REF(DYKD7,DYKD15+1) AND CROSS(DYKD7,DYKD8) AND DYKD9< 50;
DYKD17:=CROSS(DYKD8,DYKD7) AND REF(DYKD9,1)>100;
STICKLINE(DYKD17,100,80,3,0),COLORGREEN;
DRAWICON(DYKD16,DYKD9,26);
DYKD18:=BARSLAST(REF(CROSS(DYKD8,DYKD7),1));
DYKD19:=REF(CLOSE,DYKD18+1)< CLOSE AND REF(DYKD8,DYKD18+1)>DYKD8 AND CROSS(DYKD8,DYKD7) AND REF(DYKD9,1)>70;
DRAWICON(DYKD19,DYKD9,27);
DYKD20:=REF(DYKD9,3)=HHV(DYKD9,2*3+1);
DYKD21:=BACKSET(DYKD20,3+1);
DYKD22:=FILTER(DYKD21,3) AND DYKD9=HHV(DYKD9,3+1);
DYKD23:=BARSLAST(REF(DYKD22,1));
DYKD24:=REF(CLOSE,DYKD23+1)< CLOSE AND REF(DYKD9,DYKD23+1)>DYKD9 AND DYKD22;
DYKD25:=BARSLAST(DYKD22);
DYKD26:=BACKSET(FILTER(DYKD24>0,5),REF(DYKD25,1)+1);
DRAWLINE(CROSS(REFX(DYKD26=1,1),0.5),DYKD9,FILTER(DYKD24>0,5),DYKD9,0),COLORGREEN,LINETHICK2;
DYKD27:=REF(DYKD9,3)=LLV(DYKD9,2*3+1);
DYKD28:=BACKSET(DYKD27,3+1);
DYKD29:=FILTER(DYKD28,3) AND DYKD9=LLV(DYKD9,3+1) AND DYKD9< 40 ;
DYKD30:=BARSLAST(REF(DYKD29,1));
DYKD31:=REF(C,DYKD30+1)>CLOSE AND REF(DYKD9,DYKD30+1)< DYKD9 AND DYKD29;
DYKD32:=BARSLAST(DYKD29 AND DYKD9< 40);
DYKD33:=BACKSET(FILTER(DYKD31>0,5),REF(DYKD32,1)+1);
DRAWLINE(CROSS(REFX(DYKD33=1,1),0.5),DYKD9,FILTER(DYKD31>0,5),DYKD9,0),COLORYELLOW,LINETHICK2;
DYKD34:=C=LLV(C,6);
DYKD35:=DYKD9=LLV(DYKD9,6);
DYKD36:=DYKD34=1 AND DYKD35=0 AND DYKD9< 10;
DYKD37:=C=LLV(C,12);
DYKD38:=DYKD9=LLV(DYKD9,12);
DYKD39:=DYKD37=1 AND DYKD38=0 AND DYKD9< 10;
DYKD40:=DYKD36 AND DYKD39;
DYKD41:=DYKD40;
DYKD42:=C=HHV(C,6);
DYKD43:=DYKD9=HHV(DYKD9,6);
DYKD44:=DYKD42=1 AND DYKD43=0 AND DYKD9>85;
DYKD45:=C=HHV(C,12);
DYKD46:=DYKD9=HHV(DYKD9,12);
DYKD47:=DYKD45=1 AND DYKD46=0 AND DYKD9>85;
DYKD48:=DYKD44 AND DYKD47;
DYKD49:=DYKD48;
DYKD50:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>90 AND DYKD9>50;
DYKD51:=BARSLAST(REF(DYKD50,1));
DYKD52:=DYKD51<=36 AND REF(CLOSE,DYKD51+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD51+2) AND DYKD50;
DYKD53:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>100.6 AND DYKD9>50;
DYKD54:=BARSLAST(REF(DYKD53,1));
DYKD55:=DYKD54<=36 AND REF(CLOSE,DYKD54+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD54+2) AND DYKD53;
DYKD56:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>105 AND DYKD9>50;
DYKD57:=BARSLAST(REF(DYKD56,1));
DYKD58:=DYKD57<=36 AND REF(CLOSE,DYKD57+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD57+2) AND DYKD56;
DYKD59:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>95 AND DYKD9>50;
DYKD60:=BARSLAST(REF(DYKD59,1));
DYKD61:=DYKD60<=36 AND REF(CLOSE,DYKD60+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD60+2) AND DYKD59;
DYKD62:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>98 AND DYKD9>50;
DYKD63:=BARSLAST(REF(DYKD62,1));
DYKD64:=DYKD63<=36 AND REF(CLOSE,DYKD63+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD63+2) AND DYKD62;
DYKD65:=DYKD52+DYKD58+DYKD55+DYKD61+DYKD64;
DYKD66:=IF(DYKD65>=3,3,DYKD65);
DYKD67:=BARSLAST(CROSS(DYKD8,DYKD9));
DYKD68:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND COUNT(CROSS(DYKD8,DYKD9),DYKD67)<=1 AND REF(DYKD9,1)< 15;
DYKD69:=BARSLAST(REF(DYKD68,1));
DYKD70:=DYKD69<=36 AND REF(CLOSE,DYKD69+2)>=REF(CLOSE,1) AND REF(DYKD9,1)>REF(DYKD9,DYKD69+2) AND DYKD68;
DYKD71:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND COUNT(CROSS(DYKD8,DYKD9),DYKD67)<=1 AND REF(DYKD9,1)< 5;
DYKD72:=BARSLAST(REF(DYKD71,1));
DYKD73:=DYKD72<=36 AND REF(CLOSE,DYKD72+2)>=REF(CLOSE,1) AND REF(DYKD9,1)>REF(DYKD9,DYKD72+2) AND DYKD71;
DYKD74:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND COUNT(CROSS(DYKD8,DYKD9),DYKD67)<=1 AND REF(DYKD9,1)< 0;
DYKD75:=BARSLAST(REF(DYKD74,1));
DYKD76:=DYKD75<=36 AND REF(CLOSE,DYKD75+2)>=REF(CLOSE,1) AND REF(DYKD9,1)>REF(DYKD9,DYKD75+2) AND DYKD74;
DYKD77:=DYKD70+DYKD73+DYKD76;
DYKD78:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>90;
DYKD79:=BARSLAST(REF(DYKD78,1));
DYKD80:=DYKD79<=36 AND REF(CLOSE,DYKD79+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD79+1) AND DYKD78;
DYKD81:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>100;
DYKD82:=BARSLAST(REF(DYKD81,1));
DYKD83:=DYKD82<=36 AND REF(CLOSE,DYKD82+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD82+1) AND DYKD81;
DYKD84:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>95;
DYKD85:=BARSLAST(REF(DYKD84,1));
DYKD86:=DYKD85<=36 AND REF(CLOSE,DYKD85+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD85+1) AND DYKD84;
DYKD87:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>92.5;
DYKD88:=BARSLAST(REF(DYKD87,1));
DYKD89:=DYKD88<=36 AND REF(CLOSE,DYKD88+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD88+1) AND DYKD87;
DYKD90:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>97.5;
DYKD91:=BARSLAST(REF(DYKD90,1));
DYKD92:=DYKD91<=36 AND REF(CLOSE,DYKD91+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD91+1) AND DYKD90;
DYKD93:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>102.5;
DYKD94:=BARSLAST(REF(DYKD93,1));
DYKD95:=DYKD94<=36 AND REF(CLOSE,DYKD94+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD94+1) AND DYKD93;
DYKD96:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>85;
DYKD97:=BARSLAST(REF(DYKD96,1));
DYKD98:=DYKD97<=36 AND REF(CLOSE,DYKD97+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD97+1) AND DYKD96;
DYKD99:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>80 AND DYKD9>70;
DYKD100:=BARSLAST(REF(DYKD99,1));
DYKD101:=DYKD100<=36 AND REF(CLOSE,DYKD100+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD100+1) AND DYKD99;
DYKD102:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>75 AND DYKD9>65;
DYKD103:=BARSLAST(REF(DYKD102,1));
DYKD104:=DYKD103<=36 AND REF(CLOSE,DYKD103+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD103+1) AND DYKD102;
DYKD105:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,2)>REF(DYKD9,1) AND (REF(DYKD9,2)-REF(DYKD9,1))< 2 AND ABS(DYKD9-REF(DYKD9,1))>5 AND DYKD9>=60;
DYKD106:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND ABS(DYKD9-REF(DYKD9,1))>5 AND DYKD9>=60;
DYKD107:=DYKD105 OR DYKD106;
DYKD108:=BARSLAST(REF(DYKD107,1));
DYKD109:=DYKD108<=36 AND REF(CLOSE,DYKD108+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD108+1) AND DYKD107;
DYKD110:=DYKD80+DYKD83+DYKD86+DYKD89+DYKD92+DYKD95+DYKD98+DYKD101+DYKD104+DYKD109;
DYKD111:=IF(DYKD110>=5,5,DYKD110);
DYKD112:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2);
DYKD113:=BARSLAST(REF(DYKD112,1));
DYKD114:=DYKD113<=36 AND REF(CLOSE,DYKD113+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD113+1) AND DYKD112;
DYKD115:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 2.5 ;
DYKD116:=BARSLAST(REF(DYKD115,1));
DYKD117:=DYKD116<=36 AND REF(CLOSE,DYKD116+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD116+1) AND DYKD115;
DYKD118:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< -5 ;
DYKD119:=BARSLAST(REF(DYKD118,1));
DYKD120:=DYKD119<=36 AND REF(CLOSE,DYKD119+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD119+1) AND DYKD118;
DYKD121:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 5 ;
DYKD122:=DYKD113<=36 AND BARSLAST(REF(DYKD121,1));
DYKD123:=DYKD122<=36 AND REF(CLOSE,DYKD122+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD122+1) AND DYKD121;
DYKD124:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 7.5 ;
DYKD125:=BARSLAST(REF(DYKD124,1));
DYKD126:=DYKD125<=36 AND REF(CLOSE,DYKD125+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD125+1) AND DYKD124;
DYKD127:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 10 ;
DYKD128:=BARSLAST(REF(DYKD127,1));
DYKD129:=DYKD128<=36 AND REF(CLOSE,DYKD128+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD128+1) AND DYKD127;
DYKD130:=DYKD114+DYKD117+DYKD120+DYKD123+DYKD126+DYKD129;
DYKD131:=BARSLAST(CROSS(DYKD9,DYKD8));
DYKD132:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>85;
DYKD133:=BARSLAST(REF(DYKD132,1));
DYKD134:=DYKD133<=36 AND REF(CLOSE,DYKD133+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD133+2) AND DYKD132;
DYKD135:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>90;
DYKD136:=BARSLAST(REF(DYKD135,1));
DYKD137:=DYKD136<=36 AND REF(CLOSE,DYKD136+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD136+2) AND DYKD135;
DYKD138:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>95;
DYKD139:=BARSLAST(REF(DYKD138,1));
DYKD140:=DYKD139<=36 AND REF(CLOSE,DYKD139+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD139+2) AND DYKD138;
DYKD141:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>100;
DYKD142:=BARSLAST(REF(DYKD141,1));
DYKD143:=DYKD142<=36 AND REF(CLOSE,DYKD142+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD142+2) AND DYKD141;
DYKD144:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>105;
DYKD145:=BARSLAST(REF(DYKD144,1));
DYKD146:=DYKD145<=36 AND REF(CLOSE,DYKD145+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD145+2) AND DYKD144;
DYKD147:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>80 AND DYKD9>70;
DYKD148:=BARSLAST(REF(DYKD147,1));
DYKD149:=DYKD148<=36 AND REF(CLOSE,DYKD148+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD148+2) AND DYKD147;
DYKD150:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>75 AND DYKD9>65;
DYKD151:=BARSLAST(REF(DYKD150,1));
DYKD152:=DYKD151<=36 AND REF(CLOSE,DYKD151+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD151+2) AND DYKD150;
DYKD153:=DYKD134+DYKD137+DYKD140+DYKD143+DYKD146+DYKD149+DYKD152;
DYKD154:=IF(DYKD153>=4,4,DYKD153);
DYKD155:DYKD41+DYKD77+DYKD130+DYKD16,COLORRED,NODRAW;
DYKD156:DYKD49+DYKD66+DYKD111+DYKD154+DYKD19,COLORGREEN,NODRAW;
DRAWNUMBER(DYKD155>=1,DYKD9,DYKD155),COLORRED;
DRAWNUMBER(DYKD156>=1,DYKD9,DYKD156),COLORGREEN;
DRAWICON(DYKD155>DYKD2,DYKD9,3);
DRAWICON(DYKD156>DYKD1,DYKD9,4);
13 多元KDJ背离指标
STICKLINE(C>0,-100,100,28,0),COLOR000840;
STICKLINE(C>0,200,200,28,-1),COLOR000080;
STICKLINE(C>0,100,100,28,-1),COLOR000080;
STICKLINE(C>0,-2.5,2.5,28,0),COLOR000080;
STICKLINE(C>0,-100,-100,28,-1),COLOR000080;
STICKLINE(C>0,-200,-200,28,-1),COLOR000080;
MJCC1:=(HIGH+LOW+CLOSE)/3;
MJCC2:=(MJCC1-MA(MJCC1,14))/(0.015*AVEDEV(MJCC1,14)),STICK;
MJCC3:EMA(MJCC2,4.5),COLOR0080FF,NODRAW;
DRAWBAND(MJCC3,RGB(0,224,224),MJCC2,RGB(255,96,96));
STICKLINE(MJCC2>=0,0,MJCC2,0,-1),COLORRED;
STICKLINE(MJCC2< 0,0,MJCC2,0,-1),COLORBLUE;
MJCC4:(MJCC1-MA(MJCC1,14))/(0.015*AVEDEV(MJCC1,14)),COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,MJCC4,' ←CCI'),COLORYELLOW;
MJCC5:=5;
MJCC6:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),1))+1)>C AND REF(MJCC2,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),1))+1)< MJCC2 AND FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),MJCC2,FILTER(MJCC6>0,5),MJCC2,0),COLORWHITE;
DRAWTEXT(MJCC6,MJCC2,'底背'),COLORWHITE;
MJCC7:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),1))+1)< C AND REF(MJCC2,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),1))+1)>MJCC2 AND FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),MJCC2,FILTER(MJCC7>0,5),MJCC2,0),COLORGREEN;
DRAWTEXT(MJCC7,MJCC2,'顶背'),COLORGREEN;
MJCC8:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),1))+1)>C AND REF(MJCC3,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),1))+1)< MJCC3 AND FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),MJCC3,FILTER(MJCC8>0,5),MJCC3,0),COLORWHITE;
DRAWTEXT(MJCC8,MJCC3,'趋势底背'),COLORFF80FF;
MJCC9:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),1))+1)< C AND REF(MJCC3,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),1))+1)>MJCC3 AND FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),MJCC3,FILTER(MJCC9>0,5),MJCC3,0),COLORGREEN;
DRAWTEXT(MJCC9,MJCC3,'趋势顶背'),COLORFF8000;
MJCC10:=0-MJCC2;
MJCC11:=IF(MJCC2< 0,SUM(MJCC2,BARSLAST(MJCC10< 0)),0);
MJCC12:=IF(MJCC2>0,SUM(MJCC2,BARSLAST(MJCC10>0)),0);
MJCC13:=LLV(L,BARSLAST(MJCC10< 0));
MJCC14:=HHV(H,BARSLAST(MJCC10>0));
MJCC15:=IF (MJCC2< 0,BARSLAST(CROSS(MJCC2,0)),0);
MJCC16:=REF(MJCC11,MJCC15+1);
MJCC17:=REF(MJCC13,MJCC15+1);
MJCC18:=IF((MJCC11< 0 AND ABS(MJCC11)< ABS(MJCC16) AND MJCC13< MJCC17 ),1,0);
MJCC19:=MJCC2< 0 AND REF(MJCC2,1)< 0 AND C< MJCC17 AND ABS(MJCC11)< ABS(MJCC16) AND ABS(MJCC2)< ABS(REF(MJCC2,1));
MJCC20:=IF (CROSS(MJCC2,0),REF(MJCC18,1),0);
DRAWTEXT(MJCC20,LLV(MJCC2,5),'←面积底背'),COLORRED;
MJCC21:=IF (MJCC2>0,BARSLAST(CROSS(0,MJCC2)),0);
MJCC22:=REF(MJCC12,MJCC21+1);
MJCC23:=REF(MJCC14,MJCC21+1);
MJCC24:=IF((MJCC12>0 AND MJCC12< MJCC22 AND MJCC14>MJCC23 ),1,0);
MJCC25:=MJCC2>0 AND REF(MJCC2,1)>0 AND C>MJCC23 AND ABS(MJCC12)< ABS(MJCC22) AND ABS(MJCC2)< ABS(REF(MJCC2,1));
MJCC26:=IF (CROSS(0,MJCC2),REF(MJCC24,1),0);
DRAWTEXT(MJCC26,HHV(MJCC2,5),'←面积顶背'),COLORCYAN;
MJCC27:=EMA(EMA(EMA(MJCC2,2),2),2);
MJCC28:=EMA(EMA(EMA(MJCC2,3),2),2);
MJCC29:=(CROSS(MJCC27,MJCC28) OR (MJCC27 >=MJCC28)) AND MJCC27>=-101 AND MJCC27>=REF(MJCC27,1) AND REF(MJCC27,1)< -101 ;
MJCC30:IF(MJCC29>0,100,0),STICK,COLORYELLOW,LINETHICK2;
14 CCI顶底面积背离指标
MCD1:EMA(C,12)-EMA(C,26),COLORRED;
MCD2:EMA(MCD1,9),COLORWHITE;
MCD3:(MCD1-MCD2)*2,COLORSTICK;
STICKLINE(((MCD3< REF(MCD3,1)) AND (MCD3>0)),0,MCD3,1,0),COLORLIBLUE;
STICKLINE(((MCD3>REF(MCD3,1)) AND (MCD3< 0)),0,MCD3,1,0),COLORFF00FF;
IF(MCD1< 0,MCD1,0),COLORYELLOW;
IF(MCD1< 0,0,MCD1),COLORRED;
IF(MCD1< MCD2,MCD1,MCD2),COLORWHITE;
IF(MCD1>MCD2,MCD2,MCD2),COLORFF937F;
MCD4:=COUNT(CROSS(MCD1,MCD2),BARSLAST(MCD2>=0));
MCD5:=CROSS(MCD1,MCD2) AND MCD2< 0 AND COUNT(MCD4=2,21)=1;
DRAWTEXT(MCD5,0.2,' 二次金叉'),COLORYELLOW;
MCD6:=BARSLAST(REF(CROSS(MCD1,MCD2),1));
MCD7:=REF(C,MCD6+1)>C AND MCD1>REF(MCD1,MCD6+1) AND CROSS(MCD1,MCD2);
STICKLINE(MCD7,0,0.03,6,0),COLOR00FF00;
MCD8:DRAWLINE(MCD6=0,MCD2,MCD7,MCD2,0),COLORRED;
DRAWTEXT(MCD7,0.12,' 底背离'),COLORFF00FF;
MCD9:=BARSLAST(REF(CROSS(MCD2,MCD1),1));
MCD10:=REF(C,MCD9+1)< C AND REF(MCD1,MCD9+1)>MCD1 AND CROSS(MCD2,MCD1);
MCD11:DRAWLINE(MCD9=0,MCD2,MCD10,MCD2,0),COLORGREEN;
图片 02 KDJ背离 KDBL1:=9;
KDBL2:=3;
KDBL3:=3;
KDBL4:=(CLOSE-LLV(LOW,KDBL1))/(HHV(HIGH,KDBL1)-LLV(LOW,KDBL1))*100;
KDBL5:SMA(KDBL4,KDBL2,1);
KDBL6:SMA(KDBL5,KDBL3,1);
KDBL7:3*KDBL5-2*KDBL6;
KDBL8:=CROSS(KDBL5,KDBL6) AND KDBL6< 20;
STICKLINE(KDBL8,KDBL6,KDBL6+8,5,0),COLORYELLOW;
KDBL9:=COUNT(CROSS(KDBL5,KDBL6),BARSLAST(KDBL5>=KDBL6));
KDBL10:=CROSS(KDBL5,KDBL6) AND KDBL6< 20 AND COUNT(KDBL9=2,34)=1;
STICKLINE(KDBL10,KDBL6,KDBL6+5,5,0),COLORFF80FF;
DRAWICON(KDBL10,KDBL6*0.85,1) ;
KDBL11:=BARSLAST(REF(CROSS(KDBL5,KDBL6),1));
KDBL12:=REF(CLOSE,KDBL11+1)>CLOSE AND KDBL5>REF(KDBL5,KDBL11+1) AND CROSS(KDBL5,KDBL6);
STICKLINE(KDBL12,KDBL6,KDBL6+5,5,0),COLORRED;
DRAWLINE(KDBL11=0,KDBL6,KDBL12,KDBL6,0),COLORRED,LINETHICK2;
DRAWTEXT(KDBL12>0,KDBL7,'D底背离'),COLORRED;
KDBL13:=BARSLAST(REF(CROSS(KDBL6,KDBL5),1));
KDBL14:=REF(CLOSE,KDBL13+1)< CLOSE AND REF(KDBL6,KDBL13+1)>KDBL6 AND CROSS(KDBL6,KDBL5);
DRAWLINE(KDBL13=0,KDBL6,KDBL14,KDBL6,0),COLORGREEN,LINETHICK2;
DRAWTEXT(KDBL14>0,KDBL5+2,'D顶背离'),COLORGREEN;
图片 03 KDJ优化背离 LOWV:=EMA(LLV(LOW,34),3);
HIGHV:=EMA(HHV(HIGH,34),3);
RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,3);
K:=SMA(RSV,8,1);
D:=SMA(K,6,1);
J:3*K-2*D;
J1:MA(J,3);
A1:=BARSLAST(REF(CROSS(J,J1),1));
AA:=REF(CLOSE,A1+1)>CLOSE AND J>REF(J,A1+1) AND CROSS(J,J1) AND J< 20;
STICKLINE(AA,0,25,3,0),COLORMAGENTA;
DRAWTEXT(AA>0,30,'底背离');
A2:=BARSLAST(REF(CROSS(J1,J),1));
BB:=REF(CLOSE,A2+1)< CLOSE AND REF(J1,A2+1)>J1 AND CROSS(J1,J) AND J>90;
DRAWTEXT(BB>0,75,'顶背离');
STICKLINE(BB,100,80,3,0),COLORGREEN;
100;
50;
0;
图片 04 RSI背离 LC :=REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
A12022:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
R底背离:=REF(C,A12022+1)>C AND RSI1>REF(RSI1,A12022+1) AND CROSS(RSI1,RSI2);
DRAWTEXT(R底背离,RSI2,' 底背离'),COLORYELLOW;
A22022:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
R顶背离:=REF(C,A22022+1)< C AND REF(RSI1,A22022+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(R顶背离,RSI2,'顶背离'),COLORGREEN;
DD2022:=CROSS(RSI2,RSI1);
DRAWICON(DD2022,RSI1,1);
KK2022:=CROSS(RSI1,RSI2);
DRAWICON(KK2022,RSI1,2);
DRAWLINE(A12022=0,RSI2,R底背离,RSI2,0),COLORRED;
DRAWLINE(A22022=0,RSI2,R顶背离,RSI2,0),COLORGREEN;
图片 05 CCI背离 CIBL1:=14;
CIBL2:=(HIGH+LOW+CLOSE)/3;
CIBL3:(CIBL2-MA(CIBL2,CIBL1))/(0.015*AVEDEV(CIBL2,CIBL1));
CIBL4:=CIBL3;
CIBL5:=REF(CIBL4,CIBL1)=HHV(CIBL4,2*CIBL1+1);
CIBL6:=BACKSET(CIBL5,CIBL1+1);
CIBL7:=FILTER(CIBL6,CIBL1) AND CIBL4=HHV(CIBL4,CIBL1+1);
CIBL8:=BARSLAST(REF(CIBL7,1));
CIBL9:=REF(CLOSE,CIBL8+1)< CLOSE AND REF(CIBL4,CIBL8+1)>CIBL4 AND CIBL7;
DRAWICON(CIBL9,CIBL3*0.9,1);
CIBL10:=BACKSET(CIBL9,REF(BARSLAST(CIBL7),1)+2);
DRAWLINE(CROSS(CIBL10,0.5),CIBL4,CROSS(FILTER(CIBL9>0,5),0.5),CIBL4,0),COLORGREEN,LINETHICK2;
CIBL11:=REF(CIBL4,CIBL1)=LLV(CIBL4,2*CIBL1+1);
CIBL12:=BACKSET(CIBL11,CIBL1+1);
CIBL13:=FILTER(CIBL12,CIBL1) AND CIBL4=LLV(CIBL4,CIBL1+1);
CIBL14:=BARSLAST(REF(CIBL13,1));
CIBL15:=REF(CLOSE,CIBL14+1)>CLOSE AND REF(CIBL4,CIBL14+1)< CIBL4 AND CIBL13;
CIBL16:=BACKSET(CIBL15,REF(BARSLAST(CIBL13),1)+2);
DRAWLINE(CROSS(CIBL16,0.5),CIBL4,CROSS(FILTER(CIBL15>0,5),0.5),CIBL4,0),COLORMAGENTA,LINETHICK2;
DRAWICON(CIBL15,-130,2);
IF(CIBL3>=100,CIBL3,DRAWNULL),COLORGREEN;
IF(CIBL3<=-100,CIBL3,DRAWNULL),COLORRED;
图片 06 三指标背离 DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,8);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)< DIFF AND CROSS(DIFF,DEA);
DRAWTEXT(IF(B1>0,1,0),L,'MACD底背'),COLORGREEN;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)< K AND CROSS(K,D);
DRAWTEXT(IF(B2>0,1,0),L*0.999,'KDJ底背'),COLORYELLOW;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)< RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L*0.998,'RSI底背'),COLORCYAN;
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)< C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(IF(D1>0,1,0),H,'MACD顶背'),COLORWHITE;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)< C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT(IF(D2>0,1,0),H*1.001,'KDJ顶背'),COLORWHITE;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)< C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H*1.002,'RSI顶背'),COLORMAGENTA;
图片 07 四指标背离 ZHBL1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
ZHBL2:=SMA(ZHBL1,3,1);
ZHBL3:=SMA(ZHBL2,3,1);
ZHBL4:=3*ZHBL2-2*ZHBL3;
ZHBL5:=REF(C,1);
ZHBL6:=SMA(MAX(C-ZHBL5,0),6,1)/SMA(ABS(C-ZHBL5),6,1)*100;
ZHBL7:=SMA(MAX(C-ZHBL5,0),12,1)/SMA(ABS(C-ZHBL5),12,1)*100;
ZHBL8:=SMA(MAX(C-ZHBL5,0),24,1)/SMA(ABS(C-ZHBL5),24,1)*100;
ZHBL9:ZHBL6-ZHBL8, COLORSTICK,LINETHICK0;
ZHBL10:=BARSLAST(REF(CROSS(ZHBL2,ZHBL3),1));
ZHBL11:=REF(C,ZHBL10+1)>C AND REF(ZHBL2,ZHBL10+1)< ZHBL2 AND CROSS(ZHBL2,ZHBL3);
ZHBL12:=BARSLAST(REF(CROSS(ZHBL6,ZHBL7),1));
ZHBL13:=REF(C,ZHBL12+1)>C AND REF(ZHBL6,ZHBL12+1)< ZHBL6 AND CROSS(ZHBL6,ZHBL7);
ZHBL14:=BARSLAST(REF(CROSS(ZHBL3,ZHBL2),1));
ZHBL15:=REF(C,ZHBL14+1)< C AND REF(ZHBL2,ZHBL14+1)>ZHBL2 AND CROSS(ZHBL3,ZHBL2);
ZHBL16:=BARSLAST(REF(CROSS(ZHBL7,ZHBL6),1));
ZHBL17:=REF(C,ZHBL16+1)< C AND REF(ZHBL6,ZHBL16+1)>ZHBL6 AND CROSS(ZHBL7,ZHBL6);
ZHBL18:IF(ZHBL11>0,1,0),COLORRED,POINTDOT;
ZHBL19:IF(ZHBL13>0,1,0),COLORYELLOW,POINTDOT;
ZHBL20:IF(ZHBL15>0,1,0),COLORBLUE,POINTDOT;
ZHBL21:IF(ZHBL17>0,1,0),COLORGREEN,POINTDOT;
ZHBL22:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORYELLOW;
ZHBL23:=EMA(ZHBL22,9),COLORCYAN;
ZHBL24:=2*(ZHBL22-ZHBL23),COLORSTICK;
ZHBL25:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
ZHBL26:=HIGH-REF(HIGH,1);
ZHBL27:=REF(LOW,1)-LOW;
ZHBL28:=SUM(IF(ZHBL26>0 AND ZHBL26>ZHBL27,ZHBL26,0),14);
ZHBL29:=SUM(IF(ZHBL27>0 AND ZHBL27>ZHBL26,ZHBL27,0),14);
ZHBL30:=ZHBL28*100/ZHBL25;
ZHBL31:=ZHBL29*100/ZHBL25;
ZHBL32:=BARSLAST(REF(CROSS(ZHBL22,ZHBL23),1));
ZHBL33:=REF(CLOSE,ZHBL32+1)>CLOSE && REF(ZHBL22,ZHBL32+1)< ZHBL22 && CROSS(ZHBL22,ZHBL23);
ZHBL34:=BARSLAST(REF(CROSS(ZHBL23,ZHBL22),1));
ZHBL35:=REF(CLOSE,ZHBL34+1)< CLOSE && REF(ZHBL22,ZHBL34+1)>ZHBL22 && CROSS(ZHBL23,ZHBL22);
ZHBL36:=BARSLAST(REF(CROSS(ZHBL31,ZHBL30),1));
ZHBL37:=REF(C,C+1)< C AND REF(ZHBL31,ZHBL36+1)>ZHBL31 AND CROSS(ZHBL31,ZHBL30);
ZHBL38:=BARSLAST(REF(CROSS(ZHBL30,ZHBL31),1));
ZHBL39:=REF(C,ZHBL38+1)>C AND REF(ZHBL30,ZHBL38+1)< ZHBL30 AND CROSS(ZHBL30,ZHBL31);
ZHBL40:IF(ZHBL33>0,1,0),COLORRED,NODRAW;
ZHBL41:IF(ZHBL39>0,1,0),NODRAW;
ZHBL42:IF(ZHBL35>0,1,0),COLOR00FF00,NODRAW;
ZHBL43:IF(ZHBL37>0,1,0),COLORRED,NODRAW;
DRAWTEXT(ZHBL40,ZHBL9,'M低'),COLORRED;
DRAWTEXT(ZHBL18,ZHBL9,'K低'),COLORFF00FF;
DRAWTEXT(ZHBL19,ZHBL9,'R低'),COLORYELLOW;
DRAWTEXT(ZHBL41,ZHBL9,'D低'),COLORRED;
DRAWTEXT(ZHBL42,ZHBL9,'M顶'),COLOR00FF00;
DRAWTEXT(ZHBL20,ZHBL9,'K顶'),COLORFFCC66;
DRAWTEXT(ZHBL21,ZHBL9,'R顶'),COLORWHITE;
DRAWTEXT(ZHBL43,ZHBL9,'D顶'),COLORMAGENTA;
STICKLINE(ZHBL11>0 ,-25,0,5,0),COLORRED;
STICKLINE(ZHBL13>0 ,-25,0,5,0),COLORYELLOW;
STICKLINE(ZHBL15>0 ,25,0,5,0),COLORBLUE;
STICKLINE(ZHBL17>0,25,0,5,0),COLORGREEN;
图片 08 MACD新高低背离 M:=20;
DIFF:EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :EMA(DIFF,9),COLORGREEN;
MACD:2*(DIFF-DEA), COLORSTICK;
AA2000:=CLOSE>REF(HHV(HIGH,M),1) AND MACD< REF(HHV(MACD,M),1) ;
BB2000:=CLOSE< REF(LLV(LOW,M),1) AND MACD>REF(LLV(MACD,M),1) ;
DRAWTEXT(AA2000,MACD,'▲顶背离'),COLORYELLOW;
DRAWTEXT(BB2000,MACD,'▼低背离'),COLORGREEN;
图片 09 macd均线背离 DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORWHITE;
DEA:EMA(DIF,9),COLORYELLOW;
MACD:(DIF-DEA)*2,COLORSTICK;
A1:=BARSLAST(REF(CROSS(DEA,DIF),1));
A2:=BARSLAST(REF(CROSS(DIF,DEA),1));
DD2022:=HHV(MA(C,2),9)>REF(HHV(MA(C,2),9),A1) AND HHV(DIF,5)< REF(HHV(DIF,5),A1) AND CROSS(DEA,DIF);
KK2022:=LLV(MA(C,2),9)< REF(LLV(MA(C,2),9),A2) AND LLV(DIF,5)>REF(LLV(DIF,5),A2) AND CROSS(DIF,DEA);
DRAWTEXT(DD2022,DEA+0.1,'顶背离'),COLORGREEN ;
DRAWTEXT(KK2022,DEA-0.1,'底背离'),COLORYELLOW;
DRAWICON(CROSS(DEA,DIF),DEA,5);
DRAWICON(CROSS(DIF,DEA),DEA,4);
图片 10 MACD结构背离 JGBL1:100*(EMA(CLOSE,12)-EMA(CLOSE,26));
JGBL2:EMA(JGBL1,9);
JGBL3:(JGBL1-JGBL2)*2,COLORSTICK;
JGBL4:=CROSS(JGBL2,JGBL1);
JGBL5:=BARSLAST(JGBL4),NODRAW;
JGBL6:=REF(BARSLAST(JGBL4),JGBL5+1),NODRAW;
JGBL7:=REF(BARSLAST(JGBL4),JGBL6+JGBL5+2),NODRAW;
JGBL8:=LLV(C,JGBL5+1),NODRAW;
JGBL9:=LLV(JGBL1,JGBL5+1),NODRAW;
JGBL10:=REF(JGBL8,JGBL5+1),NODRAW;
JGBL11:=REF(JGBL9,JGBL5+1),NODRAW;
JGBL12:=REF(JGBL10,JGBL5+1),NODRAW;
JGBL13:=REF(JGBL11,JGBL5+1),NODRAW;
JGBL14:=IF(JGBL11>0,INTPART(LOG(JGBL11))-1,INTPART(LOG(-(JGBL11)))-1);
JGBL15:=INTPART(JGBL11/POW(10,JGBL14));
JGBL16:=IF(JGBL13>0,INTPART(LOG(JGBL13))-1,INTPART(LOG(-(JGBL13)))-1);
JGBL17:=INTPART(JGBL13/POW(10,JGBL16));
JGBL18:=INTPART(JGBL1/POW(10,JGBL14));
JGBL19:=INTPART(JGBL1/POW(10,JGBL16));
JGBL20:=(JGBL8< JGBL10 ) AND (JGBL18>JGBL15) AND (JGBL3< 0 AND REF(JGBL3,1)< 0) AND JGBL18<=REF(JGBL18,1);
JGBL21:=(JGBL8< JGBL12 AND JGBL12< JGBL10 ) AND (JGBL19>JGBL17) AND (JGBL3< 0 AND REF(JGBL3,1)< 0) AND JGBL19<=REF(JGBL19,1);
JGBL22:JGBL20 OR JGBL21,NODRAW;
JGBL23:((JGBL18>REF(JGBL18,1))*REF(JGBL20,1)) OR ((JGBL19>REF(JGBL19,1))*REF(JGBL21,1)),NODRAW;
JGBL24:=(REF(JGBL20,1) AND JGBL9<=JGBL11 ) OR (REF(JGBL21,1) AND JGBL9<=JGBL13);
JGBL25:=BARSLAST(JGBL3>0);
DRAWTEXT(COUNT(JGBL22,JGBL25)=1 AND NOT(REF(COUNT(JGBL22,JGBL25)=1 ,1)),(JGBL1+JGBL3),'钝化'),COLORRED;
STICKLINE(JGBL22 OR JGBL23,JGBL1,JGBL2,1,0),COLORRED;
JGBL26:=BARSLAST(JGBL22);
DRAWTEXT(JGBL24,(JGBL3),'消失'),COLORYELLOW;
JGBL27:=BARSLAST(JGBL3>0);
DRAWTEXT(COUNT(JGBL23,JGBL27)=1 AND NOT(REF(COUNT(JGBL23,JGBL27)=1,1)),JGBL1*1.1,'结构形成'),COLORMAGENTA;
JGBL28:=CROSS(JGBL1,JGBL2);
JGBL29:=BARSLAST(JGBL28),NODRAW;
JGBL30:=REF(BARSLAST(JGBL28),JGBL29+1),NODRAW;
JGBL31:=REF(BARSLAST(JGBL28),JGBL30+JGBL29+2),NODRAW;
JGBL32:=HHV(C,JGBL29+1),NODRAW;
JGBL33:=HHV(JGBL1,JGBL29+1),NODRAW;
JGBL34:=REF(JGBL32,JGBL29+1),NODRAW;
JGBL35:=REF(JGBL33,JGBL29+1),NODRAW;
JGBL36:=REF(JGBL34,JGBL29+1),NODRAW;
JGBL37:=REF(JGBL35,JGBL29+1),NODRAW;
JGBL38:=IF(JGBL35>0,INTPART(LOG(JGBL35))-1,INTPART(LOG(-(JGBL35)))-1);
JGBL39:=INTPART(JGBL35/POW(10,JGBL38));
JGBL40:=IF(JGBL37>0,INTPART(LOG(JGBL37))-1,INTPART(LOG(-(JGBL37)))-1);
JGBL41:=INTPART(JGBL37/POW(10,JGBL40));
JGBL42:=INTPART(JGBL1/POW(10,JGBL38));
JGBL43:=INTPART(JGBL1/POW(10,JGBL40));
JGBL44:=(JGBL32>JGBL34 ) AND (JGBL42< JGBL39) AND (JGBL3>0 AND REF(JGBL3,1)>0) AND JGBL42>=REF(JGBL42,1);
JGBL45:=(JGBL32>JGBL36 AND JGBL36>JGBL34 ) AND (JGBL43< JGBL41) AND (JGBL3>0 AND REF(JGBL3,1)>0) AND JGBL43>=REF(JGBL43,1);
JGBL46:JGBL44 OR JGBL45,NODRAW;
JGBL47:((JGBL42< REF(JGBL42,1))*REF(JGBL44,1)) OR ((JGBL43< REF(JGBL43,1))*REF(JGBL45,1)),NODRAW;
JGBL48:=(REF(JGBL44,1) AND JGBL33>=JGBL35 ) OR (REF(JGBL45,1) AND JGBL33>=JGBL37);
JGBL49:=BARSLAST(JGBL3< 0);
DRAWTEXT(COUNT(JGBL46,JGBL49)=1 AND REF(COUNT(JGBL46,JGBL49),1)< 1,(JGBL1+JGBL3),'钝化'),COLORGREEN;
JGBL50:=BARSLAST(JGBL46);
DRAWTEXT(JGBL48,(JGBL3),'消失'),COLORYELLOW;
STICKLINE(JGBL46 OR JGBL47,JGBL1,JGBL2,1,0),COLORGREEN;
DRAWTEXT(COUNT(JGBL47,JGBL49)=1 AND REF(COUNT(JGBL47,JGBL49),1)< 1,JGBL1*1.02,'结构形成'),COLORMAGENTA;
JGBL51:JGBL44 OR JGBL45,NODRAW,COLORGREEN;
JGBL52:JGBL20 OR JGBL21,NODRAW,COLORYELLOW;
DRAWTEXT(JGBL51,0,'顶背'),COLORGREEN;
DRAWTEXT(JGBL52,0,'底背'),COLORGREEN;
图片 11 特殊MACD背离 DIFF : EMA(CLOSE,12) - EMA(CLOSE,26),COLORBFFF10;
DEA : EMA(DIFF,9);
IF(DIFF>DEA AND DIFF< 0,DIFF,DRAWNULL),COLORBFA4D9,LINETHICK2;
IF(DIFF>DEA AND DIFF>0,DIFF,DRAWNULL),COLORRED,LINETHICK2;
IF(DEA< 0,DEA,DRAWNULL),COLORBLUE,LINETHICK2;
MACD : 2*(DIFF-DEA), COLORSTICK;
MA1:=REF(MACD,1),POINTDOT,COLORGRAY;
STICKLINE(DEA>0 AND MACD< MA1 AND MACD>=0,0,MACD,1,1),COLORBFA4D9;
STICKLINE(DEA< 0 AND MACD>=MA1 AND MACD< 0,0,MACD,1,1),COLORBFFF10;
MN:=BARSLAST(CROSS(DEA,0))+1;
SN:=BARSLAST(CROSS(DIFF,DEA))+1;
数:=COUNT(CROSS(DEA,DIFF) AND DEA>0,MN);
顶背离:=CROSS(DEA,DIFF) AND 数>1 AND HHV(DIFF,SN)< HHV(DIFF,MN) AND HHV(H,SN)=HHV(H,MN),NODRAW;
顶:=HHV(DIFF,MN),POINTDOT,COLORGREEN;
STICKLINE(顶=REF(顶,1) AND DEA>0,顶,顶,5,0),COLORGREEN;
DRAWTEXT(顶背离,顶,'顶背离');
DRAWNUMBER(CROSS(DEA,DIFF) AND DEA>0,顶*1.3,数),COLORGREEN;
MN1:=BARSLAST(CROSS(0,DEA))+1;
JN:=BARSLAST(CROSS(DEA,DIFF))+1;
数1:=COUNT(CROSS(DIFF,DEA) AND DEA< 0,MN1);
底背离:CROSS(DIFF,DEA) AND 数1>1 AND LLV(DIFF,MN1)< LLV(DIFF,JN) AND LLV(L,JN)=LLV(L,MN1),NODRAW;
底:=LLV(DIFF,MN1),POINTDOT,COLORRED;
STICKLINE(底=REF(底,1) AND DEA< 0,底,底,5,0),COLORYELLOW;
DRAWTEXT(底背离,底,'底背离');
DRAWNUMBER(CROSS(DIFF,DEA) AND DEA< 0,底*0.7,数1),COLORYELLOW;
图片 12 MACD连线背离 BLLX1:EMA(C,12) - EMA(CLOSE,26);
BLLX2:EMA(BLLX1,9);
BLLX3:2*(BLLX1-BLLX2),NODRAW;
2*(BLLX1-BLLX2),COLORSTICK;
BLLX4:=CROSS(BLLX1,BLLX2);
BLLX5:=CROSS(BLLX2,BLLX1);
BLLX6:=SUMBARS(BLLX5,1);
BLLX7:=REF(SUMBARS(BLLX4,1),BLLX6);
BLLX8:=SUMBARS(BLLX5,2);
BLLX9:=REF(REF(HHV(H,BLLX7),1),BLLX6-1);
BLLX10:=REF(REF(HHV(H,BLLX7),1),BLLX8-1);
BLLX11:=REF(REF(HHV(BLLX1,BLLX7),1),BLLX6-1);
BLLX12:=REF(REF(HHV(BLLX1,BLLX7),1),BLLX8-1);
BLLX13:=CROSS(0,BLLX3) && BLLX9>BLLX10 && BLLX11< BLLX12;
DRAWTEXT(BLLX13,BLLX3,'顶背离'),COLORYELLOW;
BLLX14:=BACKSET(CROSS(0,BLLX3),LLVBARS(BLLX1,BLLX6)+1);
BLLX15:=BACKSET(BLLX13,SUMBARS(BLLX14>REF(BLLX14,1),2));
DRAWLINE(CROSS(BLLX15,0.5),BLLX1,BLLX13,BLLX1,0),COLORGREEN,LINETHICK3;
BLLX16:=SUMBARS(BLLX4,1);
BLLX17:=REF(SUMBARS(BLLX5,1),BLLX16);
BLLX18:=SUMBARS(BLLX4,2);
BLLX19:=REF(REF(LLV(L,BLLX17),1),BLLX16-1);
BLLX20:=REF(REF(LLV(L,BLLX17),1),BLLX18-1);
BLLX21:=REF(REF(LLV(BLLX1,BLLX17),1),BLLX16-1);
BLLX22:=REF(REF(LLV(BLLX1,BLLX17),1),BLLX18-1);
BLLX23:=CROSS(BLLX3,0) && BLLX19< BLLX20 && BLLX21>BLLX22;
DRAWTEXT(BLLX23,BLLX3,'底背离');
BLLX24:=BACKSET(CROSS(0,BLLX3),HHVBARS(BLLX1,BLLX6)+1);
BLLX25:=BACKSET(BLLX23,SUMBARS(BLLX24>REF(BLLX24,1),2));
DRAWLINE(CROSS(BLLX25,0.5),BLLX1,BLLX23,BLLX1,0),COLORRED,LINETHICK3;
图片 13 多元KDJ背离 DYKD1:=7;
DYKD2:=7;
DYKD3:=9;
DYKD4:=3;
DYKD5:=3;
DYKD6:=(CLOSE-LLV(LOW,DYKD3))/(HHV(HIGH,DYKD3)-LLV(LOW,DYKD3))*100;
DYKD7:SMA(DYKD6,DYKD4,1);
DYKD8:SMA(DYKD7,DYKD5,1);
DYKD9:3*DYKD7-2*DYKD8,LINETHICK2;
IF(DYKD9>100-10,95-10,100-10),COLORGREEN,LINETHICK2;
IF(DYKD9< 0+10,5+10,0),COLORRED,LINETHICK2;
IF(DYKD9>100-10,DYKD9,DRAWNULL),COLORBLUE,LINETHICK3;
IF(DYKD9< -5+10,DYKD9,DRAWNULL),COLORRED,LINETHICK3;
DYKD10:(C-REF(C,1))/REF(C,1)*100,NODRAW;
DYKD11:=REF(DYKD9,1)< -15 AND DYKD9>REF(DYKD9,1) AND C< REF(C,1) AND COUNT(DYKD10< -4,2)>=1;
DRAWICON(DYKD11,DYKD9,1);
DYKD12:=REF(DYKD9,1)>=110 AND DYKD9< REF(DYKD9,1) AND C>=REF(C,1) AND DYKD9>105;
DRAWICON(DYKD12,DYKD9,2);
DYKD13:=CROSS(DYKD7,DYKD8) AND REF(DYKD9,1)< 0;
STICKLINE(DYKD13,0,20,3,0),COLORYELLOW;
DYKD14:=CROSS(DYKD7,DYKD8) AND COUNT(CROSS(DYKD7,DYKD8),5)>=2 ;
DYKD15:=BARSLAST(REF(CROSS(DYKD7,DYKD8),1));
DYKD16:=REF(CLOSE,DYKD15+1)>CLOSE AND DYKD7>REF(DYKD7,DYKD15+1) AND CROSS(DYKD7,DYKD8) AND DYKD9< 50;
DYKD17:=CROSS(DYKD8,DYKD7) AND REF(DYKD9,1)>100;
STICKLINE(DYKD17,100,80,3,0),COLORGREEN;
DRAWICON(DYKD16,DYKD9,26);
DYKD18:=BARSLAST(REF(CROSS(DYKD8,DYKD7),1));
DYKD19:=REF(CLOSE,DYKD18+1)< CLOSE AND REF(DYKD8,DYKD18+1)>DYKD8 AND CROSS(DYKD8,DYKD7) AND REF(DYKD9,1)>70;
DRAWICON(DYKD19,DYKD9,27);
DYKD20:=REF(DYKD9,3)=HHV(DYKD9,2*3+1);
DYKD21:=BACKSET(DYKD20,3+1);
DYKD22:=FILTER(DYKD21,3) AND DYKD9=HHV(DYKD9,3+1);
DYKD23:=BARSLAST(REF(DYKD22,1));
DYKD24:=REF(CLOSE,DYKD23+1)< CLOSE AND REF(DYKD9,DYKD23+1)>DYKD9 AND DYKD22;
DYKD25:=BARSLAST(DYKD22);
DYKD26:=BACKSET(FILTER(DYKD24>0,5),REF(DYKD25,1)+1);
DRAWLINE(CROSS(REFX(DYKD26=1,1),0.5),DYKD9,FILTER(DYKD24>0,5),DYKD9,0),COLORGREEN,LINETHICK2;
DYKD27:=REF(DYKD9,3)=LLV(DYKD9,2*3+1);
DYKD28:=BACKSET(DYKD27,3+1);
DYKD29:=FILTER(DYKD28,3) AND DYKD9=LLV(DYKD9,3+1) AND DYKD9< 40 ;
DYKD30:=BARSLAST(REF(DYKD29,1));
DYKD31:=REF(C,DYKD30+1)>CLOSE AND REF(DYKD9,DYKD30+1)< DYKD9 AND DYKD29;
DYKD32:=BARSLAST(DYKD29 AND DYKD9< 40);
DYKD33:=BACKSET(FILTER(DYKD31>0,5),REF(DYKD32,1)+1);
DRAWLINE(CROSS(REFX(DYKD33=1,1),0.5),DYKD9,FILTER(DYKD31>0,5),DYKD9,0),COLORYELLOW,LINETHICK2;
DYKD34:=C=LLV(C,6);
DYKD35:=DYKD9=LLV(DYKD9,6);
DYKD36:=DYKD34=1 AND DYKD35=0 AND DYKD9< 10;
DYKD37:=C=LLV(C,12);
DYKD38:=DYKD9=LLV(DYKD9,12);
DYKD39:=DYKD37=1 AND DYKD38=0 AND DYKD9< 10;
DYKD40:=DYKD36 AND DYKD39;
DYKD41:=DYKD40;
DYKD42:=C=HHV(C,6);
DYKD43:=DYKD9=HHV(DYKD9,6);
DYKD44:=DYKD42=1 AND DYKD43=0 AND DYKD9>85;
DYKD45:=C=HHV(C,12);
DYKD46:=DYKD9=HHV(DYKD9,12);
DYKD47:=DYKD45=1 AND DYKD46=0 AND DYKD9>85;
DYKD48:=DYKD44 AND DYKD47;
DYKD49:=DYKD48;
DYKD50:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>90 AND DYKD9>50;
DYKD51:=BARSLAST(REF(DYKD50,1));
DYKD52:=DYKD51<=36 AND REF(CLOSE,DYKD51+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD51+2) AND DYKD50;
DYKD53:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>100.6 AND DYKD9>50;
DYKD54:=BARSLAST(REF(DYKD53,1));
DYKD55:=DYKD54<=36 AND REF(CLOSE,DYKD54+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD54+2) AND DYKD53;
DYKD56:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>105 AND DYKD9>50;
DYKD57:=BARSLAST(REF(DYKD56,1));
DYKD58:=DYKD57<=36 AND REF(CLOSE,DYKD57+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD57+2) AND DYKD56;
DYKD59:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>95 AND DYKD9>50;
DYKD60:=BARSLAST(REF(DYKD59,1));
DYKD61:=DYKD60<=36 AND REF(CLOSE,DYKD60+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD60+2) AND DYKD59;
DYKD62:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>98 AND DYKD9>50;
DYKD63:=BARSLAST(REF(DYKD62,1));
DYKD64:=DYKD63<=36 AND REF(CLOSE,DYKD63+2)< REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD63+2) AND DYKD62;
DYKD65:=DYKD52+DYKD58+DYKD55+DYKD61+DYKD64;
DYKD66:=IF(DYKD65>=3,3,DYKD65);
DYKD67:=BARSLAST(CROSS(DYKD8,DYKD9));
DYKD68:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND COUNT(CROSS(DYKD8,DYKD9),DYKD67)<=1 AND REF(DYKD9,1)< 15;
DYKD69:=BARSLAST(REF(DYKD68,1));
DYKD70:=DYKD69<=36 AND REF(CLOSE,DYKD69+2)>=REF(CLOSE,1) AND REF(DYKD9,1)>REF(DYKD9,DYKD69+2) AND DYKD68;
DYKD71:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND COUNT(CROSS(DYKD8,DYKD9),DYKD67)<=1 AND REF(DYKD9,1)< 5;
DYKD72:=BARSLAST(REF(DYKD71,1));
DYKD73:=DYKD72<=36 AND REF(CLOSE,DYKD72+2)>=REF(CLOSE,1) AND REF(DYKD9,1)>REF(DYKD9,DYKD72+2) AND DYKD71;
DYKD74:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND COUNT(CROSS(DYKD8,DYKD9),DYKD67)<=1 AND REF(DYKD9,1)< 0;
DYKD75:=BARSLAST(REF(DYKD74,1));
DYKD76:=DYKD75<=36 AND REF(CLOSE,DYKD75+2)>=REF(CLOSE,1) AND REF(DYKD9,1)>REF(DYKD9,DYKD75+2) AND DYKD74;
DYKD77:=DYKD70+DYKD73+DYKD76;
DYKD78:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>90;
DYKD79:=BARSLAST(REF(DYKD78,1));
DYKD80:=DYKD79<=36 AND REF(CLOSE,DYKD79+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD79+1) AND DYKD78;
DYKD81:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>100;
DYKD82:=BARSLAST(REF(DYKD81,1));
DYKD83:=DYKD82<=36 AND REF(CLOSE,DYKD82+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD82+1) AND DYKD81;
DYKD84:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>95;
DYKD85:=BARSLAST(REF(DYKD84,1));
DYKD86:=DYKD85<=36 AND REF(CLOSE,DYKD85+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD85+1) AND DYKD84;
DYKD87:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>92.5;
DYKD88:=BARSLAST(REF(DYKD87,1));
DYKD89:=DYKD88<=36 AND REF(CLOSE,DYKD88+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD88+1) AND DYKD87;
DYKD90:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>97.5;
DYKD91:=BARSLAST(REF(DYKD90,1));
DYKD92:=DYKD91<=36 AND REF(CLOSE,DYKD91+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD91+1) AND DYKD90;
DYKD93:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>102.5;
DYKD94:=BARSLAST(REF(DYKD93,1));
DYKD95:=DYKD94<=36 AND REF(CLOSE,DYKD94+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD94+1) AND DYKD93;
DYKD96:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>85;
DYKD97:=BARSLAST(REF(DYKD96,1));
DYKD98:=DYKD97<=36 AND REF(CLOSE,DYKD97+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD97+1) AND DYKD96;
DYKD99:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>80 AND DYKD9>70;
DYKD100:=BARSLAST(REF(DYKD99,1));
DYKD101:=DYKD100<=36 AND REF(CLOSE,DYKD100+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD100+1) AND DYKD99;
DYKD102:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND REF(DYKD9,1)>75 AND DYKD9>65;
DYKD103:=BARSLAST(REF(DYKD102,1));
DYKD104:=DYKD103<=36 AND REF(CLOSE,DYKD103+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD103+1) AND DYKD102;
DYKD105:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,2)>REF(DYKD9,1) AND (REF(DYKD9,2)-REF(DYKD9,1))< 2 AND ABS(DYKD9-REF(DYKD9,1))>5 AND DYKD9>=60;
DYKD106:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND ABS(DYKD9-REF(DYKD9,1))>5 AND DYKD9>=60;
DYKD107:=DYKD105 OR DYKD106;
DYKD108:=BARSLAST(REF(DYKD107,1));
DYKD109:=DYKD108<=36 AND REF(CLOSE,DYKD108+1)< CLOSE AND DYKD9< REF(DYKD9,DYKD108+1) AND DYKD107;
DYKD110:=DYKD80+DYKD83+DYKD86+DYKD89+DYKD92+DYKD95+DYKD98+DYKD101+DYKD104+DYKD109;
DYKD111:=IF(DYKD110>=5,5,DYKD110);
DYKD112:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2);
DYKD113:=BARSLAST(REF(DYKD112,1));
DYKD114:=DYKD113<=36 AND REF(CLOSE,DYKD113+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD113+1) AND DYKD112;
DYKD115:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 2.5 ;
DYKD116:=BARSLAST(REF(DYKD115,1));
DYKD117:=DYKD116<=36 AND REF(CLOSE,DYKD116+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD116+1) AND DYKD115;
DYKD118:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< -5 ;
DYKD119:=BARSLAST(REF(DYKD118,1));
DYKD120:=DYKD119<=36 AND REF(CLOSE,DYKD119+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD119+1) AND DYKD118;
DYKD121:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 5 ;
DYKD122:=DYKD113<=36 AND BARSLAST(REF(DYKD121,1));
DYKD123:=DYKD122<=36 AND REF(CLOSE,DYKD122+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD122+1) AND DYKD121;
DYKD124:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 7.5 ;
DYKD125:=BARSLAST(REF(DYKD124,1));
DYKD126:=DYKD125<=36 AND REF(CLOSE,DYKD125+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD125+1) AND DYKD124;
DYKD127:=DYKD9>REF(DYKD9,1) AND REF(DYKD9,1)< REF(DYKD9,2) AND REF(DYKD9,1)< 10 ;
DYKD128:=BARSLAST(REF(DYKD127,1));
DYKD129:=DYKD128<=36 AND REF(CLOSE,DYKD128+1)>CLOSE AND DYKD9>REF(DYKD9,DYKD128+1) AND DYKD127;
DYKD130:=DYKD114+DYKD117+DYKD120+DYKD123+DYKD126+DYKD129;
DYKD131:=BARSLAST(CROSS(DYKD9,DYKD8));
DYKD132:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>85;
DYKD133:=BARSLAST(REF(DYKD132,1));
DYKD134:=DYKD133<=36 AND REF(CLOSE,DYKD133+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD133+2) AND DYKD132;
DYKD135:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>90;
DYKD136:=BARSLAST(REF(DYKD135,1));
DYKD137:=DYKD136<=36 AND REF(CLOSE,DYKD136+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD136+2) AND DYKD135;
DYKD138:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>95;
DYKD139:=BARSLAST(REF(DYKD138,1));
DYKD140:=DYKD139<=36 AND REF(CLOSE,DYKD139+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD139+2) AND DYKD138;
DYKD141:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>100;
DYKD142:=BARSLAST(REF(DYKD141,1));
DYKD143:=DYKD142<=36 AND REF(CLOSE,DYKD142+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD142+2) AND DYKD141;
DYKD144:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>105;
DYKD145:=BARSLAST(REF(DYKD144,1));
DYKD146:=DYKD145<=36 AND REF(CLOSE,DYKD145+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD145+2) AND DYKD144;
DYKD147:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>80 AND DYKD9>70;
DYKD148:=BARSLAST(REF(DYKD147,1));
DYKD149:=DYKD148<=36 AND REF(CLOSE,DYKD148+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD148+2) AND DYKD147;
DYKD150:=DYKD9< REF(DYKD9,1) AND REF(DYKD9,1)>REF(DYKD9,2) AND COUNT(CROSS(DYKD9,DYKD8),DYKD131)<=1 AND REF(DYKD9,1)>75 AND DYKD9>65;
DYKD151:=BARSLAST(REF(DYKD150,1));
DYKD152:=DYKD151<=36 AND REF(CLOSE,DYKD151+2)<=REF(CLOSE,1) AND REF(DYKD9,1)< REF(DYKD9,DYKD151+2) AND DYKD150;
DYKD153:=DYKD134+DYKD137+DYKD140+DYKD143+DYKD146+DYKD149+DYKD152;
DYKD154:=IF(DYKD153>=4,4,DYKD153);
DYKD155:DYKD41+DYKD77+DYKD130+DYKD16,COLORRED,NODRAW;
DYKD156:DYKD49+DYKD66+DYKD111+DYKD154+DYKD19,COLORGREEN,NODRAW;
DRAWNUMBER(DYKD155>=1,DYKD9,DYKD155),COLORRED;
DRAWNUMBER(DYKD156>=1,DYKD9,DYKD156),COLORGREEN;
DRAWICON(DYKD155>DYKD2,DYKD9,3);
DRAWICON(DYKD156>DYKD1,DYKD9,4);
图片 14 CCI面积
STICKLINE(C>0,-100,100,28,0),COLOR000840;
STICKLINE(C>0,200,200,28,-1),COLOR000080;
STICKLINE(C>0,100,100,28,-1),COLOR000080;
STICKLINE(C>0,-2.5,2.5,28,0),COLOR000080;
STICKLINE(C>0,-100,-100,28,-1),COLOR000080;
STICKLINE(C>0,-200,-200,28,-1),COLOR000080;
MJCC1:=(HIGH+LOW+CLOSE)/3;
MJCC2:=(MJCC1-MA(MJCC1,14))/(0.015*AVEDEV(MJCC1,14)),STICK;
MJCC3:EMA(MJCC2,4.5),COLOR0080FF,NODRAW;
DRAWBAND(MJCC3,RGB(0,224,224),MJCC2,RGB(255,96,96));
STICKLINE(MJCC2>=0,0,MJCC2,0,-1),COLORRED;
STICKLINE(MJCC2< 0,0,MJCC2,0,-1),COLORBLUE;
MJCC4:(MJCC1-MA(MJCC1,14))/(0.015*AVEDEV(MJCC1,14)),COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,MJCC4,' ←CCI'),COLORYELLOW;
MJCC5:=5;
MJCC6:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),1))+1)>C AND REF(MJCC2,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),1))+1)< MJCC2 AND FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC2,MJCC5)=LLV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=LLV(MJCC2,MJCC5+1),MJCC2,FILTER(MJCC6>0,5),MJCC2,0),COLORWHITE;
DRAWTEXT(MJCC6,MJCC2,'底背'),COLORWHITE;
MJCC7:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),1))+1)< C AND REF(MJCC2,BARSLAST(REF(FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),1))+1)>MJCC2 AND FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC2,MJCC5)=HHV(MJCC2,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC2=HHV(MJCC2,MJCC5+1),MJCC2,FILTER(MJCC7>0,5),MJCC2,0),COLORGREEN;
DRAWTEXT(MJCC7,MJCC2,'顶背'),COLORGREEN;
MJCC8:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),1))+1)>C AND REF(MJCC3,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),1))+1)< MJCC3 AND FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC3,MJCC5)=LLV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=LLV(MJCC3,MJCC5+1),MJCC3,FILTER(MJCC8>0,5),MJCC3,0),COLORWHITE;
DRAWTEXT(MJCC8,MJCC3,'趋势底背'),COLORFF80FF;
MJCC9:=REF(C,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),1))+1)< C AND REF(MJCC3,BARSLAST(REF(FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),1))+1)>MJCC3 AND FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(MJCC3,MJCC5)=HHV(MJCC3,2*MJCC5+1),MJCC5+1),MJCC5) AND MJCC3=HHV(MJCC3,MJCC5+1),MJCC3,FILTER(MJCC9>0,5),MJCC3,0),COLORGREEN;
DRAWTEXT(MJCC9,MJCC3,'趋势顶背'),COLORFF8000;
MJCC10:=0-MJCC2;
MJCC11:=IF(MJCC2< 0,SUM(MJCC2,BARSLAST(MJCC10< 0)),0);
MJCC12:=IF(MJCC2>0,SUM(MJCC2,BARSLAST(MJCC10>0)),0);
MJCC13:=LLV(L,BARSLAST(MJCC10< 0));
MJCC14:=HHV(H,BARSLAST(MJCC10>0));
MJCC15:=IF (MJCC2< 0,BARSLAST(CROSS(MJCC2,0)),0);
MJCC16:=REF(MJCC11,MJCC15+1);
MJCC17:=REF(MJCC13,MJCC15+1);
MJCC18:=IF((MJCC11< 0 AND ABS(MJCC11)< ABS(MJCC16) AND MJCC13< MJCC17 ),1,0);
MJCC19:=MJCC2< 0 AND REF(MJCC2,1)< 0 AND C< MJCC17 AND ABS(MJCC11)< ABS(MJCC16) AND ABS(MJCC2)< ABS(REF(MJCC2,1));
MJCC20:=IF (CROSS(MJCC2,0),REF(MJCC18,1),0);
DRAWTEXT(MJCC20,LLV(MJCC2,5),'←面积底背'),COLORRED;
MJCC21:=IF (MJCC2>0,BARSLAST(CROSS(0,MJCC2)),0);
MJCC22:=REF(MJCC12,MJCC21+1);
MJCC23:=REF(MJCC14,MJCC21+1);
MJCC24:=IF((MJCC12>0 AND MJCC12< MJCC22 AND MJCC14>MJCC23 ),1,0);
MJCC25:=MJCC2>0 AND REF(MJCC2,1)>0 AND C>MJCC23 AND ABS(MJCC12)< ABS(MJCC22) AND ABS(MJCC2)< ABS(REF(MJCC2,1));
MJCC26:=IF (CROSS(0,MJCC2),REF(MJCC24,1),0);
DRAWTEXT(MJCC26,HHV(MJCC2,5),'←面积顶背'),COLORCYAN;
MJCC27:=EMA(EMA(EMA(MJCC2,2),2),2);
MJCC28:=EMA(EMA(EMA(MJCC2,3),2),2);
MJCC29:=(CROSS(MJCC27,MJCC28) OR (MJCC27 >=MJCC28)) AND MJCC27>=-101 AND MJCC27>=REF(MJCC27,1) AND REF(MJCC27,1)< -101 ;
MJCC30:IF(MJCC29>0,100,0),STICK,COLORYELLOW,LINETHICK2;
|
- 软件大小:0 Bytes
- 推荐星级:
- 更新时间:2025-09-23 00:12:25
- 软件类别: 国产软件 / 通达信公式
- 软件语言:简体中文
- 授权方式: 分享版
- 联系方式:暂无联系方式
- 官方主页: Home Page
- 点击大图: 【一键转帖到论坛】
- 插件情况:

- 运行环境:Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
- 相关Tags:指标公式 股票软件,公式源码
-
(0)0%(0)0%
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!



