知识库 > 金融建模 > 公用函数 > 扩展函数 > .Net扩展函数 > 技术分析 > 成交量指标 > 计算公式
N：天数
Type：结果类型
返回：
QHLSR_f(N,type)
简述
阻力指标
定义
QHLSR_f(N: Integer, type:Integer) : Real/Table
参数
N：天数
Type：结果类型
返回：
| Type | 返回类型 |
| 0 | 实数 |
| 1 | 数组 |
- 算法：
(1)qh = (收盘价-昨收盘价)-(成交量-昨成交量)*(昨最高价-昨最低价)/昨成交量；
(2)若qh>0，则tA=qh，否则tA=0；
(3)若qh<0，则tB=qh的绝对值，否则tB=0；
(4)A = N日的tA之和；
(5)B = N日的tB之和；
(6)阻力指标 = A/(A+B)；
(7)Type=0，返回当前时间的阻力指标；
(8)Type=1，返回当前时间往前推共nDay个N日阻力指标序列。
nDay由系统参数PN_nDay()设置，默认值为180。
(9)与系统证券pn_stock()、系统时间pn_date()、系统周期pn_cycle()、复权方式pn_rate()、复权基准日pn_rateday()、执行点数PN_nDay()相关
范例：
//计算白云机场截止日2011年9月8日的10日阻力指标
oV:=BackUpSystemParameters2();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_cycle(),cy_day());
setsysparam(pn_rate(),0);
setsysparam(pn_date(),inttodate(20110908));
N:=10;
v:= QHLSR_f(N,0);
return v;
//结果：0.45019064
//计算白云机场截止2011年9月8日向前推共5天的10日阻力指标序列。
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:=10;
v:= QHLSR_f(N,1);
return v;
//结果：
相关