 |
通达信优化之后的地量倍量副图源码
优化之后的地量倍量附图源码：
VOLUME:VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
{洋红柱阳倍量，鲜绿柱阴倍量；浅蓝柱20日地量；深蓝柱30日地量；浅黄柱60日地量；黄柱120日地量。}
量:=VOL,NODRAW,VOLSTICK;
倍量:=VOL/REF(VOL,1)>2;
A:=MA(VOL,5)-MA(VOL,10);
B:=BACKSET(1,5)/5-BACKSET(1,10)/10;
量差:A/B,NODRAW;
AA1:=VOL<REF(LLV(VOL,20),1);
AA2:=VOL<REF(LLV(VOL,30),1);
AA3:=VOL<REF(LLV(VOL,60),1);
AA4:=VOL<REF(LLV(VOL,120),1);
STICKLINE(AA1,0,V,3,0),COLORFF8080;{20日地量}
STICKLINE(AA2,0,V,3,0),COLORFF8000;{30日地量}
STICKLINE(AA3,0,V,3,0),COLOR4080FF;{60日地量}
STICKLINE(AA4,0,V,3,0),COLORYELLOW;{120日地量};
STICKLINE(倍量 AND C>REF(C,1),0,量,3,0),COLORMAGENTA;{阳倍量}
STICKLINE(倍量 AND C<REF(C,1),0,量,3,0),COLOR11FF11;{阴倍量}
STICKLINE(REFDATE(V,DATE),REFDATE(V,DATE),REFDATE(V,DATE),6,1),DOTLINE,COLORYELLOW;{现量};