均换手率:MA(VOL/CAPITAL*100,5),COLORFFFFFF,NODRAW;
虚拟成交量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*210/FROMOPEN,DRAWNULL),NODRAW; STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟成交量,0,2,-1),COLOR00C0C0; 总量:VOL,NODRAW; TJ1:=H=L AND C>REF(C,1) OR C>REF(C,5) OR C>REF(C,9) OR C>REF(C,17); TJ2:=H=L AND C<REF(C,1) OR C<REF(C,5) OR C<REF(C,9) OR C<REF(C,17); EE:=IF(TJ1,0.0001,IF(TJ2,-0.0001,0)){对付一字涨停,并求极限}; JGL_DTC:=(C-OPEN+EE)/(2*(H-L)+ABS(C-O)+3*0.0001); 主买:VOL*(1+JGL_DTC)/2,COLORRED,NODRAW{主动买}; 主卖:VOL*(1-JGL_DTC)/2,COLORFFFF80,NODRAW{主动卖}; MAVOL1:MA(V,5)COLORWHITE; MAVOL2:MA(V,55)COLORYELLOW; MAVOL3:MA(V,135)COLORGREEN; DG1:=(CROSS(MAVOL1,MAVOL2));DG2:=(CROSS(MAVOL1,MAVOL3)); DRAWICON(DG1,VOL*1.05,1); DRAWICON(DG2,VOL*1.1,13); STICKLINE(C>=REF(C,1) AND MAVOL1<MAVOL3 AND V<MAVOL1,VOL,0,7,0),COLOR333333; STICKLINE(C<REF(C,1) AND MAVOL1<MAVOL3 AND V<MAVOL1,VOL,0,7,0),COLOR333333; STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,2,0),COLOR880000; STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,1,0),COLORBB0000; STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,0.5,0),COLORDD0000; STICKLINE(IF(BARSCOUNT(C)=1,C<O,C<REF(C,1)),0,VOL,0.25,0)COLORFF0000; STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,2,0),COLOR008800; STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,1,0),COLOR00AA00; STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,0.5,0),COLOR00DD00; STICKLINE(IF(BARSCOUNT(C)=1,C>=O,C>=REF(C,1)),0,VOL,0.25,0),COLOR00FF00; STICKLINE(主买>0,0,主买,2,0),COLOR000088; STICKLINE(主买>0,0,主买,1,0),COLOR0000AA; STICKLINE(主买>0,0,主买,0.5,0),COLOR0000DD; STICKLINE(主买>0,0,主买,0.25,0),COLOR0000FF; IF(VOL/MA(VOL,60)*100>100,VOL,VOL/0),STICK,COLORWHITE; 量增价平转阳:=VOL>REF(V,1) AND ABS(C-REF(C,1))/REF(C,1)<=0.005; 量增价升买入:=VOL>REF(V,1) AND C>REF(C,1); 量平价升续买:=ABS(VOL-REF(VOL,1))/REF(VOL,1)<=0.05 AND C>REF(C,1); 量减价升持有:=VOL<REF(V,1) AND C>REF(C,1); 量减价平警戒:=VOL<REF(V,1) AND ABS(C-REF(C,1))/REF(C,1)<=0.005; 量减价跌卖出:=VOL<REF(V,1) AND C<REF(C,1); 量平价跌续卖:=ABS(VOL-REF(VOL,1))/REF(VOL,1)<=0.05 AND C<REF(C,1); 量增价跌弃卖:=VOL>REF(V,1) AND C<REF(C,1); 量梯级递增上:=VOL>REF(V,1) AND REF(V,1)>REF(VOL,2); 量梯级递减下:=VOL<REF(V,1) AND REF(V,1)<REF(VOL,2); ZGD:=HHV(V,80)*1; ZGD2:=CONST(ZGD); 情况1:=CONST(IF(量增价平转阳,1,0)); 情况2:=CONST(IF(量增价升买入,1,0)); 情况3:=CONST(IF(量平价升续买,1,0)); 情况4:=CONST(IF(量减价升持有,1,0)); 情况5:=CONST(IF(量减价平警戒,1,0)); 情况6:=CONST(IF(量减价跌卖出,1,0)); 情况7:=CONST(IF(量平价跌续卖,1,0)); 情况8:=CONST(IF(量增价跌弃卖,1,0)); 情况9:=CONST(IF(量梯级递增上,1,0)); 情况10:=CONST(IF(量梯级递减下,1,0)); DRAWTEXT(情况1=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.1),'量增价平'),COLORMAGENTA; DRAWTEXT(情况2=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.4),'量增价升'),COLORMAGENTA; DRAWTEXT(情况3=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.2),'量平价升'),COLORMAGENTA; DRAWTEXT(情况4=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.3),'量减价升'),COLORMAGENTA; DRAWTEXT(情况5=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.1),'量减价平'),COLORMAGENTA; DRAWTEXT(情况6=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.3),'量减价跌'),COLORMAGENTA; DRAWTEXT(情况7=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.2),'量平价跌'),COLORMAGENTA; DRAWTEXT(情况8=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.4),'量增价跌'),COLORMAGENTA; DRAWTEXT(情况9=1 AND CURRBARSCOUNT=60,ZGD2-(ZGD2*0.5),'量梯递增'),COLORMAGENTA; DRAWTEXT(情况10=1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.5),'量梯递减'),COLORMAGENTA; ; |
|