KDJ周金叉选股

{KDJ超牛选股指标}

VR1:=(2*C+H+L)/4;

VR2:=EMA(EMA(EMA(VR1,4),4),4);

J1:=(VR2-REF(VR2,1))/REF(VR2,1)*100;

K1:=MA(J1,1);

D1:=MA(J1,3);

CJDXXG:=((CROSS(K1,D1) AND D1>-0.1 AND D1<0.25) OR CROSS(K1,0));

周K:="KDJ.K#WEEK"(9,3,2);

周D:="KDJ.D#WEEK"(9,3,2);

周J:="KDJ.J#WEEK"(9,3,2);

周金叉:=CROSS(周K,周D);

XG:EXIST(周金叉,2) AND CJDXXG AND V>MA(V,5) AND C>MA(C,5);

{KDJ超牛副图指标}

N:=9;

P1:=3;

P2:=2;

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

K:SMA(RSV,P1,1),COLORCYAN;

D:SMA(K,P2,1),COLOR00DD00;

J:3*K-2*D,COLORRED;

周K:="KDJ.K#WEEK"(9,3,2);

周D:="KDJ.D#WEEK"(9,3,2);

周J:="KDJ.J#WEEK"(9,3,2);

周金叉:=CROSS(周K,周D);

日金叉:=FILTER(CROSS(K,D) AND K<20,4);

DRAWTEXT(周金叉,D,'★'),COLORYELLOW;

DRAWTEXT(周金叉,D*0.93,'周金叉'),COLORYELLOW;

DRAWTEXT(CROSS(周D,周K),D*0.95,'周死叉'),COLOR00DDBB;

DRAWICON(日金叉,K,1);

DRAWTEXT(日金叉,D,'低金'),COLOR00CCCC;

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

KDDB:=REF(CLOSE,KDB+1)>CLOSE AND REF(K,KDB+1)<K AND CROSS(K,D);

K底背:=IF(FILTER(KDDB>0,5),1,0);

DRAWTEXT(K底背=1,D*0.98,'底背'),COLORRED;

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

K顶背:=REF(CLOSE,KDD+1)<CLOSE AND REF(K,KDD+1)>K AND CROSS(D,K);

DRAWTEXT(FILTER(K顶背>0,5),D+8,'顶背'),COLORFFAA22;

50,DOTLINE;

T1:=REF(J,1)-REF(J,2)<0 AND J>REF(J,1)-0.7 AND J-REF(J,1)>REF(J,1)-REF(J,2);

T2:=REF(J,1)-REF(J,2)>0 AND J>REF(J,1);

T:=T1 OR T2;

IF(T=1,J,DRAWNULL),COLORMAGENTA,LINETHICK2;

IF(T=0,J,DRAWNULL),COLORWHITE,LINETHICK2;

WR:100*(HHV(HIGH,42)-CLOSE)/(HHV(HIGH,42)-LLV(LOW,42))LINETHICK2,COLOR333333;

{MACDZY}

DIF:EMA(CLOSE,10)-EMA(CLOSE,22),COLORCYAN;

DEA:EMA(DIF,7.5),COLORMAGENTA;

MACD:=(DIF-DEA)*2,COLORSTICK;

SMA(DIF,4,2),COLORYELLOW,LINETHICK1; 

IF(MACD>REF(MACD,1),MACD,DRAWNULL),STICK,COLORRED;

IF(MACD<REF(MACD,1),MACD,DRAWNULL),STICK,COLORWHITE;