欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 数组越界,管理员能帮我看一下吗?

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2024人关注过本帖树形打印复制链接

主题:数组越界,管理员能帮我看一下吗?

帅哥哟,离线,有人找我吗?
gongxiangban
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:387 积分:868 威望:0 精华:0 注册:2012/10/17 9:08:12
数组越界,管理员能帮我看一下吗?  发帖心情 Post By:2014/10/30 13:33:42    Post IP:222.76.202.46[只看该作者]


{VOL监视器
所有品种的主力合约
周期:1小时,日线
只在K线收出前5分钟发出提示框

初始报警条件:当前成交量,大于10根K线成交量均值3倍}

variable:value[41]='null';
{中金所}
vaule[0]:='if00'; //股指
value[1]:='tf00';//国债
{郑州}
value[2]:='wh00';//强麦
value[3]:='pm00';//普麦
value[4]:='cf00';//棉花
value[5]:='sr00';//白糖
value[6]:='ta00';//PTA
value[7]:='oi00';//菜籽油
value[8]:='ri00';//早籼稻
value[9]:='me00';//甲醇
value[10]:='fg00';//玻璃
value[11]:='rs00';//油菜籽
value[12]:='rm00';//菜粕
value[13]:='tc00';//动力煤
value[14]:='jr00';//粳稻
value[15]:='lr00';//晚籼稻
value[16]:='sf00';//硅铁
value[17]:='sm00';//锰硅
{大连}
value[18]:='c00';//玉米
value[19]:='a00';//豆一
value[20]:='b00';//豆二
value[21]:='m00';//豆粕
value[22]:='y00';//豆油
value[23]:='p00';//棕榈油
value[24]:='jd00';//鸡蛋
value[25]:='bb00';//胶合板
value[26]:='fb00';//纤维板
value[27]:='l00';//聚乙烯
value[28]:='v00';//PVC
value[29]:='pp00';//聚丙烯
value[30]:='j00';//焦炭
value[31]:='jm00';//焦煤
value[32]:='i00';//铁矿石
{上海}
value[33]:='cu00';//铜
value[34]:='al00';//铝
value[35]:='zn00';//锌
value[36]:='pb00';//铅
value[37]:='au00';//黄金
value[38]:='ag00';//白银
value[39]:='rb00';//螺纹钢
value[40]:='wr00';//线材
//热轧卷板
//燃料油
//石油沥青
//天然橡胶
//value[1]='if00';
VARIABLE:stockValueTotal=0;
tt:=time0-timetot0(currenttime);
if ( tt<300 ) then begin  
for i:=0 to 40 do 
begin 
if (strcmp(value[i],'null')<>0) then 
begin
{1小时}
for j:=1 to n do 
begin 
 stockValueTotal:=stkindi(value[i],'vol',0,5,-j) + stockValueTotal ;
end;
stockMaValue:= stockValueTotal/n;
stockValue:= stkindi(value[i],'vol',0,5,-j);
if (stockValue>stockMaValue*3) then 
begin
msgout(tt>300,value[i]);
end;
{1日}
for j:=1 to n do 
begin 
 stockValueTotal:=stkindi(value[i],'vol',0,6,-j) + stockValueTotal ;
end;
stockMaValue:= stockValueTotal/n;
stockValue:= stkindi(value[i],'vol',0,6,-j);
if (stockValue>stockMaValue*3) then 
begin
msgout(tt>300,value[i]);
end;
end;
end;
end;

N默认是10

 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2014/10/30 13:38:40    Post IP:58.246.57.26[只看该作者]



金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

 回到顶部