forex-scalping.com

Code: Select all

//+------------------------------------------------------------------+
//|                 CloseAll_RetryMaxSpread_JPY.mq5                  |
//+------------------------------------------------------------------+
#property strict

#include <Trade\Trade.mqh>

int MaxSpreadPoints = 500; 

void OnStart()
{
    CTrade trade;
    trade.SetDeviationInPoints(100); 
    
    // ==========================================
    // 1. DELETE PENDING ORDERS (IMMEDIATE WIPE)
    // ==========================================
    for(int i = OrdersTotal() - 1; i >= 0; i--)
    {
        ulong ticket = OrderGetTicket(i);
        if(ticket > 0)
        {
            string symbol = OrderGetString(ORDER_SYMBOL);
            if(StringFind(symbol, "JPY") >= 0)
            {
                trade.OrderDelete(ticket);
            }
        }
    }
    Print("All JPY pending orders deleted.");

    // ==========================================
    // 2. LOOP TO CLOSE POSITIONS
    // ==========================================
    int attempts = 0;
    
    // IsStopped() ensures the loop breaks if you manually remove the script or close MT5
    while(!IsStopped())
    {
        bool pendingJPYPositions = false;
        attempts++;
        
        for(int i = PositionsTotal() - 1; i >= 0; i--)
        {
            string symbol = PositionGetSymbol(i);
            
            if(StringFind(symbol, "JPY") >= 0)
            {
                long currentSpread = SymbolInfoInteger(symbol, SYMBOL_SPREAD);
                
                if(currentSpread > MaxSpreadPoints)
                {
                    // Flag that we still have JPY exposure due to spread
                    pendingJPYPositions = true; 
                    Print("Attempt ", attempts, ": Spread for ", symbol, " is ", currentSpread, " - Waiting...");
                    continue; 
                }
                
                ulong ticket = PositionGetTicket(i);
                if(ticket > 0)
                {
                    if(!trade.PositionClose(ticket))
                    {
                        // If the close fails (e.g., requote), flag to try again next loop
                        pendingJPYPositions = true;
                        Print("Attempt ", attempts, ": Failed to close ", symbol, ". Retrying...");
                    }
                    else
                    {
                        Print("Attempt ", attempts, ": Successfully closed ", symbol);
                    }
                }
            }
        }
        
        // If the loop finished and no JPY positions triggered the flag, we are flat.
        if(!pendingJPYPositions)
        {
            Alert("All JPY positions successfully closed and orders deleted.");
            break; 
        }
        
        // Sleep for 250 milliseconds before checking spreads again to prevent CPU overload
        Sleep(250); 
    }
}

Code: Select all

//+------------------------------------------------------------------+
//|             CloseAll_RetryMaxSpread_Comment_JPY.mq5              |
//+------------------------------------------------------------------+
#property strict

#include <Trade\Trade.mqh>

int MaxSpreadPoints = 500; 

void OnStart()
{
    CTrade trade;
    trade.SetDeviationInPoints(100); 
    
    // ==========================================
    // 1. DELETE PENDING ORDERS 
    // ==========================================
    for(int i = OrdersTotal() - 1; i >= 0; i--)
    {
        ulong ticket = OrderGetTicket(i);
        if(ticket > 0)
        {
            string symbol = OrderGetString(ORDER_SYMBOL);
            if(StringFind(symbol, "JPY") >= 0)
            {
                trade.OrderDelete(ticket);
            }
        }
    }

    // ==========================================
    // 2. LOOP TO CLOSE POSITIONS WITH UI
    // ==========================================
    int attempts = 0;
    
    while(!IsStopped())
    {
        bool pendingJPYPositions = false;
        attempts++;
        
        // Initialize the comment string for this loop cycle
        string statusText = "--- JPY EMERGENCY CLOSE ACTIVE ---\n";
        statusText += "Attempt: " + IntegerToString(attempts) + "\n\n";
        
        for(int i = PositionsTotal() - 1; i >= 0; i--)
        {
            string symbol = PositionGetSymbol(i);
            
            if(StringFind(symbol, "JPY") >= 0)
            {
                long currentSpread = SymbolInfoInteger(symbol, SYMBOL_SPREAD);
                
                if(currentSpread > MaxSpreadPoints)
                {
                    pendingJPYPositions = true; 
                    statusText += symbol + " | Spread: " + IntegerToString(currentSpread) + " (Limit: " + IntegerToString(MaxSpreadPoints) + ") -> WAITING\n";
                    continue; 
                }
                
                ulong ticket = PositionGetTicket(i);
                if(ticket > 0)
                {
                    if(!trade.PositionClose(ticket))
                    {
                        pendingJPYPositions = true;
                        statusText += symbol + " | Close Failed. Retrying...\n";
                    }
                    else
                    {
                        statusText += symbol + " | CLOSED SUCCESSFULLY\n";
                    }
                }
            }
        }
        
        // Print the built string to the top-left of the chart
        Comment(statusText);
        
        if(!pendingJPYPositions)
        {
            // Clear the comment from the chart when finished
            Comment(""); 
            Alert("All JPY positions successfully closed and orders deleted.");
            break; 
        }
        
        Sleep(250); 
    }
}