TB换金字塔

销售166

Params
  Numeric Y1(50);
  Numeric Y2(50);
  Numeric stopLossSet(100);

  Vars
  NumericSeries a1;
  NumericSeries a2;
  Numeric MinPoint;  
  Numeric MyEntryPrice;      
  Numeric MyExitPrice;
  Numeric stopLossPoint;
  Numeric offSetDots;
  bool    cross1;
  bool    cross2;

Begin

  a1=Highest(high[1],Y1);
  a2=Lowest(low[1],Y2);

  cross1=CrossOver(high,a1);
  cross2=CrossUnder(low,a2);

if(date>20251025) return;

  If(cross1 && MarketPosition<>1)
  {
   Buy(1,a1+offSetDots);      
   }
  If(cross2 && MarketPosition<>-1)
  {
   SellShort(1,a2-offSetDots);      
   }
stopLossPoint = stopLossSet * MinMove * PriceScale;


        If(MarketPosition == 1)
        {


                myEntryPrice = AvgEntryPrice;

                 If(low <= myEntryPrice - stopLossPoint)
                {
                        myExitPrice = myEntryPrice - stopLossPoint;
                        If(open < myExitPrice) myExitPrice = open;
                        Sell(0,myExitPrice);//myExitPrice
                }
        }
        else If (MarketPosition == -1)
        {

                myEntryPrice = AvgEntryPrice;

                 If(High >= myEntryPrice + stopLossPoint)
                {
                        myExitPrice = myEntryPrice + stopLossPoint;
                        If(open > myExitPrice) myExitPrice = open;
                        BuyToCover(0,myExitPrice);  //  myExitPrice   
                }
        }


End

技术009

因TB的和我们PEL语法规范差异太大，这种转换需要我们去查阅相关资料才能操作，需要一定处理时间。  转换后会在本帖下贴出具体代码的。

另外如果建议如果有文字的思路描述，最好以文字思路描述为准。