算法
(1)EX = 成交量–昨成交量;
(2)若EX<0,则EX1=0,EX2= -EX;若EX>=0,则EX1=EX2=EX
(3)z1 = N日的EX1平滑移动平均,权重为1;
(4)z2 = N日的EX2平滑移动平均,权重为2;
(5)相对强弱=z1/z2*100;
(6)Type=0,返回当前时间的相对强弱;
(7)Type=1,返回当前时间往前推共nDay个相对强弱的序列
nDay由系统参数PN_nDay()设置,默认值为180。
(8)与系统证券pn_stock()、系统时间pn_date()、系统周期pn_cycle()、复权方式pn_rate()、复权基准日pn_rateday()、执行点数PN_nDay()相关。
范例:
//计算白云机场截止日2011年9月8日的6日相对强弱。
oV:=BackUpSystemParameters2();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_date(),inttodate(20110908));
N:=6;
v:=VRSI_f(N,0);
return v;
//结果:88.41
//计算白云机场截止2011年9月8日向前推共5天的6日相对强弱序列。
oV:=BackUpSystemParameters();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_date(),inttodate(20110908));
setsysparam(pn_nday(),5);
N:=6;
v:=VRSI_f(N,1);
return v;
//结果:
//计算白云机场截止2011年9月8日向前推共5天的6日相对强弱图形。
oV:=BackUpSystemParameters();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_date(),inttodate(20110908));
setsysparam(pn_nday(),5);
N:=6;
v:=VRSI_f(N,2);
return v;
//结果: