如何實現信號出現后延時數秒發送委托單

回復 4# hal5667


判斷收到成交回報需要使用
if(A_OrderStatus==Enum_Filled)

• 咨詢內容： 就是出現信號不馬上發送，延時2－3秒這樣發送單子。能實現這樣的功能不

   

• TB技術人員： 回復 1# hal5667
  
  
  請參考這段代碼：
  以下代碼把平倉和反手進行延時處理
  1. Params
  
  
  2.         Numeric FastLength(5);
  
  
  3.         Numeric SlowLength(20);
  
  
  4.         Numeric DelayTicks(5);
  
  
  5. Vars
  
  
  6.         NumericSeries AvgValue1;
  
  
  7.         NumericSeries AvgValue2;
  
  
  8.         Numeric LastBarTime;
  
  
  9.         Numeric TickCounter;
  
  
  10. Begin
  
  
  11.         AvgValue1 = AverageFC(Close,FastLength);
  
  
  12.         AvgValue2 = AverageFC(Close,SlowLength);
  
  
  13.        
  
  
  14.         LastBarTime = GetGlobalVar(0);
  
  
  15.         TickCounter = GetGlobalVar(1);
  
  
  16.         If(BarStatus==2 && LastBarTime != Time)
  
  
  17.         {
  
  
  18.                 LastBarTime = Time;
  
  
  19.                 TickCounter = 0;
  
  
  20.         }
  
  
  21.        
  
  
  22.         If(MarketPosition <>1 && AvgValue1[1] > AvgValue2[1])
  
  
  23.         {
  
  
  24.                 If(MarketPosition==0 || BarStatus!=2)
  
  
  25.                 {
  
  
  26.                         Buy(1,Open);
  
  
  27.                 }Else
  
  
  28.                 {
  
  
  29.                         BuyToCover(1,Open);
  
  
  30.                         If(TickCounter==0)
  
  
  31.                         {
  
  
  32.                                 TickCounter = 1;
  
  
  33.                         }else If(TickCounter < DelayTicks)
  
  
  34.                         {
  
  
  35.                                 TickCounter = TickCounter + 1;                       
  
  
  36.                         }else
  
  
  37.                         {
  
  
  38.                                 Buy(1,Open);
  
  
  39.                         }
  
  
  40.                 }
  
  
  41.         }
  
  
  42.        
  
  
  43.         If(MarketPosition <>-1 && AvgValue1[1] < AvgValue2[1])
  
  
  44.         {
  
  
  45.                 If(MarketPosition==0 || BarStatus!=2)
  
  
  46.                 {
  
  
  47.                         SellShort(1,Open);
  
  
  48.                 }Else
  
  
  49.                 {
  
  
  50.                         Sell(1,Open);
  
  
  51.                         If(TickCounter==0)
  
  
  52.                         {
  
  
  53.                                 TickCounter = 1;
  
  
  54.                         }else If(TickCounter < DelayTicks)
  
  
  55.                         {
  
  
  56.                                 TickCounter = TickCounter + 1;                       
  
  
  57.                         }else
  
  
  58.                         {
  
  
  59.                                 SellShort(1,Open);
  
  
  60.                         }
  
  
  61.                 }
  
  
  62.         }
  
  
  63.        
  
  
  64.         SetGlobalVar(0,LastBarTime);       
  
  
  65.         SetGlobalVar(1,TickCounter);
  
  
  66. End
  復制代碼

   

• TB客服： 謝謝  

   

• 網友回復： 那實現K線出現有第一個成交回報的時候再發送也是把DelayTicks調成1就得了是嗎?

   

• 網友回復：