Altarius RSI Stohastic: EA Hebat untuk MetaTrader 5

//+------------------------------------------------------------------+
//| Mengira saiz lot yang optimum                                  |
//+------------------------------------------------------------------+
double SaizLotOptimum()
  {
   double lot=Lots;
   int    kerugian=0;                  // bilangan dagangan kerugian tanpa rehat
//--- pilih saiz lot
   lot=NormalizeDouble(m_account.FreeMargin()*MaximumRisk/1000.0,2);
//--- mengira bilangan dagangan kerugian tanpa rehat
   if(DecreaseFactor>0)
     {
      //--- minta sejarah dagangan
      HistorySelect(TimeCurrent()-86400,TimeCurrent()+86400);
      //---
      uint     total=HistoryDealsTotal();
      //--- untuk semua dagangan
      for(uint i=0;i<total;i++)
        {
         if(!m_deal.SelectByIndex(i))
           {
            Print("Ralat dalam sejarah!");
            break;
           }
         if(m_deal.Symbol()!=Symbol() || m_deal.Entry()!=DEAL_ENTRY_OUT)
            continue;
         //---
         if(m_deal.Profit()>0)
            break;
         if(m_deal.Profit()<0)
            kerugian++;
        }
      if(kerugian>1)
         lot=NormalizeDouble(lot-lot*kerugian/DecreaseFactor,1);
     }
//--- kembalikan saiz lot
   if(lot<0.1)
      lot=0.1;
   return(lot);
  }