Estas son las funciones mas importantes de un Expert Advisor (EA) en MQL5

#property strict

// ── Parámetros configurables desde MT5 ────────────────────────────
input int    InpMAPeriod = 20;   // Período MA
input double InpLots     = 0.10; // Lotaje

// ── Variable global para el handle ────────────────────────────────
int g_maHandle;

int OnInit() {
   // 1. Validar parámetros ANTES de crear handles
   if(InpMAPeriod < 2) {
      Alert("ERROR: InpMAPeriod debe ser >= 2. Valor recibido: ", InpMAPeriod);
      return(INIT_PARAMETERS_INCORRECT); // EA no arranca
   }
   if(InpLots <= 0) {
      Alert("ERROR: Lotaje debe ser positivo");
      return(INIT_PARAMETERS_INCORRECT);
   }

   // 2. Crear el handle del indicador
   g_maHandle = iMA(_Symbol, _Period, InpMAPeriod, 0, MODE_SMA, PRICE_CLOSE);

   // 3. Verificar que el handle es válido
   if(g_maHandle == INVALID_HANDLE) {
      Print("ERROR al crear handle MA. Código: ", GetLastError());
      return(INIT_FAILED);
   }

   // 4. Log de confirmación — visible en Herramientas > Diario de Expertos
   Print("EA iniciado correctamente en ", _Symbol, " ", EnumToString(_Period));
   Print("MA(20) handle: ", g_maHandle);

   return(INIT_SUCCEEDED); // EA arranca
}

// Variable global para detectar nueva vela
datetime g_lastBarTime = 0;

void OnTick() {
   // ── PASO 1: Detectar nueva vela ──────────────────────────────
   datetime currentBarTime = (datetime)SeriesInfoInteger(_Symbol, _Period, SERIES_LASTBAR_DATE);

   bool isNewBar = (currentBarTime != g_lastBarTime);
   if(!isNewBar) return; // Salir si no es nueva vela — sin hacer nada
   g_lastBarTime = currentBarTime;

   // ── PASO 2: Esperar suficientes barras ───────────────────────
   if(Bars(_Symbol, _Period) < InpMAPeriod + 10) {
      Print("Esperando datos suficientes...");
      return;
   }

   // ── PASO 3: Leer el indicador ────────────────────────────────
   double ma[2];
   ArraySetAsSeries(ma, true);
   int copied = CopyBuffer(g_maHandle, 0, 0, 2, ma);

   if(copied < 2) {
      Print("ERROR: CopyBuffer devolvió solo ", copied, " valores");
      return;
   }

   // ── PASO 4: Leer precio actual ───────────────────────────────
   double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
   double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);

   // ── PASO 5: Evaluar señal ────────────────────────────────────
   bool precioSobreMA = (bid > ma[0]);
   bool precioSobreMAAnterior = (bid > ma[1]);

   Print("Nueva vela | MA: ", DoubleToString(ma[0],_Digits),
         " | Precio ", (precioSobreMA ? "SOBRE" : "BAJO"), " la MA");
}

void OnDeinit(const int reason) {
   // 1. Liberar TODOS los handles creados en OnInit
   if(g_maHandle != INVALID_HANDLE) {
      IndicatorRelease(g_maHandle);
      Print("Handle MA liberado correctamente");
   }

   // 2. Identificar y loggear el motivo de cierre
   string reasonText = "";
   switch(reason) {
      case REASON_REMOVE:      reasonText = "EA eliminado del gráfico";   break;
      case REASON_CHARTCLOSE:  reasonText = "Gráfico cerrado";             break;
      case REASON_RECOMPILE:   reasonText = "EA recompilado";              break;
      case REASON_CHARTCHANGE: reasonText = "Cambio de símbolo/temporalidad"; break;
      case REASON_PARAMETERS:  reasonText = "Parámetros modificados";       break;
      case REASON_ACCOUNT:     reasonText = "Cambio de cuenta";             break;
      case REASON_CLOSE:       reasonText = "Terminal cerrado";             break;
      default:                 reasonText = "Otro motivo: " + (string)reason;
   }

   Print("EA detenido. Motivo: ", reasonText);

   // 3. Limpiar objetos gráficos si los hubiera
   ObjectsDeleteAll(0, "EA_"); // Borra todos los objetos con prefijo "EA_"
}

