具有量比的分时资金指标

最近看到不少分时指标，也做了一个带有量比的分时资金指标：
本指标可以显示主动买入资金（万元），主动卖出资金（万元），净买资金（万元），分时量比（与股票软件当时显示相同，相当于在分时指标图上动态记录了当天的量比变化）四个数据。

特别说明：默认周期为分笔成交

分时资金源码：

a1:=0.01*vol*close;
a2:=SUM((IF(((a1>40) AND (CLOSE>(REF(CLOSE,1)))),a1,0)),0);
a3:=SUM((IF(((a1>40) AND (CLOSE<(REF(CLOSE,1)))),a1,0)),0);
a4:=SUM((IF(((a1<40) AND (CLOSE>(REF(CLOSE,1)))),a1,0)),0);
a5:=SUM((IF(((a1<40) AND (CLOSE<(REF(CLOSE,1)))),a1,0)),0);
主动买入万元:a2+a4,linethick3,ColorFF55FF;
主动卖出万元:(a3+a5),linethick3,ColorFFFF55;
净买资金万元:(a2+a4)-(a3+a5);
分时量比:sum(vol,0)*240/dynainfo(38)/barscount(c);