發布一個完美的程序代碼，請高手們提點意見

作者：開拓者 TB 來源：cxh99.com 發布時間：2013年06月24日

咨詢內容： Params
Numeric Lots(1);
　Numeric ExitOnCloseMins(14.59);
　Numeric maLen1(10);
Numeric maLen2(30);
Vars
　　　Numeric ma1;
　　　Numeric ma2;
Numeric TakeProfit(1);
Numeric TakeProfit2(2);
Numeric MinPoint;
Numeric MyEntryPrice;
Numeric MyExitPrice;

NumericSeries HighestAfterEntry; //  開倉后出現的最高價
　　　 NumericSeries LowestAfterEntry; //  開倉后出現的最低價
Numeric StopLine(0);

Begin
ma1 = Average(Open,maLen1);
　　　ma2 = Average(Open,maLen2);
MyEntryPrice = AvgEntryPrice;  　
HighestAfterEntry = Close[1];
　　　LowestAfterEntry = Close[1];
Commentary("ma1: "+Text(ma1));
Commentary("ma2: "+Text(ma2));

   If(CurrentBar > maLen2)
   {
      If(MarketPosition==0)
      {
         if((Open>=ma1)&&(ma1>ma2))
   {
         MyEntryPrice==open;
         Buy(lots,MyEntryPrice);
　　　　　　　HighestAfterEntry = Max(HighestAfterEntry,AvgEntryPrice);
　　 LowestAfterEntry = Min(LowestAfterEntry,AvgEntryPrice);
            　　　　　　　 Return;
   }
   if((Open<ma1)&&(ma1<ma2))
   {
         MyEntryPrice==open;
         SellShort(lots,MyEntryPrice);
   HighestAfterEntry = Max(HighestAfterEntry,AvgEntryPrice);
   LowestAfterEntry = Min(LowestAfterEntry,AvgEntryPrice);
            　　　　　　　　 Return;
   }
   HighestAfterEntry = Max(HighestAfterEntry,High);
      　　　　　　　 LowestAfterEntry = Min(LowestAfterEntry,Low);

      }

      If(MarketPosition==1)//多倉
      {

   If(High>=ma1&&(High>HighestAfterEntry[1]))//增倉
   {  MyEntryPrice=Open;
   Buy(Lots,Open);
   HighestAfterEntry=High;
   Commentary("增倉: "+Text(Open));
   }
   If(High>=ma1&&(High<HighestAfterEntry[1]))//未突破前期高位反手
      { 　
   MyEntryPrice=Open;
   SellShort(1,MyEntryPrice);
      }
   If(Low<ma1&&(Low<LowestAfterEntry[1]))//止損并反手
      {
　MyExitPrice=Open;
   Sell(0,Open);

   MyEntryPrice=MyExitPrice;
   SellShort(1,Open);
   LowestAfterEntry=Low;
   }

   If(Low<ma1&&(Low>LowestAfterEntry[1]))//未突破前期低位增倉
      {
   MyEntryPrice=Open;
   Buy(1,MyEntryPrice);
   }
   }else If(MarketPosition==-1)//空倉
      {

   If(Low<ma1&&(Low<LowestAfterEntry[1]))//增倉
      {
   MyEntryPrice=Open;
   SellShort(1,Open);
   LowestAfterEntry=Low;
   }
   If(Low<=ma1&&(Low>LowestAfterEntry[1]))//未突破前期高位反手
      {
   MyEntryPrice=Open;
   Buy(1,MyEntryPrice);
      }
   If(High>=ma1&&(High>HighestAfterEntry[1]))//止損并反手
      {
   MyExitPrice=Open;
   BuyToCover(0,Open);

   MyEntryPrice=MyExitPrice;
   Buy(1,Open);
   HighestAfterEntry=High;
      }

   If(High>=ma1&&(High<HighestAfterEntry[1]))//未突破前期低位增倉
      {
   MyEntryPrice=Open;
   SellShort(1,MyEntryPrice);
      }

   }

   }

End

效果如下：

未命名.jpg (112.95 KB, 下載次數: 2) 5 小時前上傳
TB技術人員： 這個很不錯呀
TB客服： 什么原理呀？太暴利了！

人人爽天天爽夜夜爽qc-人人爽天天爽夜夜爽曰-人人天天爱天天做天天摸-人人天天夜夜-色网站在线-色网站在线看

發布一個完美的程序代碼，請高手們提點意見