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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件金字塔软件问题提交 → 全局数组定义的问题

   

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


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

主题:全局数组定义的问题

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


加好友 发短信
等级:新手上路 帖子:3 积分:86 威望:0 精华:0 注册:2010/8/16 17:25:26
全局数组定义的问题  发帖心情 Post By:2012/3/13 15:47:33 [显示全部帖子]

定义全局数组后,K线图的y轴范围下限就被改成0了
Variable:PosLast[20]=0;

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


加好友 发短信
等级:新手上路 帖子:3 积分:86 威望:0 精华:0 注册:2010/8/16 17:25:26
  发帖心情 Post By:2012/3/13 15:56:23 [显示全部帖子]

Variable:PosLast[20]=0;
Variable:PosNo=0;


if PosNo>=1 then
begin
for i=1 to PosNo do PosLast[i]:=PosLast[i]+1;
end;

EntCond1:=1;// 
EntCond2:=weekday()=5;
EntCond3:=1;

EntCond:=EntCond1 and EntCond2 and EntCond3; 

StopCond1:=PosLast[1]=14;
StopCond2:=0;
StopCond3:=0;

StopCond:=StopCond1 or StopCond2 or StopCond3; 


if EntCond then
begin
开多:buy(1,1,thisclose);
PosNo:=PosNo+1;
end;
if holding<>0 then
begin
if StopCond then 
begin
平多:sell(1,1,thisclose);
for i=1 to PosNo-1 do PosLast[i]:=PosLast[i+1];
PosLast[PosNo]:=0;
PosNo:=PosNo-1;
end;
end;


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


加好友 发短信
等级:新手上路 帖子:3 积分:86 威望:0 精华:0 注册:2010/8/16 17:25:26
  发帖心情 Post By:2012/3/13 16:10:42 [显示全部帖子]

你把代码存成交易系统应用在豆粕1301上就能看到了,谢谢!

 回到顶部