Может кто подскажет, почему советник тормозит??

Новый комментарий
 
Ребята, вдруг советник стал тормозить в тесте жутко. 1 день-16 сделок шел 12 секунд.
Что я добавил не помню щас. Просто обратил в один момент внимание на то, что утром он дань пролетал мгновенно, а щас аж 12 сек. Даже не представляю сколько он будет работать на минутках за 5 лет.
Кто оптимизирует хорошо - посмотрите плиз.


//+------------------------------------------------------------------+
//|                                              PARAMA  by Maloma |
//+------------------------------------------------------------------+
 
#include <stdlib.mqh>
#include <stderror.mqh>
 
extern double Lots=0.1;
extern int    TStOp=10;
extern int    TStEp=5;
extern int    sl=20;
extern int    tp=300;
       int    magic=1064032;
       int    i, TotalB,TotalS;
       int    CBar;
       double HI, LO, MA, PC;
       int    ParStat=0;
       bool   FlagS=true, FlagB=true;
 
void Tral()
 
{
 for(i=OrdersTotal()-1;i>=0;i--)
    {
     OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
     if ((OrderSymbol()==Symbol()) && (OrderMagicNumber()==magic))
      {
       if (OrderType()==OP_BUY && Bid-OrderOpenPrice()>TStOp*Point)
        {
         if (Bid-OrderStopLoss()>=(TStOp+TStEp)*Point)
          {OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TStOp*Point,OrderTakeProfit(),0,CLR_NONE);}
        }
       if (OrderType()==OP_SELL && OrderOpenPrice()-Ask>TStOp*Point)
        {
         if (OrderStopLoss()-Ask>=(TStOp+TStEp)*Point)
          {OrderModify(OrderTicket(),OrderOpenPrice(),Ask+TStOp*Point,OrderTakeProfit(),0,CLR_NONE);}
        }
      }
    }
 return(0);
}
 
int start()
{ 
 if (CBar<Bars)
  {
   MA=iMA(Symbol(),0,18,0,MODE_SMMA,PRICE_CLOSE,1);
   PC=iSAR(Symbol(),0,0.02,0.2,1);
   TotalB=0;
   TotalS=0;
   Tral();
   if (PC>Bid) {ParStat=1;} else if (PC<Bid) {ParStat=-1;}
   for(i=OrdersTotal()-1;i>=0;i--)
    {
     OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
     if ((OrderSymbol()==Symbol()) && (OrderMagicNumber()==magic))
      {
       if (OrderType()==OP_BUY) {TotalB++;}
       if (OrderType()==OP_SELL) {TotalS++;}
      }
    }
   HI=iHigh(Symbol(),0,1);
   LO=iLow(Symbol(),0,1);
   if (LO>MA && MA>PC /*&& TotalB<1 */&& FlagB) 
    {
     FlagB=false;
     OrderSend(Symbol(),OP_BUY,Lots,Ask,3,Bid-sl*Point,Bid+tp*Point,"",magic,0,Green);
    }
   if (HI<MA && MA<PC /*&& TotalS<1 */&& FlagS) 
   {
    FlagS=false;
    OrderSend(Symbol(),OP_SELL,Lots,Bid,3,Ask+sl*Point,Ask-tp*Point,"",magic,0,Red);
   }
   if (!FlagB && ParStat==1) FlagB=true;
   if (!FlagS && ParStat==-1) FlagS=true;
   CBar=Bars;
  }
 return(0);
}
 
В коде, вроде бы, ничего криминального (кроме проверки результата OrderSelect =)
Пробуй закомментировать куски и тестировать - может, всплывёт "тормознутое" место
 
Может моделирование поменял ?
 
Rosh:
Может моделирование поменял ?
Моделирование - это на каком ТФ??
Новый комментарий