通达信KDJ挖牛股指标公式

通达信KDJ挖牛股指标公式

10,COLORRED;

20,COLOR00FF00,LINETHICK3,POINTDOT;

40,COLOR00FFFF,LINETHICK3,POINTDOT;

50,COLORRED,LINETHICK2;

60,COLORRED,LINETHICK3,POINTDOT;

80,COLOR00FFFF,LINETHICK3,POINTDOT;

90,COLORWHITE;

100,COLOR00FF00,LINETHICK1;

{进入异动区}{当出现进入异动区提示时需观察买入，最好是第二次kdj三线相交时介入}

VAR7:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

VAR8:=EMA(VAR7,30);

VAR9:=EMA(VAR8,30);

VAR10:=3*VAR8-2*VAR9;

势:=EMA(VAR10,5);

DRAWTEXT(crOSS(10,势),69,'进'),COLORYELLOW;

DRAWTEXT(CROSS(10,势),58,'入'),COLORFF00FF;

DRAWTEXT(CROSS(10,势),43,'异'),COLOR00C0FF;

DRAWTEXT(CROSS(10,势),31,'动[]'),COLORFFFF6F;

DRAWTEXT(CROSS(10,势),19,'区'),COLORB47DFF;

{长线持股}{含未来函数：DRAWLINE当天出现信号可择机介入，明日买、卖需观察}

A7:=C-REF(C,1);

A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(Abs(A7),6),6);

SHORT:=7;LONG:=19;

RMA:=EMA(CLOSE,SHORT);

NMA:=EMA(CLOSE,LONG);

UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV

(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV

(H,BARSLAST(CROSS(RMA,NMA))+1),HHV

(H,BARSLAST(CROSS(RMA,NMA))+1),0);

DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV

(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV

(L,BARSLAST(CROSS(NMA,RMA))+1),LLV

(L,BARSLAST(CROSS(NMA,RMA))+1),0);

买进:=(LLV(A8,2)=LLV(A8,7)ANDCOUNT(A80,2)AND

CROSS(A8,MA(A8,2)))ANDREF(DOWN,1)REF(DOWN,2)ANDUPREF(DOWN,1);

STICKLINE(买进,0,45,1.3,0),COLOR000088;

STICKLINE(买进,0,45,0.9,0),COLOR0000AA;

STICKLINE(买进,0,45,0.6,0),COLOR0000CC;

STICKLINE(买进,0,45,0.2,0),COLOR0000FF;

DRAWTEXT(买进,43,'长线持股'),COLORRED,LINETHICK1;

{共振}

RV:=(CLOSE-LLV(LOW,33))/(HHV(HIGH,33)-LLV(LOW,33))*100;

RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;

VAR44:=SMA(RV,3,1);

VAR55:=SMA(VAR44,3,1);

KK:=EMA(SMA(RG,3,1),2),COLORFFFFFF;

JJ:=SMA(KK,3,1),COLOR00FFFF;

共振点:=(CROSS(VAR44,VAR55)ANDCROSS(KK,JJ));

STICKLINE(共振点0,0,35,1.3,0),COLOR008888;

STICKLINE(共振点0,0,35,0.9,0),COLOR00AAAA;

STICKLINE(共振点0,0,35,0.6,0),COLOR00DDDD;

STICKLINE(共振点0,0,35,0.2,0),COLOR00FFFF;

DRAWTEXT(共振点0,33,'共振'),COLOR00FF00;

{涨}

VAR1:=EMA(CLOSE,3);

VAR2:=EMA(CLOSE,21);

VAR3:=BARSLAST(CROSS(VAR2,VAR1))15;

VAR4:=volMA(VOL,5)*2ANDVOLMA(VOL,5)*5;

VAR5:=CROSS(VAR1,VAR2)ANDVAR4ANDVAR3;

STICKLINE(VAR5,0,25,1.3,0),COLOR008800;

STICKLINE(VAR5,0,25,0.9,0),COLOR00AA00;

STICKLINE(VAR5,0,25,0.6,0),COLOR00CC00;

STICKLINE(VAR5,0,25,0.2,0),COLOR00FF00;

DRAWTEXT(VAR5,23,'★涨'),COLOR00FF00;

{kdJ没有未来函}

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

K:SMA(RSV,3,1),COLOR00FFFF,LINETHICK2;

D:SMA(K,3,1),COLORWHITELINETHICK2;

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

IF(JREF(J,1),J,DRAWNULL),COLORGREEN,LINETHICK2;

{KDJ相交红蓝球}

DRAWICON(CROSS(J,D)ANDCROSS(J,K),5,13);

DRAWICON(CROSS(D,J)ANDCROSS(K,J),95,14);

{逃}

DRAWTEXT(CROSS(80,rsi),95,'★逃'),COLORWHITELINETHICK1;

{顶}

VAR22:=1;

VAR23:=((((2*CLOSE)+HIGH)+LOW)/4);

VAR24:=LLV(LOW,5);

VAR25:=HHV(HIGH,4);

B1:=(EMA((((VAR23-VAR24)/(VAR25-VAR24))*100),4)*VAR22);

B2:=(EMA(((0.667*REF(B1,1))+(0.333*B1)),2)*VAR22);

TJ4:=CROSS(B2,B1)ANDREF(B1,1)80;

DRAWTEXT(TJ4,102,'★顶'),COLOR00FFFFLINETHICK1;

{今买明卖}

MA111:=MA(CLOSE,20);

MA112:=MA(CLOSE,40);

MA113:=MA(CLOSE,60);

A11:=OPENMA111OROPENMA112OROPENMA113,COLORRED;

A12:=CMAX(MA111,MAX(MA112,MA113)),COLORRED;

A13:=V/MA(V,30)1.2,COLORRED;

A14:=C/REF(C,1)1.049,COLORRED;

今买明卖:IF(A11ANDA12ANDA13ANDA14,45,0),COLORWHITELINETHICK2;

DRAWTEXT(今买明卖0.9,40,'今买明卖'),COLORWHITELINETHICK1;

{短买}

你:=MA(CLOSE,1);

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

老板:=MA(老,5);

买卖:=LLV(老板,10);

短买:IF(LLV((你买卖),5),15,0),COLOR00FFFFLINETHICK2;

{当大牛\中牛\短牛同一天出现时,果断买入}{含未来函数：DRAWLINE暴跌途中慎用!!}

VAR20:=C-REF(C,1);

VAR21:=100*EMA(EMA(VAR20,6),6)/EMA(EMA(ABS(VAR20),6),6);

MA5:=EMA(C,5);

MA13:=EMA(C,13);

UP1:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS

(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS

(MA5,MA13))+1),0),COLOR0000FF;

DOWN1:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS

(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS

(MA13,MA5))+1),0),COLOR00FF00;

BT:=(LLV(VAR21,2)=LLV(VAR21,7)ANDCOUNT(VAR210,2)ANDCROSS(VAR21,MA(VAR21,2)))AND

REF(DOWN1,1)REF(DOWN1,2)ANDUP1REF(DOWN1,1);

0,COLORFF00FF;

DRAWTEXT(BT,30,'短牛'),COLOR00FFFF;

TJ1:=REF(DOWN1,1)REF(DOWN1,2)ANDUP1REF(DOWN1,1)ANDCH