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

VR_f(N,M ,type)    

简述
成交量变异率。
定义
VR_f(N:Integer,M:Integer, type:Integer) : Table
参数

N:天数
M:天数
Type:结果类型


返回:数组,成交量变异率
  • 算法:
    (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;
    //结果:


相关