【MQL5】FileReadInteger関数について

int  FileReadInteger(
  int  file_handle,        // ファイルハンドル
  int  size=INT_VALUE      // バイト単位での整数のサイズ
  );

#property indicator_chart_window            // インジケータをチャートウィンドウに表示する
#property indicator_buffers 1               // インジケータのバッファを1つ使用する
#property indicator_plots   1               // インジケータのプロット数を1つ指定する

//---- ラベル1をプロットする設定
#property indicator_label1 "Trends"         // インジケータの名前を"Trends"に設定
#property indicator_type1   DRAW_SECTION    // 描画の種類をセクションに設定
#property indicator_color1 clrRed           // 描画の色を赤色に設定
#property indicator_style1 STYLE_SOLID      // 線のスタイルを実線に設定
#property indicator_width1  1               // 線の幅を1ピクセル（デジタル画像を構成する最小の単位）に設定

//--- データ読み込みのパラメータ
input string InpFileName="Trend.bin";       // 読み込むファイルの名前を"Trend.bin"に設定
input string InpDirectoryName="Data";       // 読み込むディレクトリの名前を"Data"に設定

//--- グローバル変数
int      ind=0;                             // インデックスを保持する変数
int      size=0;                            // 読み込んだデータのサイズを保持する変数
datetime time_buff[];                       // 読み込んだ時間データを格納する配列

//--- 指標バッファ
double   buff[];                            // インジケータのデータを格納するバッファ

//+------------------------------------------------------------------+
//| カスタム指標を初期化する関数                                       |
//+------------------------------------------------------------------+
int OnInit()
 {
  int def_size=100;                         // デフォルトの配列サイズを100に設定
//--- 配列にメモリを割り当てる
  ArrayResize(time_buff,def_size);          // time_buff配列のサイズを100にリサイズ
//--- ファイルを開く
  ResetLastError();                         // エラーステータスをリセットする
  int file_handle=FileOpen(InpDirectoryName+"//"+InpFileName,FILE_READ|FILE_BIN); 
                                           // 指定されたファイルを読み込み専用のバイナリモードで開く
  if(file_handle!=INVALID_HANDLE)          // ファイルが正しく開かれた場合の処理
    {
    PrintFormat("%s file is available for reading",InpFileName); 
                                            // 読み込み可能なファイルであることをコンソールに出力
    PrintFormat("File path: %s\\Files\\",TerminalInfoString(TERMINAL_DATA_PATH)); 
                                            // ファイルのパスをエキスパートログに出力
    //--- 追加の変数
    int    arr_size;                        // 配列サイズを保持する変数
    uchar  arr[];                           // 読み込んだバイトデータを格納する配列

    //--- ファイルからデータを読み取る
    while(!FileIsEnding(file_handle))       // ファイルの末尾に達していない間、読み込みを続ける
       {
        //--- 時間情報を格納するためのバイト数を読み取る
        arr_size=FileReadInteger(file_handle,INT_VALUE); 
                                            // 4バイト（int型）を読み取ってサイズを取得
        ArrayResize(arr,arr_size);          // 読み込むデータ用に配列arrのサイズをリサイズ
        for(int i=0;i<arr_size;i++)
           arr[i]=(char)FileReadInteger(file_handle,CHAR_VALUE); 
                                            // 1バイト（char型）を1つずつ読み込み、arr配列に格納

        //--- 読み取ったデータを時間に変換し、time_buffに保存
        time_buff[size]=StringToTime(CharArrayToString(arr)); 
                                            // 文字配列arrを文字列に変換し、それを時間データとしてtime_buffに格納
        size++;                             // 読み込んだデータ数をカウント

        //--- 配列がいっぱいになった場合、配列サイズを100ずつ増やす
        if(size==def_size)
          {
           def_size+=100;                   // 配列サイズを100増加
           ArrayResize(time_buff,def_size); // time_buff配列のサイズを再調整
          }
       }

    //--- ファイルを閉じる
    FileClose(file_handle);                 // ファイルを閉じる
    PrintFormat("Data is read, %s file is closed",InpFileName); 
                                            // ファイルが正しく読み込まれ、閉じられたことをエキスパートログに出力
    }
  else                                      // ファイルが開けなかった場合の処理
    {
    PrintFormat("Failed to open %s file, Error code = %d",InpFileName,GetLastError()); 
                                            // ファイルが開けなかったこととエラーコードをエキスパートログに出力
    return(INIT_FAILED);                    // 初期化失敗を返す
    }

//--- 配列とインジケータバッファを関連付ける
  SetIndexBuffer(0,buff,INDICATOR_DATA);    // インジケータバッファにデータを設定する
//---- チャートには表示されない指標値を設定する
  PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0); // 指定したプロットには表示されない値を設定
