通达信KDJ底背离及选股指标(源码)

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