通达信KDJ底背离主图幅图选股源码

通达信KDJ底背离主图幅图选股

答疑区有同学求助写一个底背离选股，写好之后，9月出票1000多，原来不想发帖共享，后来优化了9月出票99张。
KDJ与股价形成背离后，股价突破底背离区间最高KDJ的K值出票。优化加上缩量突破和底背离区间控制，选股和主图用到了向前赋值未来函数。但我认为这个未来函数不影响出票。为什么？因为出票时底背离已经形成后再在底背离区间的最高K值画线，线形成后 股价缩量突破这条线出票。最怕的就是那些懂一点函数的跟帖要我解释，所以提前预告，怕未来函数的千万不要用。

源码

 

{主图}

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;

 

62577469.jpg