分享

[文华指标]背离第一期 7个背离指标MACD KDJ RSI CCI副图组合主图 文华财经版

 知行合一1ycgzb 2023-11-17 发布于河北

注意本指标源码用于文华财经赢顺wh6、睿期wh7软件。

图片
图片

目录

1 MACD背离指标

2 KDJ背离指标

3 KDJ优化背离指标

4 RSI背离指标

5 CCI背离指标

6 三指标组合背离

7 四指标组合背离

01

MACD指标

DIFF:EMA(C,12)-EMA(C,26),COLORRED;

DEA:EMA(DIFF,9),COLORWHITE;

2*(DIFF-DEA),COLORSTICK;

A12022:=BARSLAST(REF(CROSS(DIFF,DEA),1));

MACD底背离:=REF(C,A12022+1)>C AND DIFF>REF(DIFF,A12022+1) AND CROSS(DIFF,DEA);

STICKLINE(MACD底背离,0,0.03,6,0),COLOR00FF00;

DRAWLINE3(CROSS(MACD底背离,0.5),DEA,0,CROSS(MACD底背离,0.5),REF(DEA,A12022),A12022,0),COLORYELLOW,LINETHICK2;

DRAWTEXT(MACD底背离,DEA,' 底背离'),COLORFF00FF;

//公众号  量化爱好者之家

A22022:=BARSLAST(REF(CROSS(DEA,DIFF),1));

MACD顶背离:=REF(C,A22022+1)<C AND REF(DIFF,A22022+1)>DIFF AND CROSS(DEA,DIFF);

DRAWTEXT(MACD顶背离,DEA,'顶背离'),COLORGREEN;

DRAWLINE3(CROSS(MACD顶背离,0.5),DEA,0,CROSS(MACD顶背离,0.5),REF(DEA,A22022),A22022,0),COLORGREEN,LINETHICK2;

DD2022:=CROSS(DEA,DIFF);

DRAWICON(DD2022,DIFF,4),VALIGN0;

KK2022:=CROSS(DIFF,DEA);

DRAWICON(KK2022,DIFF,5),VALIGN0;

//交叉和背离的声音预警提示,不想要声音,可以删除

PLAYSOUND(DD2022 OR MACD底背离,'A');

PLAYSOUND(KK2022 OR MACD底背离,'A');

图片

02

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;

A12022:=BARSLAST(REF(CROSS(K,D),1));

K底背离:=REF(C,A12022+1)>C AND K>REF(K,A12022+1) AND CROSS(K,D);

DRAWLINE3(CROSS(K底背离,0.5),D,0,CROSS(K底背离,0.5),REF(D,A12022),A12022,0),COLORRED,LINETHICK2;

DRAWTEXT(K底背离,D,' 底背离'),COLORYELLOW;

//公众号  量化爱好者之家

A22022:=BARSLAST(REF(CROSS(D,K),1));

K顶背离:=REF(C,A22022+1)<C AND REF(K,A22022+1)>K AND CROSS(D,K);

DRAWTEXT(K顶背离,D,'顶背离'),COLORGREEN;

DRAWLINE3(CROSS(K顶背离,0.5),D,0,CROSS(K顶背离,0.5),REF(D,A22022),A22022,0),COLORGREEN,LINETHICK2;

DD2022:=CROSS(D,K);

DRAWICON(DD2022,K,4),VALIGN0;

KK2022:=CROSS(K,D);

DRAWICON(KK2022,K,5),VALIGN0;

//交叉和背离的声音预警提示,不想要声音,可以删除

PLAYSOUND(DD2022 OR K底背离,'A');

PLAYSOUND(KK2022 OR K底背离,'A');

图片

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,COLORMAGENTA,0);

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,COLORGREEN,0);

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);

DRAWLINE3(CROSS(R底背离,0.5),RSI2,0,CROSS(R底背离,0.5),REF(RSI2,A12022),A12022,0),COLORRED,LINETHICK2;

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;

DRAWLINE3(CROSS(R顶背离,0.5),RSI2,0,CROSS(R顶背离,0.5),REF(RSI2,A22022),A22022,0),COLORGREEN,LINETHICK2;

DD2022:=CROSS(RSI2,RSI1);

DRAWICON(DD2022,RSI1,4),VALIGN0;

KK2022:=CROSS(RSI1,RSI2);

DRAWICON(KK2022,RSI1,5),VALIGN0;

//交叉和背离的声音预警提示,不想要声音,可以删除

PLAYSOUND(DD2022 OR R底背离,'A');

PLAYSOUND(KK2022 OR R底背离,'A');

图片

05

CCI背离

N:=14; 

TYP:=(HIGH+LOW+CLOSE)/3; 

CCI:(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N)); 

RSI1:=CCI; 

AA:=REF(RSI1,N)=HHV(RSI1,2*N+1); 

BB:=BACKSET(AA,N+1); 

CC:=FILTER(BB,N) AND RSI1=HHV(RSI1,N+1); 

A1:=BARSLAST(REF(CC,1)); 

顶背离:=REF(CLOSE,A1+1)<CLOSE AND REF(RSI1,A1+1)>RSI1 AND CC; 

DRAWICON(顶背离,CCI*0.9,5); 

DD1:=BACKSET(顶背离,REF(BARSLAST(CC),1)+2);

