(1)AA = |最高价-昨日收盘价|;
(2)BB = |最低价-昨日收盘价|;
(3)CC = |最高价-昨日最低价|;
(4)DD = |昨日收盘价-昨日开盘价|;
(5)若AA>BB且AA>CC,则R=AA+BB/2+DD/4;
(6)若BB>CC且BB>AA,则R=BB+AA/2+DD/4;
(7)若CC>AA且CC>BB,则R=CC+DD/4;
(8)X =(收盘价-昨收盘价)+(收盘价-开盘价)/2+(昨日收盘价-昨日开盘价);
(9)Y =16X / R*(AA和BB中的较大值);
(10)Z =N日Y的累计之和;
(11)Type=0,返回当前时间的价量趋势Z;
(12)Type=1,返回当前时间往前推共nDay个Z的区间序列值;
nDay由系统参数PN_nDay()设置,默认值为180。
范例一:
//计算白云机场截止2011年9月13日的价量趋势。
oV:=BackUpSystemParameters();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_date(),inttodate(20110913));
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
N:=10;
v:=ASI_f(N,0);
RestoreSystemParameters(oV);
return v;
//结果:3.03
范例二:
///计算白云机场截止2011年9月13日向前推共5日的价量趋势。
oV:=BackUpSystemParameters();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_date(),inttodate(20110913));
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_nday(),5);
N:=10;
v:=EMV_f(N,1);
RestoreSystemParameters(oV);
return v;
//结果:
