Equity manager

ÿþ//+------------------------------------------------------------------+

//|                                               Equity manager.mq5 |

//|                              Copyright © 2019, Vladimir Karputov |

//|                                           http://wmua.ru/slesar/ |

//+------------------------------------------------------------------+

#property copyright "Copyright © 2019, Vladimir Karputov"

#property link      "http://wmua.ru/slesar/"

#property version   "1.000"

/*

   barabashkakvn Trading engine 3.012

*/

#include <Trade\PositionInfo.mqh>

#include <Trade\Trade.mqh>

#include <Trade\AccountInfo.mqh>

CPositionInfo  m_position;                   // trade position object

CTrade         m_trade;                      // trading object

CAccountInfo   m_account;                    // account info wrapper

//+------------------------------------------------------------------+

//| Enum Equity                                                      |

//+------------------------------------------------------------------+

enum ENUM_EQUITY

  {

   equity_absolute      =0,   // Absolute

   equity_growth_money  =1,   // Growth, in the money

   equity_growth_percent=2,   // Growth, in the percent

  };

//--- input parameters

input ENUM_EQUITY IntEquity=equity_absolute;       // Equity: 

input double   InpEquityVolume      = 3000;        // The value for "Equity"

//---

input bool     InpPrintLog          = false;       // Print log

input ulong    InpMagic             = 2650791;     // Magic number

//---

ulong    ExtSlippage       = 10;       // Slippage

bool     ExtNeedCloseAll   = false;    //

double   ExtPrevEquity     = 0.0;      // Prev. Equity

//+------------------------------------------------------------------+

//| Expert initialization function                                   |

//+------------------------------------------------------------------+

int OnInit()

  {

//---

   m_trade.SetExpertMagicNumber(InpMagic);

   m_trade.SetMarginMode();

   m_trade.SetTypeFillingBySymbol(Symbol());

   m_trade.SetDeviationInPoints(ExtSlippage);

//--- 

   ExtPrevEquity=m_account.Equity();

//---

//m_trade.Sell(0.01,"EURUSD");

//m_trade.Sell(0.01,"AUDUSD");

//m_trade.Sell(0.01,"USDJPY");

//m_trade.Sell(0.01,"GBPUSD");

//m_trade.Sell(0.01,"EURUSD");

//m_trade.Sell(0.01,"USDCHF");

//m_trade.Sell(0.01,"NZDUSD");

//---

   return(INIT_SUCCEEDED);

  }

//+------------------------------------------------------------------+

//| Expert deinitialization function                                 |

//+------------------------------------------------------------------+

void OnDeinit(const int reason)

  {

//---



  }

//+------------------------------------------------------------------+

//| Expert tick function                                             |

//+------------------------------------------------------------------+

void OnTick()

  {

   if(ExtNeedCloseAll)

     {

      if(IsPositionExists())

        {

         CloseAllPositions();

         return;

        }

      else

         ExtNeedCloseAll=false;

     }

//---

   double equity_current=m_account.Equity();

   switch(IntEquity)

     {

      case  equity_absolute:

         if(equity_current>=InpEquityVolume)

         ExtNeedCloseAll=true;

         break;

      case  equity_growth_money:

         if(equity_current-ExtPrevEquity>=InpEquityVolume)

         ExtNeedCloseAll=true;

         break;

      default:

         //+------------------------------------------------------------------+

         //| ExtPrevEquity  -> 100%                                           |

         //| equity_current -> x%                                             |

         //+------------------------------------------------------------------+

         if(equity_current*100.0/ExtPrevEquity-100.0>=InpEquityVolume)

         ExtNeedCloseAll=true;

         break;

     }

  }

//+------------------------------------------------------------------+

//| TradeTransaction function                                        |

//+------------------------------------------------------------------+

void OnTradeTransaction(const MqlTradeTransaction &trans,

                        const MqlTradeRequest &request,

                        const MqlTradeResult &result)

  {

//--- 



  }

//+------------------------------------------------------------------+

//| Is position exists                                               |

//+------------------------------------------------------------------+

bool IsPositionExists(void)

  {

   for(int i=PositionsTotal()-1;i>=0;i--)

      if(m_position.SelectByIndex(i)) // selects the position by index for further access to its properties

         return(true);

//---

   return(false);

  }

//+------------------------------------------------------------------+

//| Close all positions                                              |

//+------------------------------------------------------------------+

void CloseAllPositions(void)

  {

   for(int i=PositionsTotal()-1;i>=0;i--) // returns the number of current positions

      if(m_position.SelectByIndex(i))     // selects the position by index for further access to its properties

         m_trade.PositionClose(m_position.Ticket()); // close a position

  }

//+------------------------------------------------------------------+