double OnTester() {
   // Obtener métricas del backtest recién completado
   double profitFactor  = TesterStatistics(STAT_PROFIT_FACTOR);
   double maxDrawdown   = TesterStatistics(STAT_EQUITYDD_PERCENT) / 100.0;
   double totalTrades   = TesterStatistics(STAT_TRADES);
   double winRate        = TesterStatistics(STAT_PROFIT_TRADES) / MathMax(totalTrades, 1);

   // Filtros mínimos — descartar configuraciones inviables
   if(totalTrades < 30)      return(0); // Muy pocos trades, no significativo
   if(profitFactor < 1.1)    return(0); // Profit factor mínimo aceptable
   if(maxDrawdown > 0.20)    return(0); // Drawdown máximo del 20%

   // Criterio compuesto: PF × Win Rate × (1 - Drawdown)
   // Maximiza rentabilidad y precisión, penaliza el riesgo
   double score = profitFactor * winRate * (1.0 - maxDrawdown);

   return(score); // Valor más alto = mejor configuración
}

#property copyright "TradingNote"
#property version   "1.00"
#property strict

// ════════════════════════════════════════════════════════════════
// PARÁMETROS DE ENTRADA
// ════════════════════════════════════════════════════════════════
input int    InpMAPeriod = 20;    // Período Media Móvil
input int    InpRSIPeriod= 14;    // Período RSI
input double InpLots     = 0.10;  // Tamaño del lote
input int    InpSLPips   = 30;    // Stop Loss en pips
input int    InpTPPips   = 60;    // Take Profit en pips

// ════════════════════════════════════════════════════════════════
// VARIABLES GLOBALES
// ════════════════════════════════════════════════════════════════
int      g_maHandle;
int      g_rsiHandle;
datetime g_lastBarTime = 0;

// ════════════════════════════════════════════════════════════════
// OnInit — UNA VEZ al cargar
// ════════════════════════════════════════════════════════════════
int OnInit() {
   if(InpMAPeriod < 2 || InpRSIPeriod < 2) return(INIT_PARAMETERS_INCORRECT);

   g_maHandle  = iMA(_Symbol, _Period, InpMAPeriod,  0, MODE_SMA, PRICE_CLOSE);
   g_rsiHandle = iRSI(_Symbol, _Period, InpRSIPeriod, PRICE_CLOSE);

   if(g_maHandle==INVALID_HANDLE || g_rsiHandle==INVALID_HANDLE) {
      Print("ERROR creando handles: ", GetLastError());
      return(INIT_FAILED);
   }
   Print("EA iniciado | ", _Symbol, " | MA:", InpMAPeriod, " RSI:", InpRSIPeriod);
   return(INIT_SUCCEEDED);
}

// ════════════════════════════════════════════════════════════════
// OnTick — CADA TICK del mercado
// ════════════════════════════════════════════════════════════════
void OnTick() {
   // Filtro de nueva vela
   datetime barTime = (datetime)SeriesInfoInteger(_Symbol,_Period,SERIES_LASTBAR_DATE);
   if(barTime == g_lastBarTime) return;
   g_lastBarTime = barTime;

   // Leer indicadores
   double ma[2], rsi[2];
   ArraySetAsSeries(ma,true); ArraySetAsSeries(rsi,true);
   if(CopyBuffer(g_maHandle, 0,0,2,ma)  < 2) return;
   if(CopyBuffer(g_rsiHandle,0,0,2,rsi) < 2) return;

   double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
   double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);

   // ── Aquí va tu lógica de señales ──
   // Episodio 3: aprenderás a enviar órdenes con CTrade
}

// ════════════════════════════════════════════════════════════════
// OnDeinit — UNA VEZ al remover
// ════════════════════════════════════════════════════════════════
void OnDeinit(const int reason) {
   IndicatorRelease(g_maHandle);
   IndicatorRelease(g_rsiHandle);
   Print("EA detenido. Reason: ", EnumToString((ENUM_DEINIT_REASON)reason));
}

// ════════════════════════════════════════════════════════════════
// OnTester — AL FINALIZAR cada backtest (optimización)
// ════════════════════════════════════════════════════════════════
double OnTester() {
   double pf  = TesterStatistics(STAT_PROFIT_FACTOR);
   double dd  = TesterStatistics(STAT_EQUITYDD_PERCENT) / 100.0;
   double tr  = TesterStatistics(STAT_TRADES);
   if(tr < 30 || pf < 1.1) return(0);
   return(pf * (1.0 - dd)); // Score compuesto
}