复制内容到剪贴板
代码:
DRAWGBKlast(DATE>900101,strip(RGB(10,10,10),RGB(0,0,140),0));
{13KDJ}
VAR13:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K1:=SMA(VAR13,3,1);
D1:=SMA(K1,9,1);
j13:3*K1-2*D1;
PARTLINE(j13,(j13>REF(j13,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),LINETHICK4;
{27KDJ}
VAR21:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
K2:=SMA(VAR21,3,1);
D2:=SMA(K2,9,1);
j27:3*K2-2*D2;
PARTLINE(j27,(j27>REF(j27,1))-1,rgb(0,200,100),1,rgb(200,100,0) ),LINETHICK2;
{34KDJ}
VAR34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K3:=SMA(VAR34,3,1);
D3:=SMA(K3,9,1);
j34:3*K3-2*D3,COLORFF8800,LINETHICK1;
{55KDJ}
VAR55:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K55:=SMA(VAR55,3,1);
D55:=SMA(K55,9,1);
j55:3*K55-2*D55,COLORFF00ff,LINETHICK1;
{大盘KDJ}
CC1:=EMA(INDEXC,500)/EMA(C,500);
DC1:=INDEXO/CC1; DC2:=INDEXH/CC1;
DC3:=INDEXL/CC1; DC4:=INDEXC/CC1;
VARDC:=(DC4-LLV(DC3,27))/(HHV( DC2,27)-LLV( DC3,27))*100;
KDC:=SMA(VARDC,3,1);
DDC:=SMA(KDC,9,1);
jDC:3*KDC-2*DDC,COLOR00ffFF;
PARTLINE(jDC,(jDC>REF(jDC,1))-1,rgb(60,200,60),1,rgb(200,60,60) ),POINTDOT,LINETHICK6;
DIBU:= K1<20 AND D1<20 AND K2<20 AND D2<20 AND K3<20 AND D3<20 AND D55<20;
STICKLINE(DIBU=1,-2,22,6,0),COLORRED;
TOBU:= K3>80 AND K2>80 ;
STICKLINE(TOBU=1,100,78,6,0) ,COLORGREEN;
100;50;-2;
DRAWTEXTABS(5,5,'{不同周期KDJ共振,只要有3组 J, 在100上集结要逃顶，在0下边集结必见底}, '),Color1F8BFD,LINETHICK3;
DRAWTEXTABS(5,25,'{还要关注大盘KDJ的共振,}, '),Color00ffff,LINETHICK3;
a1:=(c-ma(c,250))/ma(c,250);
选股:DIBU and a1<-0.54(可调);
