MQLでトレーリングストップを入れる方法（MT4・MT5）

MQL4（MT4）コードをコピー

#property strict
// トレーリングストップの EA（MT4）
input double InpStart = 20;     // トレールを始める含み益（pips）
input double InpTrail = 15;     // 現在値から損切りまでの幅（pips）
input int    InpMagic = 1001;   // 対象のマジックナンバー（-1 ならすべて）

int OnInit()
{
   return INIT_SUCCEEDED;
}

void OnTick()
{
   double pip = (_Digits == 3 || _Digits == 5) ? _Point * 10 : _Point;
   for(int i = OrdersTotal() - 1; i >= 0; i--)
   {
      if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
      if(OrderSymbol() != _Symbol || (InpMagic >= 0 && OrderMagicNumber() != InpMagic)) continue;

      if(OrderType() == OP_BUY && Bid - OrderOpenPrice() >= InpStart * pip)
      {
         double sl = NormalizeDouble(Bid - InpTrail * pip, _Digits);
         if(OrderStopLoss() == 0 || sl > OrderStopLoss() + _Point / 2)
            if(!OrderModify(OrderTicket(), OrderOpenPrice(), sl, OrderTakeProfit(), 0))
               Print("変更失敗 error=", GetLastError());
      }
      if(OrderType() == OP_SELL && OrderOpenPrice() - Ask >= InpStart * pip)
      {
         double sl = NormalizeDouble(Ask + InpTrail * pip, _Digits);
         if(OrderStopLoss() == 0 || sl < OrderStopLoss() - _Point / 2)
            if(!OrderModify(OrderTicket(), OrderOpenPrice(), sl, OrderTakeProfit(), 0))
               Print("変更失敗 error=", GetLastError());
      }
   }
}

MQL5（MT5）コードをコピー

// トレーリングストップの EA（MT5）
#include <Trade\Trade.mqh>

input double InpStart = 20;     // トレールを始める含み益（pips）
input double InpTrail = 15;     // 現在値から損切りまでの幅（pips）
input long   InpMagic = 1001;   // 対象のマジックナンバー（-1 ならすべて）

CTrade trade;

int OnInit()
{
   return INIT_SUCCEEDED;
}

void OnTick()
{
   double pip = (_Digits == 3 || _Digits == 5) ? _Point * 10 : _Point;
   double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);
   double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
   for(int i = PositionsTotal() - 1; i >= 0; i--)
   {
      ulong ticket = PositionGetTicket(i);
      if(ticket == 0) continue;
      if(PositionGetString(POSITION_SYMBOL) != _Symbol) continue;
      if(InpMagic >= 0 && PositionGetInteger(POSITION_MAGIC) != InpMagic) continue;

      double open = PositionGetDouble(POSITION_PRICE_OPEN);
      double cur  = PositionGetDouble(POSITION_SL);
      double tp   = PositionGetDouble(POSITION_TP);
      if(PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_BUY && bid - open >= InpStart * pip)
      {
         double sl = NormalizeDouble(bid - InpTrail * pip, _Digits);
         if(cur == 0 || sl > cur + _Point / 2)
            if(!trade.PositionModify(ticket, sl, tp))
               Print("変更失敗 ", trade.ResultRetcodeDescription());
      }
      if(PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_SELL && open - ask >= InpStart * pip)
      {
         double sl = NormalizeDouble(ask + InpTrail * pip, _Digits);
         if(cur == 0 || sl < cur - _Point / 2)
            if(!trade.PositionModify(ticket, sl, tp))
               Print("変更失敗 ", trade.ResultRetcodeDescription());
      }
   }
}