EAの含み損益を記録するインジケーター

//+------------------------------------------------------------------+
//|                                         AccountProfit_Record.mq4 |
//|                            Copyright 2026, iNak Engineering, LLC |
//|                                             https://inak-eng.jp/ |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, iNak Engineering, LLC"
#property link      "https://inak-eng.jp/"
#property version   "1.00"
#property strict
#property indicator_chart_window

input string filename = "ProfitData"; //Output CSV File Name
int oldBars = 0;

//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {
//--- indicator buffers mapping

   oldBars = Bars;
   
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
  {
//---
   bool ret_us = DST_US();
   bool ret_eu = DST_EU();
   datetime JS_Time;

   if(ret_us == true){
      if(ret_eu == true){
        JS_Time = TimeGMT() + 8 * 3600;
      }else{
        JS_Time = TimeGMT() + 9 * 3600;
      }
   }else{
      if(ret_eu == true){
        JS_Time = TimeGMT() + 8 * 3600;
      }else{
        JS_Time = TimeGMT() + 9 * 3600;
      }
   }

   int newBars = Bars;

   if(newBars == oldBars) return(rates_total);

   int year = TimeYear(JS_Time);
   int month = TimeMonth(JS_Time);
   int day = TimeDay(JS_Time);

   string output_filename = filename + StringFormat("%04d", year) + StringFormat("%02d", month) + StringFormat("%02d", day) + ".csv";

   bool File_Exist = FileIsExist(output_filename,0);
   if(File_Exist == false){
      int handle = FileOpen(output_filename, FILE_READ | FILE_WRITE | FILE_CSV, ",");
      FileWrite(handle, "DateTime,Balance,Credit,Equity,Margin,FreeMargin,StopoutLevel,Profit,Balance+Credit,Balance+Credit+Profit");
      FileWrite(handle, "日付時刻,口座残高,クレジット,有効証拠金,必要証拠金,余剰証拠金,証拠金維持率,損益,口座残高+クレジット,口座残高+クレジット+損益");
      FileClose(handle);
   }

   double Account_StopoutLevel;
   double Account_Equity = AccountEquity();
   double Account_Margin = AccountMargin();
   double Account_Profit = AccountProfit();

   if(Account_Margin == 0){
      Account_StopoutLevel = 0;
   }else{
      Account_StopoutLevel = Account_Equity / Account_Margin * 100;
   }

   int handle = FileOpen(output_filename, FILE_READ | FILE_WRITE | FILE_CSV, ",");
   FileSeek(handle,0, SEEK_END);
   FileWrite(handle, TimeToString(JS_Time, TIME_DATE | TIME_MINUTES), 
                     DoubleToString(AccountBalance(), 0),
                     DoubleToString(AccountCredit(), 0),
                     DoubleToString(Account_Equity, 0),
                     DoubleToString(Account_Margin, 0),
                     DoubleToString(AccountFreeMargin(), 0),
                     DoubleToString(Account_StopoutLevel, 2) + "%",
                     DoubleToString(Account_Profit, 0),
                     DoubleToString(AccountBalance() + AccountCredit(), 0),
                     DoubleToString(AccountBalance() + AccountCredit() + Account_Profit, 0));
   FileClose(handle);

   oldBars = newBars;   

   return(rates_total);
  }

bool DST_US()
  {
   // アメリカ夏時間は true、冬時間は false を返す

   bool ret = false;
   
   datetime DST_Start;
   datetime DST_End;
   datetime Local_Time = TimeCurrent();
   
   //サマータイム開始日（3/14の前の日曜日）
   DST_Start = StringToTime(IntegerToString(Year()) + ".03.14");
   DST_Start = DST_Start - TimeDayOfWeek(DST_Start) * 24 * 60 * 60;
   
   //サマータイム終了日（11/7の前の日曜日）
   DST_End = StringToTime(IntegerToString(Year()) + ".11.07");
   DST_End = DST_End - TimeDayOfWeek(DST_End) *24 * 60 * 60;
   
   if(Local_Time > DST_Start && Local_Time < DST_End) ret = true;
   return ret;
  }

bool DST_EU()
  {
   // ヨーロッパ夏時間は true、冬時間は false を返す

   bool ret = false;
   
   datetime DST_Start;
   datetime DST_End;
   datetime Local_Time = TimeCurrent();
   
   //サマータイム開始日（3/31の前の日曜日）
   DST_Start = StringToTime(IntegerToString(Year()) + ".03.31");
   DST_Start = DST_Start - TimeDayOfWeek(DST_Start) * 24 * 60 * 60;
   
   //サマータイム終了日（10/31の前の日曜日）
   DST_End = StringToTime(IntegerToString(Year()) + ".10.31");
   DST_End = DST_End - TimeDayOfWeek(DST_End) *24 * 60 * 60;
   
   if(Local_Time > DST_Start && Local_Time < DST_End) ret = true;
   return ret;
  }
//+------------------------------------------------------------------+