知识库 > 金融建模 > 公用函数 > 扩展函数 > .Net扩展函数 > 技术分析 > 成交量指标 > 计算公式

VRSI_f(N,type)    

简述
相对强弱
定义
VRSI_f(N:Integer, type:Integer) : Real/Table
参数

N:天数
Type:结果类型


返回:
Type返回类型
0实数
1数组
2图形

  • 算法
    (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;
    //结果:


相关