107 lines
3.6 KiB
MQL5
107 lines
3.6 KiB
MQL5
|
//+------------------------------------------------------------------+
|
||
|
|
//| CustomOptimization.mqh |
|
||
|
|
//| Copyright 2025, Niquel Mendoza. |
|
||
|
|
//| https://www.mql5.com/es/users/nique_372/news |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
#property copyright "Copyright 2025, Niquel Mendoza."
|
||
|
|
#property link "https://www.mql5.com/es/users/nique_372/news"
|
||
|
|
#property strict
|
||
|
|
|
||
|
|
#include "Funciones Array.mqh"
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
typedef double (*FCustomOptimizerResult)();
|
||
|
|
|
||
|
|
//---
|
||
|
|
enum ENUM_SIMPLE_CUSTOM_CRITERIA
|
||
|
|
{
|
||
|
|
CTS_CRITERIA_OP_ESPERANZA_MATEMATICA = 0,
|
||
|
|
CTS_CRITERIA_OP_MIN_DD_AND_MAX_BALANCE
|
||
|
|
};
|
||
|
|
|
||
|
|
//---
|
||
|
|
class CCustomCriteria //clase para implementar un criterio custom de otpimaicion en el probador, ADEVERTENCIA: todas las funciones son de maximizacion
|
||
|
|
{
|
||
|
|
private:
|
||
|
|
FCustomOptimizerResult f_ptr;
|
||
|
|
|
||
|
|
|
||
|
|
public:
|
||
|
|
CCustomCriteria(void);
|
||
|
|
|
||
|
|
//---
|
||
|
|
void Set(FCustomOptimizerResult funcion_rest) { this.f_ptr = funcion_rest; }
|
||
|
|
void Set(ENUM_SIMPLE_CUSTOM_CRITERIA type_op);
|
||
|
|
|
||
|
|
//---
|
||
|
|
inline double OnTesterEvent() const { return this.f_ptr(); }
|
||
|
|
};
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
CCustomCriteria::CCustomCriteria(void)
|
||
|
|
: f_ptr(NULL)
|
||
|
|
{
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
void CCustomCriteria::Set(ENUM_SIMPLE_CUSTOM_CRITERIA type_op)
|
||
|
|
{
|
||
|
|
const static FCustomOptimizerResult types_valid[2] =
|
||
|
|
{
|
||
|
|
CCustomCriteria_FuncionEsperanzaMatematica,
|
||
|
|
CCustomCriteria_FuncionMinDdAndMaxBalance
|
||
|
|
};
|
||
|
|
|
||
|
|
this.f_ptr = types_valid[type_op];
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
double CCustomCriteria_FuncionEsperanzaMatematica()
|
||
|
|
{
|
||
|
|
double trades = TesterStatistics(STAT_TRADES);
|
||
|
|
|
||
|
|
if(trades <= 0)
|
||
|
|
return 0.0;
|
||
|
|
|
||
|
|
//---
|
||
|
|
double procentaje_accierto = TesterStatistics(STAT_PROFIT_TRADES) / trades;
|
||
|
|
double percentage_fallo = TesterStatistics(STAT_LOSS_TRADES) / trades;
|
||
|
|
|
||
|
|
//---
|
||
|
|
double total_profits = TesterStatistics(STAT_PROFIT_TRADES);
|
||
|
|
double avg_profit = total_profits > 0.00 ? TesterStatistics(STAT_GROSS_PROFIT) / total_profits : 0.00;
|
||
|
|
|
||
|
|
//---
|
||
|
|
double total_losses = TesterStatistics(STAT_LOSS_TRADES);
|
||
|
|
double avg_loss = total_losses > 0.00 ? fabs(TesterStatistics(STAT_GROSS_LOSS)) / total_losses : 0.00;
|
||
|
|
|
||
|
|
return (procentaje_accierto * avg_profit) - (percentage_fallo * avg_loss);
|
||
|
|
}
|
||
|
|
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
double CCustomCriteria_FuncionMinDdAndMaxBalance()
|
||
|
|
{
|
||
|
|
double gross;
|
||
|
|
if((gross = TesterStatistics(STAT_GROSS_PROFIT)) < TesterStatistics(STAT_GROSS_LOSS))
|
||
|
|
return 0.00 ;//Si hay mas peridas qeu gannacias entonces retorna 0, bot no es rentalbe
|
||
|
|
|
||
|
|
double dd = TesterStatistics(STAT_BALANCEDD_PERCENT);
|
||
|
|
|
||
|
|
if(dd > 30.00) //d + 50%, demasiado
|
||
|
|
return 0.00;
|
||
|
|
|
||
|
|
return gross / dd;
|
||
|
|
}
|
||
|
|
//+------------------------------------------------------------------+
|