forex-scalping.com

Code: Select all

//+------------------------------------------------------------------+
//|                                              EmergencyFlatten.mq4|
//|                                      Instantly closes all orders |
//+------------------------------------------------------------------+
#property copyright "Custom MT4 Script"
#property strict
#property show_inputs

extern bool CloseAllSymbols = true; // True = Kill all symbols, False = Current chart only
extern int MaxSlippage = 5;         // Allowable slippage in points

void OnStart()
{
    int total = OrdersTotal();
    
    // Loop backwards so index doesn't shift as orders are closed
    for(int i = total - 1; i >= 0; i--)
    {
        if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
        {
            // Skip if set to current chart only and symbol doesn't match
            if(!CloseAllSymbols && OrderSymbol() != Symbol()) continue;
            
            int type = OrderType();
            bool result = false;
            
            // Close Market Buy Orders
            if(type == OP_BUY)
            {
                RefreshRates();
                double bid = MarketInfo(OrderSymbol(), MODE_BID);
                result = OrderClose(OrderTicket(), OrderLots(), bid, MaxSlippage, clrRed);
            }
            // Close Market Sell Orders
            else if(type == OP_SELL)
            {
                RefreshRates();
                double ask = MarketInfo(OrderSymbol(), MODE_ASK);
                result = OrderClose(OrderTicket(), OrderLots(), ask, MaxSlippage, clrRed);
            }
            // Delete Pending Orders (Limits and Stops)
            else if(type > OP_SELL)
            {
                result = OrderDelete(OrderTicket(), clrRed);
            }
            
            if(!result)
            {
                Print("Failed to close/delete order #", OrderTicket(), " | Error: ", GetLastError());
            }
        }
    }
    Print("Emergency Flatten Execution Completed.");
}

Code: Select all

//+------------------------------------------------------------------+
//|                                              EmergencyFlatten.mq5|
//|                                      Instantly closes all orders |
//+------------------------------------------------------------------+
#property copyright "Custom MT5 Script"
#property version   "1.00"
#property script_show_inputs

#include <Trade\Trade.mqh>

input bool CloseAllSymbols = true; // True = Kill all symbols, False = Current chart only
input ulong MaxSlippage = 5;       // Allowable slippage in points

void OnStart()
{
    CTrade trade;
    trade.SetDeviationInPoints(MaxSlippage);

    //--- 1. Close all open positions (Active Market Trades)
    int totalPositions = PositionsTotal();
    for(int i = totalPositions - 1; i >= 0; i--)
    {
        ulong ticket = PositionGetTicket(i);
        if(ticket > 0)
        {
            string posSymbol = PositionGetString(POSITION_SYMBOL);
            
            // Skip if set to current chart only and symbol doesn't match
            if(!CloseAllSymbols && posSymbol != _Symbol) 
                continue;
                
            if(!trade.PositionClose(ticket))
            {
                PrintFormat("Failed to close position #%I64u | Error: %d", ticket, GetLastError());
            }
        }
    }
    
    //--- 2. Delete all pending orders (Limits and Stops)
    int totalOrders = OrdersTotal();
    for(int i = totalOrders - 1; i >= 0; i--)
    {
        ulong ticket = OrderGetTicket(i);
        if(ticket > 0)
        {
            string ordSymbol = OrderGetString(ORDER_SYMBOL);
            
            // Skip if set to current chart only and symbol doesn't match
            if(!CloseAllSymbols && ordSymbol != _Symbol) 
                continue;
                
            if(!trade.OrderDelete(ticket))
            {
                PrintFormat("Failed to delete pending order #%I64u | Error: %d", ticket, GetLastError());
            }
        }
    }
    
    Print("Emergency Flatten Execution Completed.");
}

Code: Select all

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © Custom Pine Script

//@version=5
strategy("Emergency Flatten Tool", overlay=true)

// --- EMERGENCY KILL SWITCH ---
// When checked in the script settings, it forces the strategy flat.
emergencyFlat = input.bool(false, title="🚨 EMERGENCY FLATTEN 🚨", group="Emergency Management", tooltip="Check this box to instantly close all open positions and cancel all pending orders for this strategy.")

if emergencyFlat
    // Close all active market positions
    strategy.close_all(comment="EMERGENCY FLAT: Market positions closed")
    // Cancel all pending limit/stop orders
    strategy.cancel_all()

// --- EXAMPLE STRATEGY LOGIC ---
// (Your actual trading logic goes here)
// Just an example condition to show normal operation:
longCondition = ta.crossover(ta.sma(close, 14), ta.sma(close, 28))
if (longCondition and not emergencyFlat)
    strategy.entry("Long", strategy.long)

shortCondition = ta.crossunder(ta.sma(close, 14), ta.sma(close, 28))
if (shortCondition and not emergencyFlat)
    strategy.entry("Short", strategy.short)

Code: Select all

using System;
using System.Linq;
using cAlgo.API;

namespace cAlgo.Robots
{
    [Robot(TimeZone = TimeZones.UTC, AccessRights = AccessRights.None)]
    public class EmergencyFlatten : Robot
    {
        [Parameter("Close All Symbols", DefaultValue = true, Group = "Safety")]
        public bool CloseAllSymbols { get; set; }

        protected override void OnStart()
        {
            Print("Emergency Flatten executing...");

            // --- 1. Close Open Positions ---
            var targetPositions = CloseAllSymbols ? Positions : Positions.FindAll(SymbolName);
            
            // Using synchronous ClosePosition to ensure completion before the bot stops
            foreach (var position in targetPositions)
            {
                var result = ClosePosition(position);
                if (!result.IsSuccessful)
                {
                    Print($"Failed to close position {position.Id} | Error: {result.Error}");
                }
            }

            // --- 2. Cancel Pending Orders (Limits and Stops) ---
            var targetOrders = CloseAllSymbols 
                ? PendingOrders 
                : PendingOrders.Where(o => o.SymbolName == SymbolName).ToArray();
                
            foreach (var order in targetOrders)
            {
                var result = CancelPendingOrder(order);
                if (!result.IsSuccessful)
                {
                    Print($"Failed to cancel pending order {order.Id} | Error: {result.Error}");
                }
            }

            Print("Emergency Flatten complete.");
            
            // Immediately terminate the cBot so it behaves exactly like a run-once script
            Stop();
        }
    }
}