extern int Period_MA_Long = 100;// Период средней, необходимой для определения тренда
extern int Period_BB = 25; // Период средней болинджера
extern double reserve=50;
extern double deviation = 1.5;
extern double Lots = 0.1; // Величина лота

int tmp, tc, st, et, dtmp;
//----------------------------------------------------------------------------------------------------------//
int start()
  {
   
   double MA_1_Long,MA_2_Long,BB_MA,BB_n_MA,BB_Up,BB_Low,ATR;
   int cnt, total;
   
//------------------------------------------Защита от ошибок и косяков--------------------------------------//   
   if(Bars<Period_MA_Long || Bars<Period_BB) // Если количество свечей менее 100
   {
      Print("Количество баров слишком мало");
      return(0);  
   }
   if (Volume[0] < 1.0) // Если торги идут значит обьем более 0
   {
      Comment("Торгов нет.. Ждем новый бар..");
      return(0);
   }
   if (AccountFreeMargin()<(1000*Lots)) 
   {
      Comment("Недостаточно денег. Уровень маржи менее ...");
      return(0);
   }

//-----------------------------------------Конец защиты от косяков-----------------------------------------//   
      MA_1_Long=iMA(NULL,PERIOD_D1,Period_MA_Long,0,MODE_SMA,PRICE_CLOSE,1);
      MA_2_Long=iMA(NULL,PERIOD_D1,Period_MA_Long,0,MODE_SMA,PRICE_CLOSE,4);
      BB_MA=iCustom(NULL,0,"Bands",Period_BB,0,deviation,0,1);
      BB_n_MA=iCustom(NULL,0,"Bands",Period_BB,0,deviation,0,4);
      BB_Up=iCustom(NULL,0,"Bands",Period_BB,0,deviation,1,1);
      BB_Low=iCustom(NULL,0,"Bands",Period_BB,0,deviation,2,1); 

   total=OrdersTotal();
//-------------------------------------------Закрытие позиций------------------------------------------   
   for(cnt=0;cnt<total;cnt++)
     {
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if(OrderType()<=OP_SELL &&    
         OrderSymbol()==Symbol())  
        {
         if(OrderType()==OP_BUY)   
           {
               if (Close[1]<BB_MA)
               {
               OrderClose(OrderTicket(),OrderLots(),Bid,50,Violet);
               return(0);
               }
            }    
         if(OrderType()==OP_SELL)   
            {
               if (Close[1]>BB_MA) 
               {
               OrderClose(OrderTicket(),OrderLots(),Ask,50,Violet);
               return(0);
               }
            }
         }
                    
      }
//-----------------------------------------------Конец закрытия позиции------------------------------------
   if(total==0) // если нет позиций
     {
      // открытие длинной позиции
      if(Close[2]<BB_Up && Close[1]>BB_Up && MA_1_Long>MA_2_Long)
        {
        OrderSend(Symbol(),OP_BUY,Lots,Ask,50,BB_Low-reserve*Point,0,"Длинная позиция",16384,0,Green);
        return(0);
        }
      
      // открытие короткой позиции
      if(Close[2]>BB_Low && Close[1]<BB_Low && MA_1_Long<MA_2_Long)
        {
         OrderSend(Symbol(),OP_SELL,Lots,Bid,50,BB_Up+reserve*Point,0,"Короткая позиция",16384,0,Red);
         return(0);
        }
     }
return(0);
}