【MQL】警告だけでは手が止まらない人へ。
同方向ポジションが増えすぎたら強制決済する”ナンピン抑止EA”のアイデア

//+------------------------------------------------------------------+
//|                                          NampinStopper-EA.mq4     |
//|                     Copyright 2026, FX-EA System Project Creator |
//|                        https://creator.fx-ea-system-project.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, FX-EA System Project Creator"
#property link      "https://creator.fx-ea-system-project.com/"
#property version   "1.00"
#property strict

input int  MaxPositionsPerDirection = 2;//同方向で許可する最大ポジション数
input int  TargetMagicNumber        = 0;//監視対象のマジックナンバー(0=裁量トレード)
input bool MonitorAllMagicNumbers   = false;//trueにするとマジックナンバーを問わず全ポジションを監視
input int  Slippage                 = 3;//強制決済時のスリッページ

//+------------------------------------------------------------------+
//| このポジションが監視対象かどうかを判定する                        |
//+------------------------------------------------------------------+
bool IsTargetPosition()
  {
   if(OrderSymbol() != Symbol())
      return(false);
   if(MonitorAllMagicNumbers)
      return(true);
   return(OrderMagicNumber() == TargetMagicNumber);
  }

//+------------------------------------------------------------------+
//| 指定した方向(OP_BUY/OP_SELL)のポジション数が上限を超えている間、  |
//| 最も新しく開いたポジションを1本ずつ強制決済する                    |
//+------------------------------------------------------------------+
void EnforceLimit(int orderType)
  {
   while(true)
     {
      int      count      = 0;
      int      newestIndex = -1;
      datetime newestTime  = 0;

      for(int i = 0; i < OrdersTotal(); i++)
        {
         if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
            continue;
         if(!IsTargetPosition())
            continue;
         if(OrderType() != orderType)
            continue;

         count++;
         if(OrderOpenTime() > newestTime)
           {
            newestTime  = OrderOpenTime();
            newestIndex = i;
           }
        }

      if(count <= MaxPositionsPerDirection)
         break;//上限以下になったので終了
      if(newestIndex < 0)
         break;//念のための安全策(通常は到達しない)

      if(!OrderSelect(newestIndex, SELECT_BY_POS, MODE_TRADES))
         break;

      int    ticket     = OrderTicket();
      double lots       = OrderLots();
      double closePrice = (orderType == OP_BUY) ? Bid : Ask;

      if(OrderClose(ticket, lots, closePrice, Slippage, clrRed))
        {
         Alert("ナンピン抑止EA: 同方向ポジションが上限(", MaxPositionsPerDirection,
               "本)を超えたため、直近のポジション(#", ticket, ")を強制決済しました。");
        }
      else
        {
         Print("強制決済に失敗しました。チケット=", ticket, " エラーコード=", GetLastError());
         break;//無限ループを避けるため、失敗時はこのティックでの処理を打ち切る
        }
     }
  }

//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   EnforceLimit(OP_BUY);
   EnforceLimit(OP_SELL);
  }
//+------------------------------------------------------------------+