Programación en MQL5 (IV)

//+------------------------------------------------------------------+
//| Ejemplo de envío de notificaciones con saldo de cuenta           |
//+------------------------------------------------------------------+

// Parámetros de entrada
input string EmailAddress = "tucorreo@example.com"; // Dirección de correo electrónico
input string NotificationMessage = "¡Alerta de Trading!"; // Mensaje de notificación

// Función principal que se ejecuta en cada tick
void OnTick() {
   // Obtener el saldo actual de la cuenta
   double accountBalance = AccountInfoDouble(ACCOUNT_BALANCE);

   // Verificar si hay posiciones abiertas
   if (PositionsTotal() > 0) {
      // Crear un mensaje personalizado con el saldo de la cuenta
      string emailSubject = "Estado de Posiciones";
      string emailBody = "Tienes " + IntegerToString(PositionsTotal()) + " posiciones abiertas.\n";
      emailBody += "Saldo actual de la cuenta: " + DoubleToString(accountBalance, 2) + " " + AccountCurrency();

      // Enviar una notificación por correo electrónico
      SendMail(emailSubject, emailBody);

      // Enviar una notificación push al dispositivo móvil
      SendNotification(NotificationMessage);
   }
}

Tienes 2 posiciones abiertas.
Saldo actual de la cuenta: 10,000.50 USD

//+------------------------------------------------------------------+
//| Sistema de registro de operaciones en un archivo CSV             |
//+------------------------------------------------------------------+

// Nombre del archivo CSV
string csvFileName = "TradingHistory.csv";

// Función principal que se ejecuta en cada tick
void OnTick() {
   // Registrar operaciones abiertas
   LogOpenPositions();

   // Registrar operaciones cerradas
   LogClosedPositions();
}

// Función para registrar operaciones abiertas
void LogOpenPositions() {
   int totalOpenPositions = PositionsTotal();
   if (totalOpenPositions > 0) {
      for (int i = 0; i < totalOpenPositions; i++) {
         ulong ticket = PositionGetTicket(i);
         string symbol = PositionGetString(POSITION_SYMBOL);
         double volume = PositionGetDouble(POSITION_VOLUME);
         double price = PositionGetDouble(POSITION_PRICE_OPEN);
         int type = (int)PositionGetInteger(POSITION_TYPE);

         string operationType = (type == POSITION_TYPE_BUY) ? "Buy" : "Sell";
         string logMessage = TimeToString(TimeCurrent(), TIME_DATE | TIME_SECONDS) + "," +
                             IntegerToString(ticket) + "," +
                             symbol + "," +
                             operationType + "," +
                             DoubleToString(volume, 2) + "," +
                             DoubleToString(price, _Digits) + ",Open\n";

         WriteToCSV(csvFileName, logMessage);
      }
   }
}

// Función para registrar operaciones cerradas
void LogClosedPositions() {
   int totalClosedDeals = HistoryDealsTotal();
   if (totalClosedDeals > 0) {
      for (int i = 0; i < totalClosedDeals; i++) {
         ulong ticket = HistoryDealGetTicket(i);
         if (ticket > 0) {
            string symbol = HistoryDealGetString(ticket, DEAL_SYMBOL);
            double volume = HistoryDealGetDouble(ticket, DEAL_VOLUME);
            double price = HistoryDealGetDouble(ticket, DEAL_PRICE);
            int type = (int)HistoryDealGetInteger(ticket, DEAL_TYPE);
            double profit = HistoryDealGetDouble(ticket, DEAL_PROFIT);

            string operationType = (type == DEAL_TYPE_BUY) ? "Buy" : "Sell";
            string logMessage = TimeToString(TimeCurrent(), TIME_DATE | TIME_SECONDS) + "," +
                                IntegerToString(ticket) + "," +
                                symbol + "," +
                                operationType + "," +
                                DoubleToString(volume, 2) + "," +
                                DoubleToString(price, _Digits) + "," +
                                DoubleToString(profit, 2) + ",Closed\n";

            WriteToCSV(csvFileName, logMessage);
         }
      }
   }
}

// Función para escribir en un archivo CSV
void WriteToCSV(string fileName, string message) {
   int fileHandle = FileOpen(fileName, FILE_WRITE | FILE_CSV); // Abrir el archivo en modo escritura CSV
   if (fileHandle != INVALID_HANDLE) {
      if (FileSize(fileHandle) == 0) {
         // Escribir encabezado si el archivo está vacío
         FileWrite(fileHandle, "Timestamp,Ticket,Symbol,Type,Volume,Price,Profit,Status");
      }
      FileWrite(fileHandle, message); // Escribir el mensaje
      FileClose(fileHandle); // Cerrar el archivo
   } else {
      Print("Error al abrir el archivo CSV.");
   }
}

Timestamp,Ticket,Symbol,Type,Volume,Price,Profit,Status
2023.10.01 10:00:00,123456,EURUSD,Buy,0.10,1.2000,,Open
2023.10.01 10:05:00,123457,EURUSD,Sell,0.10,1.1980,20.00,Closed

//+------------------------------------------------------------------+
//| EA que muestra una alerta visual cuando el spread es alto        |
//+------------------------------------------------------------------+

// Parámetros de entrada
input int MaxSpreadPips = 2; // Umbral máximo permitido para el spread (en pips)

// Variables globales
bool alertShown = false; // Controla si la alerta ya se ha mostrado

// Función principal que se ejecuta en cada tick
void OnTick() {
   // Calcular el spread actual en pips
   double currentSpread = (SymbolInfoDouble(_Symbol, SYMBOL_ASK) - SymbolInfoDouble(_Symbol, SYMBOL_BID)) / Point();

   // Verificar si el spread supera el umbral
   if (currentSpread > MaxSpreadPips) {
      if (!alertShown) {
         // Mostrar una alerta visual
         Alert("¡El spread actual (" + DoubleToString(currentSpread, 1) + " pips) supera el umbral de " +
               IntegerToString(MaxSpreadPips) + " pips!");

         // Dibujar una línea horizontal en el gráfico para destacar el spread
         DrawSpreadAlertLine(currentSpread);

         // Marcar que la alerta ya se ha mostrado
         alertShown = true;
      }
   } else {
      // Restablecer la bandera si el spread vuelve a estar dentro del umbral
      alertShown = false;

      // Eliminar la línea de alerta del gráfico
      ObjectDelete(0, "SpreadAlertLine");
   }
}

// Función para dibujar una línea de alerta en el gráfico
void DrawSpreadAlertLine(double spreadValue) {
   string objectName = "SpreadAlertLine";
   if (!ObjectCreate(0, objectName, OBJ_HLINE, 0, 0, Bid)) {
      Print("Error al crear la línea de alerta. Código de error: ", GetLastError());
   } else {
      ObjectSetInteger(0, objectName, OBJPROP_COLOR, clrRed); // Color rojo
      ObjectSetInteger(0, objectName, OBJPROP_STYLE, STYLE_DASHDOT); // Estilo de línea discontinua
      ObjectSetString(0, objectName, OBJPROP_TOOLTIP, "Spread elevado: " + DoubleToString(spreadValue, 1) + " pips"); // Tooltip
   }
}

¡El spread actual (2.5 pips) supera el umbral de 2 pips!