精准买卖副图源码 通达信 贴图

系统自带KDJ灵敏度让人有点无所适从,本人自编多周期KDJ的J线3D柱比较好解决了这个问题,有需要拿去。


DRAWGBK(OPEN>0,RGB(185,135,0),RGB(85,55,0),0,'02',0);
NOTEXT顶:100,DOTLINE,COLORLIGRAY;
NOTEXT底:0,DOTLINE,COLORLIGRAY;
NOTEXT分界线:50,DOTLINE,COLORLIGRAY;
均价:=(3*CLOSE+HIGH+LOW+OPEN)/6;
MA1:=EMA(均价,5);
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV1,3,1),COLORWHITE,NODRAW;
D:SMA(K,3,1),COLORYELLOW,NODRAW;
J:=3*K-2*D;
MJ1:=EMA(J,3);
RSV2:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
KB:=SMA(RSV2,3,1);
DB:=SMA(KB,3,1);
JB:=3*KB-2*DB;
MJ2:=EMA(JB,3);
RSV3:=(CLOSE-LLV(LOW,31))/(HHV(HIGH,31)-LLV(LOW,31))*100;
KC:=SMA(RSV3,3,1);
DC:=SMA(KC,3,1);
JC:=3*KC-2*DC;
MJ3:=EMA(JC,3);
RSV4:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
KD:=SMA(RSV4,3,1);
DD:=SMA(KD,3,1);
JD:=3*KD-2*DD;
MJ4:=EMA(JD,3);
JS1:=(3*MJ1+3*MJ2+2*MJ3+MJ4)/9;
过滤:=JS1>REF(JS1,1) AND MJ3>=REF(MJ3,1);
STICKLINE(过滤,0,JS1,3,0),COLOR993333;
STICKLINE(过滤,0,JS1,2.7.5,0),COLOR995533;
STICKLINE(过滤,0,JS1,2.4,0),COLOR996633;
STICKLINE(过滤,0,JS1,2.1,0),COLOR998833;
STICKLINE(过滤,0,JS1,1.8,0),COLOR999966;
STICKLINE(过滤,0,JS1,1.5,0),COLOR999933;
STICKLINE(过滤,0,JS1,1.2,0),COLOR999966;
STICKLINE(过滤,0,JS1,0.9,0),COLOR999988;
STICKLINE(过滤,0,JS1,0.6,0),COLORLIGRAY;
STICKLINE(过滤,0,JS1,0.3,0),COLORCCCCCC;
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
开始控盘:=过滤 AND 控盘>0 AND JS1>REF(JS1,1) AND MJ3>REF(MJ3,1) AND KB>REF(KB,1) AND DB>REF(DB,1);
STICKLINE(开始控盘,0,JS1,3,0),COLOR0000FF;
STICKLINE(开始控盘,0,JS1,2.7,0),COLOR001BFF;
STICKLINE(开始控盘,0,JS1,2.4,0),COLOR0025FF;
STICKLINE(开始控盘,0,JS1,2.1,0),COLOR0039FF;
STICKLINE(开始控盘,0,JS1,1.8,0),COLOR0052FF;
STICKLINE(开始控盘,0,JS1,1.5,0),COLOR006AFF;
STICKLINE(开始控盘,0,JS1,1.2,0),COLOR0089FF;
STICKLINE(开始控盘,0,JS1,0.9,0),COLOR009CFF;
STICKLINE(开始控盘,0,JS1,0.6,0),COLOR00C0FF;
STICKLINE(开始控盘,0,JS1,0.3,0),COLOR00CAFF;
趋势:=MA1>=REF(MA1,1) AND MJ2>REF(MJ2,1) AND MJ4>REF(MJ4,1);
STICKLINE(开始控盘 AND 趋势,0,JS1,0.6,0),COLOR99A9FF;
STICKLINE(开始控盘 AND 趋势,0,JS1,0.3,0),COLOR9999FF;
STICKLINE((CLOSE<OPEN OR CLOSE<REF(CLOSE,1)) AND 过滤,0,JS1*0.5,1.2,0),COLOR668899;
STICKLINE((CLOSE<OPEN OR CLOSE<REF(CLOSE,1)) AND 过滤,0,JS1*0.5,0.9,0),COLOR99CC99;
STICKLINE((CLOSE<OPEN OR CLOSE<REF(CLOSE,1)) AND 过滤,0,JS1*0.5,0.6,0),COLOR66FF66;
STICKLINE((CLOSE<OPEN OR CLOSE<REF(CLOSE,1)) AND 过滤,0,JS1*0.5,0.3,0),COLOR00FF00;
J1:J,COLORWHITE,LINETHICK1;
J2:JS1,COLORFF00FF,LINETHICK2;
J3:MJ4,COLORYELLOW,LINETHICK1;