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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件金字塔软件问题提交 → 同一台电脑上同时运行两个软件的问题

   

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


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

主题:同一台电脑上同时运行两个软件的问题

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


加好友 发短信
等级:论坛游侠 帖子:131 积分:0 威望:0 精华:0 注册:2016/8/27 12:09:41
  发帖心情 Post By:2017/9/19 16:49:12 [只看该作者]


TT0 := timetot0(CLOSETIME(0));
TT1 := timetot0(CLOSETIME(1));
TT2 := timetot0(CLOSETIME(2));
TT3 := timetot0(CLOSETIME(3));
TQ := IF((time0>TT0-60 and time0<TT0+1) or (time0>TT1-60 and time0<TT1+1) or (time0>TT2-60 and time0<TT2+1) or (time0>TT3-60 and time0<TT3+1),38,0);
Titime := (time0-timetot0(dynainfo(207))<=tq) or NOT(islastbar);
if Titime then begin
    开多 :BUY(KD AND HOLDING=0,2,MARKETR);       //开多信号
    平多1:SELL(Holding>1 AND PD1,1,MARKET);     //平多信号PD1,平仓一半;
    平多2 :SELL(PD2,holding,MARKET);           //平多信号PD2,全部平仓;
 End

//以下为测试输出,检测提前下单的情形;  
 if Islastbar then
begin
DEBUGFILE('D:\TST918.TXT','       PD1: '&numtostr(PD1,0)&'  PD2: '&numtostr(PD2,0)&'   Titime: '&numtostr(Titime,0),0);   //输出平仓条件
end

 if islastbar then
 BEGIN
  DEBUGFILE('D:\TST918.TXT','holding:%.0f ',holding);//输出HOLDING
 end  

持仓 :holding,linethick0,ColorYellow;
//资产 :asset,LINETHICK0;


 回到顶部
总数 67 1 2 3 4 5 6 7 下一页