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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件策略编写求助区 → 简单的后台模型,麻烦帮忙修改

   

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


  共有11300人关注过本帖平板打印复制链接

主题:简单的后台模型,麻烦帮忙修改

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


加好友 发短信
等级:论坛游民 帖子:271 积分:730 威望:0 精华:0 注册:2011/6/22 15:58:05
  发帖心情 Post By:2013/2/22 16:07:41 [只看该作者]

终于说到重点了,能否用下面您帮我写的系统,帮我改一个,以后就可以作参考

SS:=1; //手数
EXTGBDATASET('POSITIONAA',0);

MAA:MA(C,5);

BPK:=CROSS(H,MAA);
SPK:=CROSS(MAA ,L);


if bpk and EXTGBDATA('POSITIONAA')=0 then begin

tsellshort(tholding<>0,ss,mkt);

tbuy(tholding=0,ss,mkt);

EXTGBDATASET('POSITIONAA',1);

end


if spk and EXTGBDATA('POSITIONAA')=0 then begin

tsell(tholding<>0,ss,mkt);
tbuyshort(tholding=0,ss,mkt);

EXTGBDATASET('POSITIONAA',-1);

end


IF BPK AND EXTGBDATA('POSITIONAA')=-1 AND TENTERBARS>=1 THEN BEGIN
tsellshort(tholding<>0,ss,mkt);
TBUY(1,SS,MKT);
EXTGBDATASET('POSITIONAA',1);
END


IF SPK AND EXTGBDATA('POSITIONAA')=1 AND TENTERBARS>=1 THEN BEGIN
tsell(tholding<>0,ss,mkt);
TBUYSHORT(1,SS,MKT);
EXTGBDATASET('POSITIONAA',-1);
END


if time>=150500 then begin
tsell(tholding<>0,0,mkt);
tsellshort(tholding<>0,0,mkt);

EXTGBDATASET('POSITIONAA',0);

end


仅供参考

 

非常感谢

[此贴子已经被作者于2013-2-22 16:08:14编辑过]


查看使用道具详细信息
悬赏金币帖,要悬赏 0 个金币
 回到顶部
总数 29 1 2 3 下一页