TB老师，问题还是依然存在。

yuezongqi

1. Params
   
2.     Numeric Para1(10);
   
3.     Numeric StopLossSet(10);
   
4. Vars
   
5.     NumericSeries Ma1;
   
6.         Bool Condition1;
   
7.         Bool Condition2;
   
8.         Numeric MinPoint;
   
9.         Numeric MyEntryPrice;
   
10.         Numeric MyExitPrice;
    
11.        
    
12. Begin
    
13.         MinPoint=MinMove*PriceScale;
    
14.         MyEntryPrice=LastEntryPrice;  //上次 的开仓价格
    
15.     Ma1=Average(Close,Para1);
    
16.         Condition1 = CrossOver(Close[1],Ma1[1]);
    
17.         Condition2 =CrossUnder(Close[1],Ma1[1]);
    
18.     If(MarketPosition==0)  //无持仓的情况
    
19.         {
    
20.             if(Condition1)
    
21.                 {
    
22.                         Buy(1,Open);
    
23.                 }else if(Condition2)
    
24.                 {
    
25.                     SellShort(1,Open);
    
26.                 }
    
27.         }else if(MarketPosition==-1)  //持空仓的情况
    
28.         {
    
29.            if(Condition1)
    
30.            {
    
31.                     BuyToCover(1,Open);
    
32.                     Buy(1,Open);
    
33.              
    
34.            }else if(High >= MyEntryPrice + StopLossSet*MinPoint)// 止损条件表达式
    
35.            {
    
36.            MyExitPrice = MyEntryPrice + StopLossSet*MinPoint;
    
37.            If(Open > MyExitPrice)  MyExitPrice = Open;      // 如果该Bar开盘价有跳空触发，则用开盘价代替
    
38.            BuyToCover(1,MyExitPrice);
    
39.                    Buy(1,MyExitPrice);
    
40.                   //FileAppend("c:\\11.Log",Text(Time)+"   "+Text(MyExitPrice));
    
41.         }
    
42. 
    
43.         } Else if (MarketPosition==1)  //持多仓的情况下
    
44.         {
    
45.             If(Condition2)
    
46.             {
    
47.                         Sell(1,Open);
    
48.                     SellShort(1,Open);
    
49.             }else if(Low <= MyEntryPrice - StopLossSet*MinPoint)// 止损条件表达式
    
50.         {
    
51.             MyExitPrice = MyEntryPrice - StopLossSet*MinPoint;
    
52.             If(Open < MyExitPrice) MyExitPrice = Open;      // 如果该Bar开盘价有跳空触发，则用开盘价代替
    
53.             Sell(1,MyExitPrice);
    
54.                         SellShort(1,MyExitPrice);
    
55.                         //FileAppend("c:\\11.Log",Text(Time)+"   "+Text(MyExitPrice));
    
56.         }
    
57. 
    
58.         }
    
59. End

复制代码

老师，有一个问题，就是在开仓的那根Bar上面如果出现止损的话，程序没有执行止损。
请问老师像这种情况怎么解决。

yuezongqi

问题就是,开仓条件成立，这根K线上面就不能止损了？
请问老师，如何解决这个问题？

lh948

回复 2# yuezongqi


一根bar上同时既开仓又平仓，会有问题的，如果出现类似问题，建议使用更小的周期进行交易。

yuezongqi

老师，如果更改为小周期的话，小周期也会出现极端行情的，而且小周期会增加做单次数，减少收益。

yuezongqi

老师还有其他的解决办法吗？