【MQL5】FileReadDouble関数について

double FileReadDouble(int file_handle);

#property indicator_chart_window          // 指標をチャートウィンドウに表示
#property indicator_buffers 1             // 指標バッファの数を1に設定
#property indicator_plots   1             // プロットの数を1に設定
//---- Label1 をプロットする
#property indicator_label1 "MA"           // プロット1のラベルを "MA" に設定
#property indicator_type1   DRAW_LINE     // プロットの描画タイプをラインに設定
#property indicator_color1 clrGreen       // プロットの色を緑色に設定
#property indicator_style1 STYLE_SOLID    // プロットのスタイルを実線に設定
#property indicator_width1  2             // プロットの線の幅を2ピクセルに設定
#property indicator_separate_window       // 別ウィンドウに表示するように設定
//--- データ読みのパラメータ
input string InpFileName="MA.csv";        // 読み込むファイル名を指定（デフォルトは"MA.csv"）
input string InpDirectoryName="Data";     // 読み込むファイルが保存されているディレクトリ名を指定
//--- グローバル変数
int      ind=0;                           // ファイルからの読み込み開始位置を管理する変数
int      size=0;                          // ファイル内のデータサイズを格納する変数
double   ma_buff[];                       // 読み込んだ移動平均データを保存する配列
datetime time_buff[];                     // 読み込んだ時刻データを保存する配列
//--- 指標バッファ
double   buff[];                          // チャートに表示するための指標データを格納する配列
//+------------------------------------------------------------------+
//| カスタム指標を初期化する関数                                      |
//+------------------------------------------------------------------+
int OnInit()
 {
 //--- ファイルを開く
  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));
    
    //--- 初めに、ファイルのデータ量を読み込む
     size=(int)FileReadDouble(file_handle);  // ファイルの最初のデータからデータの数を取得
    
    //--- 配列へメモリを割り当てる
    ArrayResize(ma_buff,size);              // 読み込んだ移動平均データ用の配列をサイズに合わせて調整
    ArrayResize(time_buff,size);            // 読み込んだ時刻データ用の配列をサイズに合わせて調整
    
    //--- ファイルからデータを読む
    for(int i=0;i<size;i++)
       {
        time_buff[i]=(datetime)FileReadDouble(file_handle); // ファイルから時刻データを読み込み、time_buffに格納
        ma_buff[i]=FileReadDouble(file_handle);             // ファイルから移動平均データを読み込み、ma_buffに格納
       }
    
    //--- ファイルを閉じる
    FileClose(file_handle);                 // ファイルの読み取りが完了したので閉じる
    PrintFormat("Data is written, %s file is closed",InpFileName);  // ファイルが閉じたことを通知
    }
  else
    {
    // ファイルが開けなかった場合、エラーメッセージを出力
    PrintFormat("Failed to open %s file, Error code = %d",InpFileName,GetLastError());
    return(INIT_FAILED);                   // ファイルが開けなかった場合は初期化に失敗したことを返す
    }
    
//--- 配列をインデックス0で指標バッファと結合する
  SetIndexBuffer(0,buff,INDICATOR_DATA);   // buff配列をチャート表示用の指標データバッファに設定

//---- チャートでは表示されない指標値を設定する
  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);              // チャートの時刻データを通常の配列順に設定
  
//--- まだ処理されてないバーのループ
  for(int i=prev_calculated;i<rates_total;i++)  // 前回処理されたバー以降からデータを処理
    {
    //--- デフォルトでは 0
     buff[i]=0;                              // デフォルトでは表示する値を0に初期化
    
    //--- データがまだあるかをチェック
    if(ind<size)                             // 読み込んだデータがまだ残っているか確認
       {
        for(int j=ind;j<size;j++)            // 読み込んだデータを順番に確認
          {
          //--- 日付が同じならファイルの値を使用する
          if(time[i]==time_buff[j])          // チャート上の時刻とファイルから読み取った時刻が一致した場合
             {
              buff[i]=ma_buff[j];            // ファイルの移動平均データを指標バッファに格納
              ind=j+1;                       // 読み取ったデータの位置を1つ進める
              break;                         // ループを抜ける
             }
          }
       }
    }
//--- 次の呼び出しのために prev_calculated の値を返す
  return(rates_total);                       // 処理された全データ数を返す
 }

