Estratégia de Cruzamento de Médias Móveis (Setup 9.1) em MQL5

//+------------------------------------------------------------------+
//|                                                   ArtigoSetup91.mq5|
//|                                  Copyright 2026, Desenvolvedor |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026"
#property link      "https://www.mql5.com"
#property version   "1.00"

// Inclui a classe de negociação padrão do MQL5
#include <Trade\Trade.mqh>
CTrade trade;

//--- Parâmetros de Entrada (Inputs)
input group "--- Parâmetros do Robô ---"
input int      InpEMAPeriod   = 9;          // Período da EMA
input double   InpLotSize     = 0.1;        // Tamanho do lote
input ulong    InpMagicNumber = 123456;     // Número Mágico (Identificador)

//--- Variáveis Globais
int      handleEMA;                         // Handle do indicador
double   bufferEMA[];                       // Array para armazenar os valores da EMA
datetime datetimeUltimoCandle;              // Evita múltiplas operações no mesmo candle

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
{
   // Configura o identificador do robô para a classe trade
   trade.SetExpertMagicNumber(InpMagicNumber);
   
   // Inicializa o indicador EMA
   handleEMA = iMA(_Symbol, _Period, InpEMAPeriod, 0, MODE_EMA, PRICE_CLOSE);
   if(handleEMA == INVALID_HANDLE)
   {
      Print("Erro ao criar o handle da EMA.");
      return(INIT_FAILED);
   }

   // Define o array como série temporal (índice 0 é o candle atual)
   ArraySetAsSeries(bufferEMA, true);
   
   datetimeUltimoCandle = 0;
   return(INIT_SUCCEEDED);
}

//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
   // Libera o handle do indicador para economizar memória
   IndicatorRelease(handleEMA);
}

//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
   // Garante que só operamos no fechamento do candle (nova barra)
   datetime datetimeCandleAtual = iTime(_Symbol, _Period, 0);
   if(datetimeCandleAtual == datetimeUltimoCandle) return;
   
   // Copia os dados mais recentes do indicador para o nosso array
   // Copiamos 4 posições para analisar a inclinação dos candles anteriores
   if(CopyBuffer(handleEMA, 0, 0, 4, bufferEMA) < 0)
   {
      Print("Erro ao copiar dados do indicador.");
      return;
   }
   
   // Verifica se existem posições abertas com o mesmo Magic Number
   if(PositionsTotal() > 0)
   {
      for(int i = PositionsTotal() - 1; i >= 0; i--)
      {
         if(PositionGetSymbol(i) == _Symbol && PositionGetInteger(POSITION_MAGIC) == InpMagicNumber)
         {
            // Já existe uma posição aberta por este robô, não faz nada
            return; 
         }
      }
   }

   /*
      Índices do buffer após ArraySetAsSeries:
      bufferEMA[0] -> Candle atual (ainda em formação, não usamos)
      bufferEMA[1] -> Candle recém-fechado
      bufferEMA[2] -> Penúltimo candle
      bufferEMA[3] -> Antepenúltimo candle
   */

   //--- Lógica do Setup 9.1 ---
   
   // Condição de Compra: EMA[2] estava caindo em relação a EMA[3], e EMA[1] virou para cima
   bool compra91 = (bufferEMA[1] > bufferEMA[2]) && (bufferEMA[2] < bufferEMA[3]);
   
   // Condição de Venda: EMA[2] estava subindo em relação a EMA[3], e EMA[1] virou para baixo
   bool venda91  = (bufferEMA[1] < bufferEMA[2]) && (bufferEMA[2] > bufferEMA[3]);

   // Execução das Ordens
   if(compra91)
   {
      double precoAsk = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
      if(trade.Buy(InpLotSize, _Symbol, precoAsk, 0, 0, "Compra Setup 9.1"))
      {
         datetimeUltimoCandle = datetimeCandleAtual; // Atualiza para evitar novas ordens nesta barra
         Print("Ordem de Compra enviada com sucesso.");
      }
   }
   else if(venda91)
   {
      double precoBid = SymbolInfoDouble(_Symbol, SYMBOL_BID);
      if(trade.Sell(InpLotSize, _Symbol, precoBid, 0, 0, "Venda Setup 9.1"))
      {
         datetimeUltimoCandle = datetimeCandleAtual;
         Print("Ordem de Venda enviada com sucesso.");
      }
   }
}
//+------------------------------------------------------------------+