MQL4 口座・マーケット情報リファレンス｜AccountBalance・MarketInfo・ロット計算

void PrintAccountInfo()
  {
   Print("=== 口座情報 ===");
   Print("残高: ", DoubleToStr(AccountBalance(), 2));
   Print("有効証拠金: ", DoubleToStr(AccountEquity(), 2));
   Print("余剰証拠金: ", DoubleToStr(AccountFreeMargin(), 2));
   Print("使用証拠金: ", DoubleToStr(AccountMargin(), 2));
   Print("含み損益: ", DoubleToStr(AccountProfit(), 2));

   // 証拠金維持率
   if(AccountMargin() > 0)
     {
      double marginLevel = AccountEquity() / AccountMargin() * 100;
      Print("証拠金維持率: ", DoubleToStr(marginLevel, 1), "%");
     }
  }

bool CheckAccountReady()
  {
   if(!IsTradeAllowed())
     {
      Print("自動売買が許可されていません");
      return false;
     }

   if(!IsConnected())
     {
      Print("サーバーに接続されていません");
      return false;
     }

   Print("口座番号: ", AccountNumber());
   Print("ブローカー: ", AccountCompany());
   Print("サーバー: ", AccountServer());
   Print("口座通貨: ", AccountCurrency());
   Print("レバレッジ: 1:", AccountLeverage());
   Print("デモ口座: ", IsDemo() ? "はい" : "いいえ");

   return true;
  }

double AccountFreeMarginCheck(
   string symbol,   // 通貨ペア
   int    cmd,       // OP_BUY または OP_SELL
   double volume     // ロット数
);
// 戻り値: 注文後の余剰証拠金（負の値なら証拠金不足）

int SafeBuy(double lots, int slPoints, int tpPoints, int magic)
  {
   // 証拠金事前チェック
   double freeMargin = AccountFreeMarginCheck(Symbol(), OP_BUY, lots);

   if(freeMargin < 0)
     {
      Print("証拠金不足: 必要追加額=", DoubleToStr(MathAbs(freeMargin), 2));
      return -1;
     }

   // 余剰証拠金が口座の50%未満なら警告
   if(freeMargin < AccountBalance() * 0.5)
     {
      Print("警告: 証拠金維持率が低下します");
     }

   double sl = NormalizeDouble(Ask - slPoints * Point, Digits);
   double tp = NormalizeDouble(Ask + tpPoints * Point, Digits);

   return OrderSend(Symbol(), OP_BUY, lots, Ask, 3, sl, tp,
                     "SafeBuy", magic, 0, clrBlue);
  }

double MarketInfo(
   string symbol,  // 通貨ペア
   int    type     // 情報タイプ（MODE_〇〇定数）
);

void PrintSymbolInfo(string sym)
  {
   Print("=== ", sym, " ===");
   Print("Bid: ", MarketInfo(sym, MODE_BID));
   Print("Ask: ", MarketInfo(sym, MODE_ASK));
   Print("スプレッド: ", MarketInfo(sym, MODE_SPREAD), " points");
   Print("ポイント: ", MarketInfo(sym, MODE_POINT));
   Print("桁数: ", (int)MarketInfo(sym, MODE_DIGITS));
   Print("ストップレベル: ", MarketInfo(sym, MODE_STOPLEVEL), " points");
   Print("フリーズレベル: ", MarketInfo(sym, MODE_FREEZELEVEL), " points");
   Print("1ロット=", MarketInfo(sym, MODE_LOTSIZE), " 通貨");
   Print("ティック価値: ", MarketInfo(sym, MODE_TICKVALUE));
   Print("最小ロット: ", MarketInfo(sym, MODE_MINLOT));
   Print("最大ロット: ", MarketInfo(sym, MODE_MAXLOT));
   Print("ロットステップ: ", MarketInfo(sym, MODE_LOTSTEP));
   Print("必要証拠金/ロット: ", MarketInfo(sym, MODE_MARGINREQUIRED));
   Print("買いスワップ: ", MarketInfo(sym, MODE_SWAPLONG));
   Print("売りスワップ: ", MarketInfo(sym, MODE_SWAPSHORT));
  }

double CalcLotSize(string sym, double riskPercent, double slPrice, bool isBuy)
  {
   double balance   = AccountBalance();
   double riskMoney = balance * riskPercent / 100.0;

   // SLまでの距離（ポイント単位）
   double entryPrice = isBuy ? MarketInfo(sym, MODE_ASK) : MarketInfo(sym, MODE_BID);
   double slDistance  = MathAbs(entryPrice - slPrice);

   if(slDistance < MarketInfo(sym, MODE_POINT))
      return MarketInfo(sym, MODE_MINLOT);

   // 1ロットあたりのSL損失額
   double tickValue = MarketInfo(sym, MODE_TICKVALUE);
   double tickSize  = MarketInfo(sym, MODE_TICKSIZE);

   if(tickValue == 0 || tickSize == 0)
      return MarketInfo(sym, MODE_MINLOT);

   double slMoney = slDistance / tickSize * tickValue;

   // ロット数計算
   double lots    = riskMoney / slMoney;
   double minLot  = MarketInfo(sym, MODE_MINLOT);
   double maxLot  = MarketInfo(sym, MODE_MAXLOT);
   double lotStep = MarketInfo(sym, MODE_LOTSTEP);

   lots = MathFloor(lots / lotStep) * lotStep;
   lots = MathMax(lots, minLot);
   lots = MathMin(lots, maxLot);

   // 証拠金チェック
   int cmd = isBuy ? OP_BUY : OP_SELL;
   if(AccountFreeMarginCheck(sym, cmd, lots) < 0)
     {
      Print("証拠金不足: ロット縮小");
      while(lots > minLot && AccountFreeMarginCheck(sym, cmd, lots) < 0)
         lots -= lotStep;
     }

   return NormalizeDouble(lots, 2);
  }

// グローバル変数
int    PipMultiplier;
double PipSize;

int OnInit()
  {
   // 3桁/5桁ブローカーの自動判定
   if(Digits == 3 || Digits == 5)
     {
      PipMultiplier = 10;
      PipSize = Point * 10;
     }
   else
     {
      PipMultiplier = 1;
      PipSize = Point;
     }

   Print("PipSize=", PipSize, " PipMultiplier=", PipMultiplier);
   return INIT_SUCCEEDED;
  }

// pips単位でSL/TP計算する例
double PipsToPrice(double pips)
  {
   return pips * PipSize;
  }

// 使用例: 30pipsのSL
// double sl = Ask - PipsToPrice(30);