//---
  return(INIT_SUCCEEDED);                   // 初期化が成功した場合の戻り値を返す
 }

//+------------------------------------------------------------------+
//| カスタム指標の反復計算を行う関数                                   |
//+------------------------------------------------------------------+
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[])           // 各バーのスプレッド
 {
  ArraySetAsSeries(time,false);              // time配列を非時系列モードに設定
  ArraySetAsSeries(close,false);             // close配列を非時系列モードに設定

//--- 前回計算されていないバーから現在のバーまでループ
  for(int i=prev_calculated;i<rates_total;i++)
    {
    //--- バッファの初期値を0に設定
     buff[i]=0;                             // buffバッファの初期化
    //--- 読み込んだデータがまだ存在するかを確認
    if(ind<size)
       {
        for(int j=ind;j<size;j++)
          {
          //--- 時間が一致する場合、ファイルのデータを使用
          if(time[i]==time_buff[j])          // ファイル内の時間とチャートの時間が一致する場合
             {
              //--- ファイルから得たデータを終値に設定
              buff[i]=close[i];              // 終値データをbuffバッファに保存
              //--- 次のデータに進むためにインデックスを増やす
              ind=j+1;                       // indをインクリメントして次のデータへ移動
              break;                         // ループを抜けて次のバーに進む
             }
          }
       }
    }
//--- 計算されたバーの数を返す
  return(rates_total);                      // 処理したバーの総数を戻り値として返す
 }

#property indicator_chart_window            // インジケータをチャートウィンドウに表示する
#property indicator_buffers 1               // インジケータのバッファを1つ使用する
#property indicator_plots   1               // インジケータのプロット数を1つ指定する

//---- ラベル1をプロットする設定
#property indicator_label1 "Trends"         // インジケータの名前を"Trends"に設定
#property indicator_type1   DRAW_SECTION    // 描画の種類をセクションに設定
#property indicator_color1 clrRed           // 描画の色を赤色に設定
#property indicator_style1 STYLE_SOLID      // 線のスタイルを実線に設定
#property indicator_width1  1               // 線の幅を1ピクセル（デジタル画像を構成する最小の単位）に設定

//--- データ読み込みのパラメータ
input string InpFileName="Trend.bin";       // 読み込むファイルの名前を"Trend.bin"に設定
input string InpDirectoryName="Data";       // 読み込むディレクトリの名前を"Data"に設定

//--- グローバル変数
int      ind=0;                             // インデックスを保持する変数
int      size=0;                            // 読み込んだデータのサイズを保持する変数
datetime time_buff[];                       // 読み込んだ時間データを格納する配列

//--- 指標バッファ
double   buff[];                            // インジケータのデータを格納するバッファ

