关于移仓换月的代码该如何添加　[开拓者 TB]

 来源:CXH99.COM

1. Params
   
2. Bool IsRollover(true);//是否后复权
   
3. Bool IsRolloverRealPrice(true);//是否映射真实价格
   
4. Bool IsAutoSwapPosition(true);//是否自动换仓
   
5. Numeric FastLength(5);// 短期指数平均线参数
   
6.         Numeric SlowLength(20);// 长期指数平均线参数
   
7. Vars
   
8.         Series<Numeric> AvgValue1;
   
9.         Series<Numeric> AvgValue2;
   
10. Events
    
11. OnInit()
    
12. {
    
13. Range[0:DataCount-1]
    
14. {
    
15. If(IsRollover)
    
16. {
    
17. AddDataFlag(Enum_Data_RolloverBackWard());//设置后复权
    
18. }
    
19. If(IsRolloverRealPrice)
    
20. {
    
21. AddDataFlag(Enum_Data_RolloverRealPrice());//是否映射真实价格
    
22. }
    
23. If(IsAutoSwapPosition)
    
24. {
    
25. AddDataFlag(Enum_Data_AutoSwapPosition());//设置自动换仓
    
26. }
    
27. }
    
28. }
    
29. OnBar(ArrayRef<Integer> indexs)  
    
30.         {
    
31.                 AvgValue1 = AverageFC(Close,FastLength);
    
32.                 AvgValue2 = AverageFC(Close,SlowLength);
    
33.                 PlotNumeric("MA1",AvgValue1);
    
34.                 PlotNumeric("MA2",AvgValue2);               
    
35.                
    
36.                
    
37.                
    
38.                 If(MarketPosition <>1 && AvgValue1[1] > AvgValue2[1])
    
39.                 {
    
40.                         Buy(1,Open);
    
41.                 }
    
42.                
    
43.                 If(MarketPosition <>-1 && AvgValue1[1] < AvgValue2[1])
    
44.                 {
    
45.                         SellShort(1,Open);
    
46.                 }
    
47.                 //PlotNumeric("PL",Portfolio_TotalProfit);       
    
48.         }