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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → TISREMIAN返回一直是0

   

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


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

主题:TISREMIAN返回一直是0

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


加好友 发短信
等级:新手上路 帖子:60 积分:405 威望:0 精华:0 注册:2010/11/9 11:12:51
  发帖心情 Post By:2011/3/10 22:57:09    Post IP:218.82.132.40[只看该作者]

以下的代码是1分钟周期的,在每分钟的30-50秒间根据头寸数挂单后查询是否有未成交订单。 用3秒轮询后台交易,但是每次下单成功后remain始终等于0;

CUTL  是平多数量;CUTS是平空数量;BUYL买多数量;BUYS买空数量;

 

CURRENT_SECOND:=MOD(CURRENTTIME,100);

IF CURRENT_SECOND>30 AND CURRENT_SECOND<=50 then
BEGIN
 TSELL(CUTL>0,CUTL,LMT,CLOSE+3*MINDIFF);
 TSELLSHORT(CUTS>0,CUTS,LMT,CLOSE-3*MINDIFF);
 TBUY(BUYL>0,BUYL,LMT,CLOSE-3*MINDIFF);
 TBUYSHORT(BUYS>0,BUYS,LMT,CLOSE+3*MINDIFF);

 REMAIN:=tisremain(0),LINETHICK0;
 TCANCEL(remain<>0,0);
  debugfile('c:\autotrading.txt','REMAIN=%.0f',REMAIN);
END

 

[此贴子已经被作者于2011-3-10 23:03:00编辑过]

 回到顶部