#property indicator_chart_window          // 指標をチャートウィンドウに表示
#property indicator_buffers 1             // 指標バッファの数を1に設定
#property indicator_plots   1             // プロットの数を1に設定
//---- Label1 をプロットする
#property indicator_label1 "MA"           // プロット1のラベルを "MA" に設定
#property indicator_type1   DRAW_LINE     // プロットの描画タイプをラインに設定
#property indicator_color1 clrGreen       // プロットの色を緑色に設定
#property indicator_style1 STYLE_SOLID    // プロットのスタイルを実線に設定
#property indicator_width1  2             // プロットの線の幅を2ピクセルに設定
#property indicator_separate_window       // 別ウィンドウに表示するように設定

//--- データ読みのパラメータ
input string InpFileName="MA.csv";        // 読み込むファイル名を指定（デフォルトは"MA.csv"）
input string InpDirectoryName="Data";     // 読み込むファイルが保存されているディレクトリ名を指定
//--- グローバル変数
int      ind=0;                           // ファイルからの読み込み開始位置を管理する変数
int      size=0;                          // ファイル内のデータサイズを格納する変数
double   ma_buff[];                       // 読み込んだ移動平均データを保存する配列
datetime time_buff[];                     // 読み込んだ時刻データを保存する配列
//--- 指標バッファ
double   buff[];                          // チャートに表示するための指標データを格納する配列

//+------------------------------------------------------------------+
//| カスタム指標を初期化する関数                                      |
//+------------------------------------------------------------------+
int OnInit()
 {
 //--- ファイルを開く
  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));
    
    //--- 初めに、ファイルのデータ量を読み込む
     size=(int)FileReadDouble(file_handle);  // ファイルの最初のデータからデータの数を取得
    
    //--- 配列へメモリを割り当てる
    ArrayResize(ma_buff,size);              // 読み込んだ移動平均データ用の配列をサイズに合わせて調整
    ArrayResize(time_buff,size);            // 読み込んだ時刻データ用の配列をサイズに合わせて調整

 //--- ファイルからデータを読む
    for(int i=0;i<size;i++)
       {
        time_buff[i]=(datetime)FileReadDouble(file_handle); // ファイルから時刻データを読み込み、time_buffに格納
        ma_buff[i]=FileReadDouble(file_handle);             // ファイルから移動平均データを読み込み、ma_buffに格納
       }
    
    //--- ファイルを閉じる
    FileClose(file_handle);                 // ファイルの読み取りが完了したので閉じる
    PrintFormat("Data is written, %s file is closed",InpFileName);  // ファイルが閉じたことを通知
    }

else
    {
    // ファイルが開けなかった場合、エラーメッセージを出力
    PrintFormat("Failed to open %s file, Error code = %d",InpFileName,GetLastError());
    return(INIT_FAILED);                   // ファイルが開けなかった場合は初期化に失敗したことを返す
    }
    
//--- 配列をインデックス0で指標バッファと結合する
  SetIndexBuffer(0,buff,INDICATOR_DATA);   // buff配列をチャート表示用の指標データバッファに設定

//---- チャートでは表示されない指標値を設定する
  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);              // チャートの時刻データを通常の配列順に設定
  
//--- まだ処理されてないバーのループ
  for(int i=prev_calculated;i<rates_total;i++)  // 前回処理されたバー以降からデータを処理
    {
    //--- デフォルトでは 0
     buff[i]=0;                              // デフォルトでは表示する値を0に初期化
    
    //--- データがまだあるかをチェック
    if(ind<size)                             // 読み込んだデータがまだ残っているか確認
       {
        for(int j=ind;j<size;j++)            // 読み込んだデータを順番に確認
          {
          //--- 日付が同じならファイルの値を使用する
          if(time[i]==time_buff[j])          // チャート上の時刻とファイルから読み取った時刻が一致した場合
             {
              buff[i]=ma_buff[j];            // ファイルの移動平均データを指標バッファに格納
              ind=j+1;                       // 読み取ったデータの位置を1つ進める
              break;                         // ループを抜ける
             }
          }
       }
    }
//--- 次の呼び出しのために prev_calculated の値を返す
  return(rates_total);                       // 処理された全データ数を返す
 }