DRAWLINE1(CROSS(DD1,0.5),RSI1,CROSS(FILTER(顶背离>0,5),0.5),RSI1,0),COLORGREEN,LINETHICK2; 

AA2:=REF(RSI1,N)=LLV(RSI1,2*N+1); 

BB2:=BACKSET(AA2,N+1); 

CC2:=FILTER(BB2,N) AND RSI1=LLV(RSI1,N+1); 

A2:=BARSLAST(REF(CC2,1)); 

底背离:=REF(CLOSE,A2+1)>CLOSE AND REF(RSI1,A2+1)<RSI1 AND CC2; 

KK1:=BACKSET(底背离,REF(BARSLAST(CC2),1)+2);

DRAWLINE1(CROSS(KK1,0.5),RSI1,CROSS(FILTER(底背离>0,5),0.5),RSI1,0),COLORMAGENTA,LINETHICK2; 

DRAWICON(底背离,-130,4); 

IF(CCI>=100,CCI,NULL),COLORGREEN; 

IF(CCI<=-100,CCI,NULL),COLORRED;  

图片

06

MACD KDJ RSI组合背离

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,VALIGN0;

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,VALIGN0;

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,VALIGN0;

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,VALIGN2;

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,VALIGN2;

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,VALIGN2;

图片

07

MACD RSI KDJ DMI组合背离副图

DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORYELLOW;

DEA:EMA(DIFF,9),COLORCYAN;

MACD:2*(DIFF-DEA),COLORSTICK;

TR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);

HD:=HIGH-REF(HIGH,1);

LD:=REF(LOW,1)-LOW;

PDM:=SUM(IF(HD>0 AND HD>LD,HD,0),14);

MDM:=SUM(IF(LD>0 AND LD>HD,LD,0),14);

PDI:=PDM*100/TR;

MDI:=MDM*100/TR;

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;

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:=BARSLAST(REF(CROSS(DIFF,DEA),1));

B1:=REF(CLOSE,A1+1)>CLOSE && REF(DIFF,A1+1)<DIFF && CROSS(DIFF,DEA);

A2:=BARSLAST(REF(CROSS(K,D),1));

B2:=REF(CLOSE,A2+1)>CLOSE && REF(K,A2+1)<K && CROSS(K,D);

A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));

B3:=REF(CLOSE,A3+1)>CLOSE && REF(RSI1,A3+1)<RSI1 && CROSS(RSI1,RSI2);

C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));

D1:=REF(CLOSE,C1+1)<CLOSE && REF(DIFF,C1+1)>DIFF && CROSS(DEA,DIFF);

C2:=BARSLAST(REF(CROSS(D,K),1));

D2:=REF(CLOSE,C2+1)<CLOSE && REF(K,C2+1)>K && CROSS(D,K);

C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));

D3:=REF(CLOSE,C3+1)<CLOSE && REF(RSI1,C3+1)>RSI1 && CROSS(RSI2,RSI1);

C4:=BARSLAST(REF(CROSS(MDI,PDI),1));

D4:=REF(C,C+1)<C AND REF(MDI,C4+1)>MDI AND CROSS(MDI,PDI);

A4:=BARSLAST(REF(CROSS(PDI,MDI),1));

B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)<PDI AND CROSS(PDI,MDI);

MACD底背:IF(B1>0,1,0),COLORRED,NODRAW;

KDJ底背:IF(B2>0,1,0),COLORFF00FF,NODRAW;

RSI底背:IF(B3>0,1,0),COLORYELLOW,NODRAW;

DMI底背:IF(B4>0,1,0),NODRAW;

MACD顶背:IF(D1>0,1,0),COLOR00FF00,NODRAW;

KDJ顶背:IF(D2>0,1,0),COLORFFCC66,NODRAW;

RSI顶背:IF(D3>0,1,0),COLORWHITE,NODRAW;

DMI顶背:IF(D4>0,1,0),COLORRED,NODRAW;

DRAWTEXT(MACD底背,DIFF,'M低'),COLORRED;

DRAWTEXT(KDJ底背,DIFF,'K低'),COLORFF00FF;

DRAWTEXT(RSI底背,DIFF,'R低'),COLORYELLOW;

DRAWTEXT(DMI底背,DIFF,'D低'),COLORLIGHTRED;

DRAWTEXT(MACD顶背,DIFF,'M顶'),COLOR00FF00;

DRAWTEXT(KDJ顶背,DIFF,'K顶'),COLORFFCC66;

DRAWTEXT(RSI顶背,DIFF,'R顶'),COLORWHITE;

DRAWTEXT(DMI顶背,DIFF,'D顶'),COLORMAGENTA;

STICKLINE1(B1>0,MACD,0,3,0),COLORRED;

STICKLINE1(B2>0,MACD,0,3,0),COLORFF00FF;

STICKLINE1(B3>0,MACD,0,3,0),COLORYELLOW;

STICKLINE1(B4>0,MACD,0,3,0),COLORLIGHTRED;

STICKLINE1(D1>0,MACD,0,3,0),COLOR00FF00;

STICKLINE1(D2>0,MACD,0,3,0),COLORFFCC66;

STICKLINE1(D3>0,MACD,0,3,0),COLORWHITE;

STICKLINE1(D4>0,MACD,0,3,0),COLORMAGENTA;

图片

友情提示:本指标公式仅作为知识分享,供交流学习使用,不构成任何投资建议,不作为投资依据。
图片

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约