极地探险

 

CC:=CLOSE;
DD:=DATE;
ZDF:=(CC/REF(CC,1)-1)*100;
HSH:=VOL/IF(CAPITAL>0,CAPITAL,SUM(VOL,120))*100;
a1:=close;
a2:=high;
a3:=low;
Rd:=DATE;
zf:=(c/ref(c,1)-1)*100;
hs:=v/capital*100;
Lb:=240*v/OPENMINUTES(CURRENTTIME)/ref(ma(v,5),1);//Lb:v/ref(ma(v,5),1);//

drawgbk(c,colorrgb(16,32,128),colorrgb(225,225,225),1);
s:=ema((c-ma(c,7))/ma(c,7),7)*10000000,linethick0,colorffffff;
sa:=ma(s,21);
b:=if(s<0,-(s),0);
s1:=s<ref(s,1) and s>0;
s2:=s<ref(s,1) and s<0;
fillrgn(s>=0,0,s),colorffffff;
fillrgn(s1,0,s),colordddddd;
stickline(s2,0,-(s),1,1),colorffffff;
b:=if(s<0,-(s),0);
bs:=b,pointdot,colorffffff;
drawicon(s>0,0,12);
drawicon(s<0,0,11);
stickline(cross(s,sa) and sa<-300000,b*0.2,b,1,0),pointdot,colorffffff;
stickline(cross(s,sa) and sa<-300000,b*0.5,b,6,0),colorffffff;
drawicon(cross(s,sa) and sa<-300000,b*1.05,8);
cdp:=(ref(h,1)+ref(l,1)+ref(c,1)*2)/4;
明日预测：最高:cdp+ref(h,1)-ref(l,1),linethick0,colorff;
近高:cdp*2-ref(l,1),linethick0,colorff33ff;
中间价:cdp,linethick0,colorbbbbbb;
近低:cdp*2-ref(h,1),linethick0,colorffff00;
最低:cdp-ref(h,1)-ref(l,1),linethick0,colorff00;
DRAWTEXT(sysparam(2)=BARPOS,c,' '+BLKNAME),COLORccffcc,ALIGN4;//板块
上市年:REF(YEAR,BARSCOUNT(C)-1),LINETHICK0,COLORGREEN;
月:REF(MONTH,BARSCOUNT(C)-1),LINETHICK0,COLORMAGENTA;