【MQL5】MathLog1p関数について

double  MathLog1p(
  double  value      // 対数を取る値
  );

#define GRAPH_WIDTH 750   // グラフの幅を750ピクセル（デジタル画像を構成する最小の単位）に設定
#define GRAPH_HEIGHT 350  // グラフの高さを350ピクセルに設定

#include <Graphics\Graphic.mqh>  // グラフィック描画のためのライブラリをインクルード

CGraphic ExtGraph;  // グラフィック描画のためのオブジェクトを作成

//+------------------------------------------------------------------+
//| スクリプトプログラム開始関数                                     |
//+------------------------------------------------------------------+
void OnStart()
 {
  //--- step 1で0〜8の9個の値を取得する
  // VectorArange関数で、0から始まり1ずつ増加する9つの値をXベクトルに代入する
  vector X(9,VectorArange);
  Print("vector X = \n",X);  // 取得したXベクトルをエキスパートログに出力

  //--- 各ベクトル値について、式の対数を計算する（1 + Xベクトル値）
  // MathLog1p関数で、各Xベクトルの値に1を足した後、自然対数（eを底とした対数）を計算する
  X=MathLog1p(X);
  Print("MathLog1p(X) = \n",X);  // 計算結果のXベクトルをエキスパートログに出力

  //--- 計算された値をベクトルから配列に転送する
  double y_array[];  // 計算結果を格納する配列を宣言
  X.Swap(y_array);   // Xベクトルの内容をy_array配列にコピーする

  //--- 計算されたベクトル値のグラフを描画する
  // y_array配列の値を使用して、グラフを描画し、色は青（clrDodgerBlue）に設定
  CurvePlot(y_array,clrDodgerBlue);

  //--- EscapeキーまたはPgDnキーを押してグラフを削除し（スクリーンショットを撮り）、終了するまで待機する
  // スクリプトが停止されるまでループを続ける
  while(!IsStopped())
    {
      // 停止キーが押されていればループを抜ける
      if(StopKeyPressed())
          break;
      Sleep(16);  // 16ミリ秒待機して次の処理へ
    }

  //--- クリーンアップ
  // グラフオブジェクトを破棄してメモリを解放
  ExtGraph.Destroy();

  /*
  結果：
  vector X =
  [0,1,2,3,4,5,6,7,8]
  MathLog1p(X) =
  [0,0.6931471805599453,1.09861228866811,1.386294361119891,1.6094379124341,1.791759469228055,1.945910149055313,2.079441541679836,2.19722457733622]
  */
 }

//+------------------------------------------------------------------+
//| ベクトルに「value」を「step」単位で入力する                      |
//+------------------------------------------------------------------+
template<typename T>
void VectorArange(vector<T> &vec,T value=0.0,T step=1.0)
 {
  // 指定されたvalueから始まり、step間隔で値をベクトルに入力
  for(ulong i=0; i<vec.Size(); i++,value+=step)
    vec[i]=value;  // 各要素に値を代入
 }

//+------------------------------------------------------------------+
//| ESCが押されたら「true」を返す                                    |
//| PgDnが押されたら、グラフのスクリーンショットを撮り、「true」を返す |
//| その他の場合は「false」を返す                                   |
//+------------------------------------------------------------------+
bool StopKeyPressed()
 {
  //--- ESCキーが押されたら「true」を返す
  if(TerminalInfoInteger(TERMINAL_KEYSTATE_ESCAPE)!=0)
    return(true);

  //--- PgDnキーが押されたらスクリーンショットを撮影して「true」を返す
  if(TerminalInfoInteger(TERMINAL_KEYSTATE_PAGEDOWN)!=0 && MakeAndSaveScreenshot(MQLInfoString(MQL_PROGRAM_NAME)+"_Screenshot"))
    return(true);

  //--- どちらのキーも押されていない場合は「false」を返す
  return(false);
 }

//+------------------------------------------------------------------+
//| グラフオブジェクトを作成して曲線を描く                           |
//+------------------------------------------------------------------+
void CurvePlot(double &y_array[], const color colour)
 {
  // グラフオブジェクトを作成し、表示位置とサイズを設定
  ExtGraph.Create(ChartID(), "Graphic", 0, 0, 0, GRAPH_WIDTH, GRAPH_HEIGHT);

  // 曲線を追加し、引数colourで指定した色で描画
  ExtGraph.CurveAdd(y_array, ColorToARGB(colour), CURVE_LINES);

  // グラフの表示位置を調整
  ExtGraph.IndentUp(30);
  
  // グラフ全体を描画
  ExtGraph.CurvePlotAll();

  // ユーザーに操作方法のテキストを表示
  string text1="Press ESC to delete the graph and stop the script, or";
  string text2="Press PgDn to create a screen, delete the graph and stop the script";
  ExtGraph.TextAdd(54, 9, text1, ColorToARGB(clrBlack));
  ExtGraph.TextAdd(54,21, text2, ColorToARGB(clrBlack));
  
  // グラフを更新
  ExtGraph.Update();
 }

//+------------------------------------------------------------------+
//| スクリーンショットを撮り、画像をファイルに保存する               |
//+------------------------------------------------------------------+
bool MakeAndSaveScreenshot(const string file_name)
 {
  // ファイル名を保存する配列
  string file_names[];
  
  // ファイル選択ダイアログを表示し、ユーザーが選択したファイル名を取得
  ResetLastError();
  int selected=FileSelectDialog("Save Picture", NULL, "All files (*.*)|*.*", FSD_WRITE_FILE, file_names, file_name+".png");

  // 選択されなかった場合またはエラーが発生した場合
  if(selected<1)
    {
      if(selected<0)  // エラーの場合、エラーメッセージをエキスパートログに出力
          PrintFormat("%s: FileSelectDialog() function returned error %d", __FUNCTION__, GetLastError());
      return false;  // エラーまたはキャンセル時にfalseを返す
    }
  
  bool res=false;
  
  // グラフを非表示にしてからスクリーンショットを撮影し、指定ファイル名で保存
  if(ChartSetInteger(0,CHART_SHOW,false))
      res=ChartScreenShot(0, file_names[0], GRAPH_WIDTH, GRAPH_HEIGHT);

  // グラフの表示を復元
  ChartSetInteger(0,CHART_SHOW,true);
  
  return(res);  // スクリーンショットが成功すればtrueを返す
 }

