//+------------------------------------------------------------------+
//|                                                       Warrior_EA |
//|                                                     AnimateDread |
//|                                                                  |
//+------------------------------------------------------------------+
#include <Expert\ExpertMoney.mqh>
#include "..\System\TradeChecks.mqh"
//+------------------------------------------------------------------+
//| Class CExpertMoneyCustom. Common base for every money-management |
//| strategy in this EA.                                             |
//+------------------------------------------------------------------+
class CExpertMoneyCustom : public CExpertMoney
  {
protected:
   //--- The full #14/#3/#5/#2 gate. Returns the corrected volume in `lots`, or 0.0 with a
   //--- populated `description` when no legal volume exists for this trade right now.
   bool              ValidateLotForTrade(const string symb, double &lots, ENUM_ORDER_TYPE type, string &description);
   //--- Kept as thin wrappers over the shared library so the two names the existing money
   //--- strategies already call (Money\MoneyRiskBase.mqh) keep working unchanged.
   bool              CheckAndCorrectVolumeValue(double &volume, string &description);
   bool              CheckAndAdjustMoneyForTrade(string symb, double &lots, ENUM_ORDER_TYPE type);
   //--- Symbol this money object is sizing for. m_symbol is set by CExpertMoney::Init(); fall back
   //--- to the chart symbol only if a strategy is used stand-alone before Init() has run.
   string            MoneySymbol(void) { return (m_symbol != NULL) ? m_symbol.Name() : _Symbol; }
  };
//+------------------------------------------------------------------+
//| Article #14/#3/#5/#2 - the complete pre-OrderSend volume gate.    |
//+------------------------------------------------------------------+
bool CExpertMoneyCustom::ValidateLotForTrade(const string symb, double &lots, ENUM_ORDER_TYPE type, string &description)
  {
   if(!TCValidateVolumeForTrade(symb, lots, type, description))
     {
      //--- throttled: an exhausted margin/volume limit is true on every tick until it changes, and
      //--- an unthrottled Print here floods the journal for as long as the condition lasts
      TCLog("money:" + symb + ":" + EnumToString(type),
            StringFormat("%s: no tradeable volume for %s %s - %s", __FUNCTION__, symb, EnumToString(type), description));
      lots = 0.0;
      return false;
     }
   if(description != "")
      TCLog("money-adjust:" + symb + ":" + EnumToString(type),
            StringFormat("%s: volume adjusted for %s %s - %s", __FUNCTION__, symb, EnumToString(type), description));
   return true;
  }
//+------------------------------------------------------------------+
//| Article #3 - check and correct the order volume.                  |
//| Delegates to TCNormalizeVolume(), which snaps to the volume step  |
//| BEFORE clamping to [min,max] (see its comment for why the reverse |
//| order can emit an out-of-range volume) and then re-verifies the   |
//| corrected value against all three properties.                     |
//+------------------------------------------------------------------+
bool CExpertMoneyCustom::CheckAndCorrectVolumeValue(double &volume, string &description)
  {
   return TCNormalizeVolume(MoneySymbol(), volume, description);
  }
//+------------------------------------------------------------------+
//| Article #2/#5 - fit the trade size to free margin and to the      |
//| per-symbol aggregate volume limit.                                 |
//+------------------------------------------------------------------+
bool CExpertMoneyCustom::CheckAndAdjustMoneyForTrade(string symb, double &lots, ENUM_ORDER_TYPE type)
  {
   string description;
   return ValidateLotForTrade(symb, lots, type, description);
  }
//+------------------------------------------------------------------+