//+------------------------------------------------------------------+
//| カスタム指標を初期化する関数                                       |
//+------------------------------------------------------------------+
int OnInit()
 {
  int def_size=100;                         // デフォルトの配列サイズを100に設定
//--- 配列にメモリを割り当てる
  ArrayResize(time_buff,def_size);          // time_buff配列のサイズを100にリサイズ
//--- ファイルを開く
  ResetLastError();                         // エラーステータスをリセットする
  int file_handle=FileOpen(InpDirectoryName+"//"+InpFileName,FILE_READ|FILE_BIN); 
                                           // 指定されたファイルを読み込み専用のバイナリモードで開く
  if(file_handle!=INVALID_HANDLE)          // ファイルが正しく開かれた場合の処理
    {
    PrintFormat("%s file is available for reading",InpFileName); 
                                            // 読み込み可能なファイルであることをコンソールに出力
    PrintFormat("File path: %s\\Files\\",TerminalInfoString(TERMINAL_DATA_PATH)); 
                                            // ファイルのパスをエキスパートログに出力
    //--- 追加の変数
    int    arr_size;                        // 配列サイズを保持する変数
    uchar  arr[];                           // 読み込んだバイトデータを格納する配列

    //--- ファイルからデータを読み取る
    while(!FileIsEnding(file_handle))       // ファイルの末尾に達していない間、読み込みを続ける
       {
        //--- 時間情報を格納するためのバイト数を読み取る
        arr_size=FileReadInteger(file_handle,INT_VALUE); 
                                            // 4バイト（int型）を読み取ってサイズを取得
        ArrayResize(arr,arr_size);          // 読み込むデータ用に配列arrのサイズをリサイズ
        for(int i=0;i<arr_size;i++)
           arr[i]=(char)FileReadInteger(file_handle,CHAR_VALUE); 
                                            // 1バイト（char型）を1つずつ読み込み、arr配列に格納

        //--- 読み取ったデータを時間に変換し、time_buffに保存
        time_buff[size]=StringToTime(CharArrayToString(arr)); 
                                            // 文字配列arrを文字列に変換し、それを時間データとしてtime_buffに格納
        size++;                             // 読み込んだデータ数をカウント

        //--- 配列がいっぱいになった場合、配列サイズを100ずつ増やす
        if(size==def_size)
          {
           def_size+=100;                   // 配列サイズを100増加
           ArrayResize(time_buff,def_size); // time_buff配列のサイズを再調整
          }
       }

//--- ファイルを閉じる
    FileClose(file_handle);                 // ファイルを閉じる
    PrintFormat("Data is read, %s file is closed",InpFileName); 
                                            // ファイルが正しく読み込まれ、閉じられたことをエキスパートログに出力
    }
  else                                      // ファイルが開けなかった場合の処理
    {
    PrintFormat("Failed to open %s file, Error code = %d",InpFileName,GetLastError()); 
                                            // ファイルが開けなかったこととエラーコードをエキスパートログに出力
    return(INIT_FAILED);                    // 初期化失敗を返す
    }

//--- 配列とインジケータバッファを関連付ける
  SetIndexBuffer(0,buff,INDICATOR_DATA);    // インジケータバッファにデータを設定する
//---- チャートには表示されない指標値を設定する
  PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0); // 指定したプロットには表示されない値を設定
//---
  return(INIT_SUCCEEDED);                   // 初期化が成功した場合の戻り値を返す
 }

//+------------------------------------------------------------------+
//| カスタム指標の反復計算を行う関数                                   |
//+------------------------------------------------------------------+
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[])           // 各バーのスプレッド
 {
  ArraySetAsSeries(time,false);              // time配列を非時系列モードに設定
  ArraySetAsSeries(close,false);             // close配列を非時系列モードに設定

//--- 前回計算されていないバーから現在のバーまでループ
  for(int i=prev_calculated;i<rates_total;i++)
    {
    //--- バッファの初期値を0に設定
     buff[i]=0;                             // buffバッファの初期化
    //--- 読み込んだデータがまだ存在するかを確認
    if(ind<size)
       {
        for(int j=ind;j<size;j++)
          {
          //--- 時間が一致する場合、ファイルのデータを使用
          if(time[i]==time_buff[j])          // ファイル内の時間とチャートの時間が一致する場合
             {
              //--- ファイルから得たデータを終値に設定
              buff[i]=close[i];              // 終値データをbuffバッファに保存
              //--- 次のデータに進むためにインデックスを増やす
              ind=j+1;                       // indをインクリメントして次のデータへ移動
              break;                         // ループを抜けて次のバーに進む
             }
          }
       }
    }
//--- 計算されたバーの数を返す
  return(rates_total);                      // 処理したバーの総数を戻り値として返す
 }