#define GRAPH_WIDTH 750    // グラフの幅を設定
#define GRAPH_HEIGHT 350   // グラフの高さを設定

#include <Graphics\Graphic.mqh> // グラフィック描画用のライブラリをインクルード

CGraphic ExtGraph; // CGraphicクラスのインスタンスを作成

//+------------------------------------------------------------------+
//| スクリプトプログラム開始関数                                     |
//+------------------------------------------------------------------+
void OnStart()
 {
  //--- step 1で0〜8の9個の値を取得する
  // VectorArange関数で、0から始まり1ずつ増加する9つの値をXベクトルに代入する
  vector X(9,VectorArange);
  Print("vector X = \n",X);  // 取得したXベクトルをエキスパートログに出力

//--- 計算結果のベクトルの値を配列に転送する
  double y_array[];             // 配列y_arrayを宣言
  X.Swap(y_array);              // ベクトルXの内容をy_arrayにコピー
 
 //--- 計算されたベクトルのグラフを描画する
  CurvePlot(y_array,clrDodgerBlue); // y_arrayの値をもとにグラフを描画
 

//--- EscapeキーまたはPgDnキーを押してグラフを削除し、終了するまで待機
  while (!IsStopped())
    {
    if (StopKeyPressed()) // 停止ボタンが押されているかを確認
        break;
    Sleep(16); // 16ミリ秒待機してから次のループへ
    }
 
  //--- グラフィックのクリーンアップ
  ExtGraph.Destroy(); // ExtGraphオブジェクトを削除してメモリを解放
 }

//+------------------------------------------------------------------+
//| ベクトルに「value」を「step」単位で入力する                      |
//+------------------------------------------------------------------+
template<typename T>
void VectorArange(vector<T>& vec, T value = 0.0, T step = 1.0)
{
    // vecの各要素にvalueからstepごとに増加した値を設定
    for (ulong i = 0; i < vec.Size(); i++, value += step)
        vec[i] = value; // 各要素に値を代入
}

//+------------------------------------------------------------------+
//| ESCが押されたら「true」を返す                                    |
//| PgDnが押されたら、グラフのスクリーンショットを撮り、「true」を返す  |
//| その他の場合は「false」を返す                                    |
//+------------------------------------------------------------------+
bool StopKeyPressed()
{
    // --- ESCが押されたら「true」を返す
    if (TerminalInfoInteger(TERMINAL_KEYSTATE_ESCAPE) != 0)
        return(true);

    // --- PgDnが押されてグラフのスクリーンショットが正常に取得されたら、「true」を返す
    if (TerminalInfoInteger(TERMINAL_KEYSTATE_PAGEDOWN) != 0 && MakeAndSaveScreenshot(MQLInfoString(MQL_PROGRAM_NAME) + "_Screenshot"))
        return(true);

    // --- その他の場合は「false」を返す
    return(false);
}

//+------------------------------------------------------------------+
//| グラフオブジェクトを作成して、計算したデータを基に曲線を描画する   |
//+------------------------------------------------------------------+
void CurvePlot(double &y_array[], const color colour)
{
  // --- グラフの作成と設定
  ExtGraph.Create(ChartID(), "Graphic", 0, 0, 0, GRAPH_WIDTH, GRAPH_HEIGHT);
  
  // --- グラフにカーブを追加して描画する
  ExtGraph.CurveAdd(y_array, ColorToARGB(colour), CURVE_LINES);
  
  // --- テキストメッセージを画面に追加
  string text1 = "Press ESC to delete the graph and stop the script, or";
  string text2 = "Press PgDn to create a screen, delete the graph and stop the script";
  ExtGraph.TextAdd(54, 9, text1, ColorToARGB(clrBlack));
  ExtGraph.TextAdd(54, 21, text2, ColorToARGB(clrBlack));
  
  // --- グラフの更新
  ExtGraph.Update();
}

//+------------------------------------------------------------------+
//| スクリーンショットを撮り、画像をファイルに保存する              |
//+------------------------------------------------------------------+
bool MakeAndSaveScreenshot(const string file_name)
{
    string file_names[]; // ファイル名を格納する配列を定義
    ResetLastError(); // エラー情報をリセット
    
    // ファイル選択ダイアログを表示し、選択されたファイル数を取得
    int selected = FileSelectDialog("Save Picture", NULL, "All files (*.*)|*.*", FSD_WRITE_FILE, file_names, file_name + ".png");
    
    if (selected < 1) // ファイルが選択されなかった場合
    {
        if (selected < 0) // エラーが発生した場合、エラー内容を出力
            PrintFormat("%s: FileSelectDialog() function returned error %d", __FUNCTION__, GetLastError());
        return false;
    }

    // スクリーンショットを撮りファイルに保存
    bool res = false; // 成功を示す変数を初期化
    if (ChartSetInteger(0, CHART_SHOW, false)) // チャートを一時的に非表示
        res = ChartScreenShot(0, file_names[0], GRAPH_WIDTH, GRAPH_HEIGHT); // スクリーンショットを撮影
    ChartSetInteger(0, CHART_SHOW, true); // チャートを再表示
    
    return(res); // スクリーンショットの成功結果を返す
}