UpDayPercent2
简述
N日阳线比例(%),与系统证券pn_stock()、系统时间pn_date()和系统周期pn_cycle()有关。调用时需注意设置系统参数。
UpDayPercent2(N:Integer):Real
名称 | 类型 | 说明 |
---|
N | Integer | 整数,统计交易日数 |
返回 | Real | 实数,比例值 |
(1)M=N日内收盘价>=开盘价的天数;
(2)N日上涨比例(%) =M/N*100。
//计算白云机场截止2011年9月13日的60日阳线比例(%)。
oV:=BackUpSystemParameters();
setsysparam(pn_stock(),'SH600004');
setsysparam(pn_date(),inttodate(20110913));
setsysparam(pn_cycle(),cy_day());
N:=60;
v:=UpDayPercent2(N);
RestoreSystemParameters(oV);
return v;
//结果:48.33