前两天发过一个以涨跌定义的主动买卖量。但写得很烦锁。现重写两个
一个“平随后“，一个“平随前”
把式中的C都改成笔均价 a:=amount/v/100; 或许更好些。。。
这个原码，分析家也可用
原码
平随前
ro:=DYNAINFO(4)-DYNAINFO(3);
rc:=if(BARPOS=1,if(ro>=0,c-0.01,c+0.01),ref(c,1));
wp:=barslast(c<>rc);
zv:sum((c>rc or ref(c>rc,wp))*v,0);
dv:sum((c<rc or ref(c<rc,wp))*v,0);
vv:zv+dv,LINETHICK0;
vc:zv-dv,LINETHICK0;
平随后
ro:=DYNAINFO(4)-DYNAINFO(3);
rc:=if(BARPOS=1,if(ro=0,c,if(ro>0,c-0.01,c+0.01)),ref(c,1));
wp:=barslast(c<>rc);
kv:=sum(BACKSET(ISLASTBAR,wp)*v,wp);
wz:sum((BACKSET(c>rc,ref(wp,1)+1)or c>rc)*v,0)+(ref(c-rc,wp)>0)*kv;
wd:sum((BACKSET(c<rc,ref(wp,1)+1)or c<rc)*v,0)+(ref(c-rc,wp)<0)*kv;
