通达信KDJ底背离(主图 副图/选股 源码)

[复制链接]
查看11 | 回复0 | 2022-7-24 05:09:19 | 显示全部楼层 |阅读模式

{主图}
T:=BARSLAST(L=LLV(L,10));
 K:=KDJ.K;
 L1:=REF(L,T);
 L2:=REF(L1,T+1);
 K1:=REF(K,T);
 K2:=REF(K1,T+1);
 TJ:=L1<L2 AND K1>K2 AND T=0 AND REF(T,1)>3;
 TJT:=BARSLAST(TJ);
 QF:=BACKSET(TJ,REF(T,1)+2);
 QT:=BARSLAST(CROSS(QF=1,0.5));
 VV:=HHV(VOL,20)/VOL;
 KK:=IF(QF=1,K,-9999);
 HH:=HHV(KK,QT);
 TT:=BARSLAST(KK=HH);
 TC:=QT-TJT;
 XG:=CROSS(K,REF(KK,TT)) AND QT<20 AND VV>2.5 AND TC<7;
 DRAWLINE(QT=0,L,TJT=0,L,0),COLORRED;
 STICKLINE(XG,C,O,2,0),COLORBROWN;
 STICKLINE(XG,H,L,0,0),COLORBROWN;
 DRAWTEXT(QT=0,L*0.95,'底背离'),COLORYELLOW;
 DRAWICON(XG,H*1.05,9);
 {幅图}

RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:SMA(RSV1,3,1);
 D:SMA(K,3,1);
 J:3*K-2*D,LINETHICK1;
 T:=BARSLAST(L=LLV(L,10));
 L1:=REF(L,T);
 L2:=REF(L1,T+1);
 K1:=REF(K,T);
 K2:=REF(K1,T+1);
 TJ:=L1<L2 AND K1>K2 AND REF(T,1)>3 AND T=0;
 TJT:=BARSLAST(TJ);
 QF:=BACKSET(TJ,REF(T,1)+2);
 QT:=BARSLAST(CROSS(QF=1,0.5));
 KK:=IF(QF=1,K,-9999);
 HH:=HHV(KK,QT);
 TT:=BARSLAST(KK=HH);
 TC:=QT-TJT;
 XG:=CROSS(K,REF(KK,TT)) AND QT<20 AND V<REF(V,1) AND HHV(VOL,20)/VOL>2.5 AND TC<7;
 DRAWLINE(TT=0,K,REF(TT=0,1),REF(K,1),1),COLORGREEN;
 DRAWLINE(QT=0,K,TJ,K,0),COLORRED,LINETHICK2;
 DRAWICON(XG,K,1);
 DRAWTEXT(QT=0,K,'底背离'),COLORYELLOW;


 {选股}

RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV1,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 T:=BARSLAST(L=LLV(L,10));
 L1:=REF(L,T);
 L2:=REF(L1,T+1);
 K1:=REF(K,T);
 K2:=REF(K1,T+1);
 TJ:=L1<L2 AND K1>K2 AND REF(T,1)>3 AND T=0;
 TJT:=BARSLAST(TJ);
 QF:=BACKSET(TJ,REF(T,1)+2);
 QT:=BARSLAST(CROSS(QF=1,0.5));
 KK:=IF(QF=1,K,-9999);
 HH:=HHV(KK,QT);
 TT:=BARSLAST(KK=HH);
 TC:=QT-TJT;
 XG:CROSS(K,REF(KK,TT)) AND QT<20 AND V<REF(V,1) AND HHV(VOL,20)/VOL>2.5 AND TC<7;


75166931.jpg

75166931.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则