Trade Classes from MT5 for MT4 - MetaTrader 4용 라이브러리

In this version, there may be some class methods that could not be found   when testing as in need of correction.

The file TradeLibraryMT5Example.mq4 is an example of a simple EA that compiles and runs on both MT5 and MT4.

The following code is used to open pending orders:

CTrade m_trade;

...

res = m_trade.OrderOpen(m_symbol, ORDER_TYPE_BUY_LIMIT , m_lot, lowPrice, lowPrice, 0 , 0 , ORDER_TIME_GTC , 0 );
res = m_trade.OrderOpen(m_symbol, ORDER_TYPE_SELL_LIMIT , m_lot, highPrice, highPrice, 0 , 0 , ORDER_TIME_GTC , 0 );

The function of calculating the total profit of all open market positions can be implemented as follows:

//+------------------------------------------------------------------+
//| Calculate total profit for all market orders                     |
//+------------------------------------------------------------------+
double GetProfit() {
   int total = PositionsTotal();
   double profit = 0;

   CPositionInfo p;

   for(int i = total - 1; i >= 0; i--) {
       if(p.SelectByIndex(i)) {
         ulong magic = p.Magic();
         string symbol = p. Symbol();
         if(magic != m_magicN || symbol != m_symbol) {
             continue ;
         }

         profit += p.Profit() + p.Commission() + p.Swap();
      }
   }

   return profit;
}

The function of closing all open positions and pending orders can be implemented as follows:

//+------------------------------------------------------------------+
//| Attempt to close all pending and market orders                   |
//+------------------------------------------------------------------+
bool TryCloseAll() {
   bool res = true ;
   
   int total;
   double profit = 0;
   ulong ticket;
   ulong magic;
   string symbol;
   
   total = OrdersTotal();

   COrderInfo o;

   for(int i = total - 1; i >= 0; i--) {
       if(o.SelectByIndex(i)) {
         magic = o.Magic();
         symbol = o.Symbol();
         if(magic != m_magicN || symbol != m_symbol) {
             continue ;
         }
         ticket = o.Ticket();

         res &= m_trade.OrderDelete(o.Ticket());
      }
   }

   total = PositionsTotal();
   
   CPositionInfo p;

   for(int i = total - 1; i >= 0; i--) {
       if(p.SelectByIndex(i)) {
         magic = p.Magic();
         symbol = p. Symbol();
         if (magic != m_magicN || symbol != m_symbol) {
             continue ;
         }
         ticket = p.Ticket();

         res &= m_trade.PositionClose(ticket) ;
      }
   }

   return res;
}