算法:
(1)若收盘价>昨收盘价,B=成交量;
若收盘价<=昨收盘价,B=0;
(2)若收盘价<昨收盘价,L=成交量;
若收盘价>=昨收盘价,L=0;
(3)若收盘价=昨收盘价,E=成交量;
若收盘价<>昨收盘价,E=0;
(4)EXB=N日B的累计之和;
(5)EXL=N日L的累计之和;
(6)EXE=N日E的累计之和;
(7)Z=(EXB*2+EXE)/(EXL*2+EXE)*100;
(8)ZMA=M日的Z的简单平均;
(9)Type=0,返回当前时间的Z、ZMA;
(10)Type=1,返回当前时间往前推共nDay个Z、ZMA序列。
nDay由系统参数PN_nDay()设置,默认值为180。
(11)与系统证券pn_stock()、系统时间pn_date()、系统周期pn_cycle()、复权方式pn_rate()、复权基准日pn_rateday()、执行点数PN_nDay()相关
范例:
//计算白云机场截止日2011年9月8日的成交量变异率。
oV:=BackUpSystemParameters2();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_date(),inttodate(20110908));
N:=23;
M:=6;
v:=VR_f(N,M,0);
return v;
//结果:
//计算白云机场截止2011年9月8日向前推共5天的成交量变异率序列。
oV:=BackUpSystemParameters2();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_date(),inttodate(20110908));
setsysparam(pn_nday(),5);
N:=23;
M:=6;
v:=VR_f(N,M,1);
return v;
//结果: