//+------------------------------------------------------------------+
//|                                                       DIC_EA.mq4 |
//|                             Copyright 2020, DIC Consulting Sarl. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2020, DIC Consulting Sarl."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
#include <CustomFunctions01.mqh>

extern int nt = 5 ; // Number of trade

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   
//--- 
   Comment("Trade initialise to :" + nt);
   
   Sleep(3000);
   
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
  
 
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
int start()
  {
//---
   // Comment("OnTick");
   // total = OrdersTotal()
   Comment("Order total " + OrdersTotal());
   
  //  Comment("Total trade: " + nt);
   // Comment( "Balance: " + AccountBalance()); 
    GesPos();
    return(0);
    
   
  }
//+------------------------------------------------------------------+

void GesPos()
 {
      int cpt = 0;
 
    if( OrdersTotal() > 0)
    {
       
       
      // 
      /*for( int j = 0 ; j < nt ; j++)
      {*/
       
       for(int i = 0; i<OrdersTotal(); i++)
         {
            int cp = nt;
            Comment("Number of resting trade: ", cp, " counter: ", cpt);
           // Sleep(1000);
             // Sleep(1000);
             if(i == (OrdersTotal()-1))
             {  
            // Comment("oki");
             //Sleep(3000);
            // OrderSelect(i,SELECT_BY_POS, MODE_TRADES);
             //Comment("Last  trade: " + OrderTicket());
              
              // Selection of the last trade pending
             OrderSelect(i,SELECT_BY_POS, MODE_TRADES);
             
               //Comment("Last trade: " + i);
             
               //  Comment("oki");
               // Comment("Number of resting trade: " + nt);
               
               // Sleep(8000);
                  
                double spread =  (Ask-Bid);
                
               //   Comment(spread);
               
               double npip =(( AccountBalance() * 1 / 100) / (OrderLots() * nt ) )+ spread;
               
               if(OrderType()== OP_BUY)
               {
                  // double sl = CalculateStopLoss(true, OrderOpenPrice());
                  
                  
                 // Comment("==Last trade===");
                  
                 // Comment("Nombre de pip pour le tp: " + npip);
                  
                  // Modify Last Order
                  
                  double tp = CalculateTakeProfit(true, OrderOpenPrice(), npip);
                  
                   // Comment("tp value : " + tp);
                  
                  
                  // Comment("Number of pip for the sl: " + (3 * npip));
                  
                  double sl = CalculateStopLoss(true, OrderOpenPrice(),(3 * npip));
                 
                 // Comment("sl value : " + sl);
                  // Comment(" order ticket : " + OrderTicket());
                 
                 bool res = OrderModify(OrderTicket(),OrderOpenPrice(),sl,tp,0,Blue); 
                 
                 cpt ++;
                 cp --;
                 
                  
                 
                  if(!res)
                  {
                    Comment("Error in OrderModify (OP_BUY). Error code=",GetLastError(),"counter ", cp); 
                    
                  }
                  else 
                  {
                     
                     Comment("Order modified successfully.");
                     Sleep(2000);
                  }
                  
                  //double tp = CalculateTakeProfit(true,OrderOpenPrice(),);
               } 
               else if (OrderType() == OP_SELL)
               {
                
                  Comment("==Last trade===");
                  Comment("Commision on the trade" + i + ": ", + OrderCommission());
                  
                  Comment("Number of pip for the tp: " + npip);
                  
                  // Modify Last Order
                  
                  double tp = CalculateTakeProfit(false, OrderOpenPrice(), npip);
                  
                  Comment("take profit: " + tp); 
             
                  
               
                   double sl = CalculateStopLoss(false,OrderOpenPrice(),(3 * npip));
                   
                   // Comment("stopp loss pip: " + (3*npip)); 
                 
                  // Comment("stopp loss value: " + sl); 
                   // Comment(OrderOpenPrice());
                  
                 // double sl = CalculateStopLoss(true, OrderOpenPrice(),npip);
                  
                     bool res = OrderModify(OrderTicket(),OrderOpenPrice(),sl,tp,0,Blue);
                  
                     if(!res) 
                     {
                        Comment("Error in OrderModify (OP_SELL). Error code=",GetLastError(), "res: ", res,"tp: ", tp); 
                        
                     }
                     else 
                     {
                      
                        Comment("Order modified successfully."); 
                     
                     }
                     
                  }
                
               }
            
           }
       // }
     }
     
 
 }