extern double Lot=0.01;                //лоты
extern double TS=0.001;                //трал

//-------------------------------------------------------------------------------------------------------------------------
int start ()
{
double c1,o2,l1,l2,h1,h2,o,o1,c2,o3,c3,o4,c4;
      c1=iClose(Symbol(),PERIOD_D1,1);   //цена закрытия первого бара
      o2=iOpen(Symbol(),PERIOD_D1,2);   //цена открытия второго бара
      l1=iLow(Symbol(),PERIOD_D1,1);    //минимум цены первого бара
      l2=iLow(Symbol(),PERIOD_D1,2);    //минимум цены второго бара
      h1=iHigh(Symbol(),PERIOD_D1,1);   //максимум цены первого бара
      h2=iHigh(Symbol(),PERIOD_D1,2);   //максимум второго бара
      o=iOpen(Symbol(),PERIOD_D1,0);     //открытие текущего бара
      o1=iOpen(Symbol(),PERIOD_D1,1);     //открытие предыдущего бара
      c2=iClose(Symbol(),PERIOD_D1,2);    //закрытие второго бара
      o3=iOpen(Symbol(),PERIOD_D1,3);     //открытие третьего бара
      c3=iClose(Symbol(),PERIOD_D1,3);    //закрытие третьего бара
      o4=iOpen(Symbol(),PERIOD_D1,4);     //открытие четвертого бара
      c4=iClose(Symbol(),PERIOD_D1,4);    //закрытие четвертого бара

    
//-------------------------------------------------------------------------------------------------------------------------  
if(Hour()==23)CloseOrder();               //закрывает открытые ордера в 23:00
//------------------------------------------------------------------------------------------------------------------------- 
for(int pos=0;pos<OrdersTotal();pos++){                                                               //трейлинг стоп
   OrderSelect(pos, SELECT_BY_POS, MODE_TRADES);                                                     
      if (OrderType()==0){                                                                       
         if (OrderOpenPrice()<Bid){
            double db = Bid - OrderOpenPrice();
            double tslb = Bid - OrderStopLoss();
            if (tslb>TS && db>TS){
               OrderModify(OrderTicket(),OrderOpenPrice(),(Bid-TS),OrderTakeProfit(),0,Blue);      
         };   
      };
   };
      if (OrderType()==1){                                                                       
         if (OrderOpenPrice()>Ask){
            double ds = OrderOpenPrice()-Ask;
            double tsls = OrderStopLoss()-Ask;
            if (tsls>TS && ds>TS){
               OrderModify(OrderTicket(),OrderOpenPrice(),(Ask+TS),OrderTakeProfit(),0,Blue);
            };
         };   
      };         
   };       
//------------------------------------------------------------------------------------------------------------------------- 
  if (OrdersTotal()>=1)return;                                          //только один ордер может быть открыт
  
  if (Hour()>=0&&Hour()<23){  
  if (o4>c4&&o3>c3&&l2>l1&&c2<c1&&o2>c2&&o1<c1&&c1>o2&&h1>h2||o2>c1&&h2>h1&&h1<o2&&o1<c1&&l2>l1&&o3>c3&&o4>c4)
      OrderSend(Symbol(), OP_BUY,Lot,o,10,l1,0);                        //открывает Buy
          
  /*if (o4>c4&&o3>c3&&l2>l1&&c2<c1&&o2>c2&&o1<c1&&c1>o2&&h1>h2||o2>c1&&h2>h1&&h1<o2&&o1<c1&&l2>l1&&o3>c3&&o4>c4)          
      OrderSend(Symbol(), OP_SELLSTOP,Lot,l2,10,h2,0); */               //отложенный ордер SellStop
           
  if (o4<c4&&o3<c3&&h2<h1&&c2>c1&&o2<c2&&o1>c1&&c1<o2&&l1<l2||o2<c1&&l2<l1&&l1>o2&&o1>c1&&h2<h1&&o3<c3&&o4<c4)
      OrderSend(Symbol(),OP_SELL,Lot,o,10,h1,0);                        //открывает Sell
      
  /*if (o4<c4&&o3<c3&&h2<h1&&c2>c1&&o2<c2&&o1>c1&&c1<o2&&l1<l2||o2<c1&&l2<l1&&l1>o2&&o1>c1&&h2<h1&&o3<c3&&o4<c4)                  
      OrderSend(Symbol(), OP_BUYSTOP,Lot,h2,10,l2,0);*/                 //отложенный ордер BuyStop
                     
         }
         
return;
}
//-------------------------------------------------------------------------------------------------------------------------
void CloseOrder (){                                                                      //функция закрытия ордеров
double Price_Cls;                                                                        //переменная цены закрытия 
if (OrderType()==0) Price_Cls=Bid;                                                       //если тип ордера Buy то цена закрытия равна Bid
if (OrderType()==1) Price_Cls=Ask;                                                       //если тип ордера Sell то цена закрытия равна Ask
   int _total=OrdersTotal();                                                             //переменная возвращает поличество открытых ордеров
   for(int _pos=0;_pos<_total;_pos++){                                                   //цикл FOR
      OrderSelect(_pos, SELECT_BY_POS, MODE_TRADES);                                     //выбираем ордер с которым будем работать
      if (OrderType()==0 || OrderType()==1)                                              //если тип ордера Buy или тип ордера Sell
         OrderClose(OrderTicket(),Lot,Price_Cls,20);                                     //закрывам выбраный ордер         
   }  
}