您现在的位置:程序化交易>> 期货公式>> 交易开拓者(TB)>> 开拓者知识>>正文内容

只开仓一次,为啥这段代码时间到了怎么不开仓? [开拓者 TB]

  • 咨询内容:
    1. //------------------------------------------------------------------------
    2. // 简称: auto
    3. // 名称: auto
    4. // 类别: 公式应用
    5. // 类型: 用户应用
    6. //------------------------------------------------------------------------

    7. Vars
    8.                  StringSeries code;
    9.                  StringSeries num;
    10.                  StringSeries type;
    11.                  Numeric send_order_finished;
    12.                  Numeric order_num;
    13. Begin   
    14.                  If(CurrentBar==0 ) {Return;}
    15.          code = GetTBProfileString2File("D:\\TB.txt","ORDER1","Code");
    16.          Commentary("code:"+code);
    17.                  num = GetTBProfileString2File("D:\\TB.txt","ORDER1","Num");
    18.          Commentary("num:"+num);  
    19.                  type = GetTBProfileString2File("D:\\TB.txt","ORDER1","Type");
    20.          Commentary("type:"+type);
    21.                  send_order_finished = GetGlobalVar(0);
    22.                  Commentary("send_order_finished:"+Text(send_order_finished));
    23.                  order_num=Value(num);
    24.                  If (CurrentTime>0.114000 && send_order_finished==InvalidNumeric)
    25.                  {
    26.                         If (Type=="Buy")
    27.                         {
    28.                                 Data0.A_SendOrder(Enum_Buy,Enum_Entry,order_num,Close);
    29.                         }
    30.                         If (Type=="Sell")
    31.                         {
    32.                                 Data0.A_SendOrder(Enum_Sell,Enum_Entry,order_num,Close);
    33.                         }

    34.                         send_order_finished=1;
    35.                         SetGlobalVar(0,send_order_finished);
    36.                   }
    37.                   
    38.                  //SetTBProfileString2File("D:\\TB.txt","ORDER1","Code","IF1603");
    39.                  //SetTBProfileString2File("D:\\TB.txt","ORDER2","Code","IF1604");
    40.                  //SetTBProfileString2File("D:\\TB.txt","ORDER3","Code","IF1605");
    41.                  //SetTBProfileString2File("D:\\TB.txt","ORDER1","Num","100");
    42.                  //SetTBProfileString2File("D:\\TB.txt","ORDER2","Num","200");
    43.                  //SetTBProfileString2File("D:\\TB.txt","ORDER3","Num","300");  
    44.                  //SetTBProfileString2File("D:\\TB.txt","ORDER1","Type","Sell");  
    45.                  //SetTBProfileString2File("D:\\TB.txt","ORDER2","Type","Buy");  
    46.                  //SetTBProfileString2File("D:\\TB.txt","ORDER3","Type","Sell");  
    47. End     
    48.    
    49. //------------------------------------------------------------------------
    50. // 编译版本        GS2015.12.25
    51. // 用户版本        2016/03/10 10:37:39
    52. // 版权所有        akward
    53. // 更改声明        TradeBlazer Software保留对TradeBlazer平台
    54. //                        每一版本的TradeBlazer公式修改和重写的权利
    55. //------------------------------------------------------------------------

     

  • TB技术人员:

     

  • TB客服: 使用a_xxxx的发单 没有限制在最后K线上这一条件吗??
    这样是可能导致在历史K线上就满足其它条件,导致条件内的数据被修改,而事实上因为不在最后K线所以委托单还没有发出去呀。。
    建议上层条件加上 if(barstatus==2)的限制。
    其次,公式里需要加上调试语句,例如fileappend等来记录各条件的状态值这样才好定位问题,并进行修正。

     

  • 网友回复: great!
    搞定,多谢小米!

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 511411198  点击这里给我发消息进行 有偿 编写!不贵!点击查看价格!


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容