【MQL5】ResourceSave関数について

bool  ResourceSave(
  const string  resource_name      // リソース名
  const string  file_name          // ファイル名
  );

//--- グラフィックリソースパラメータの設定
string ExtResName = "Resource";      // リソース名
int ExtResWidth = 100;               // リソースの幅（ピクセル）
int ExtResHeight = 100;              // リソースの高さ（ピクセル）
uint ExtResData[];                   // ピクセルデータを格納する配列
int ExtResSize = ExtResWidth * ExtResHeight; // ピクセル配列の総サイズ

//+------------------------------------------------------------------+
//| スクリプトプログラム開始関数                                      |
//+------------------------------------------------------------------+
void OnStart()
{
  //--- 最後のエラーをリセットする
  ResetLastError();
  
  //--- ピクセル配列のサイズをリサイズする
  if (ArrayResize(ExtResData, ExtResSize) != ExtResSize)
  {
    Print("ArrayResize() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- ピクセル配列を透明色で初期化し、グラフィックリソースを作成する
  ArrayInitialize(ExtResData, 0x00FFFFFF);  // 透明色（白に透明度）でピクセルを初期化
  if (!ResourceCreate(ExtResName, ExtResData, ExtResWidth, ExtResHeight, 0, 0, 0, COLOR_FORMAT_ARGB_NORMALIZE))
  {
    Print("ResourceCreate() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  Print("Size of created resource array: ", ExtResData.Size());  // 作成されたリソースのサイズを出力
  
  //--- 現在のティックデータ（価格と時間）を取得する
  MqlTick tick = {};  // MqlTick構造体でティックデータを格納
  if (!SymbolInfoTick(Symbol(), tick))
  {
    Print("SymbolInfoTick() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- ティックデータに基づいてビットマップオブジェクトを作成する
  string obj_name = "Bitmap";  // ビットマップオブジェクトの名前
  if (!ObjectCreate(0, obj_name, OBJ_BITMAP, 0, tick.time, tick.bid))
  {
    Print("ObjectCreate() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- ビットマップオブジェクトのサイズとアンカーポイントを設定する
  ObjectSetInteger(0, obj_name, OBJPROP_XSIZE, ExtResWidth);    // 幅を設定
  ObjectSetInteger(0, obj_name, OBJPROP_YSIZE, ExtResHeight);   // 高さを設定
  ObjectSetInteger(0, obj_name, OBJPROP_ANCHOR, ANCHOR_CENTER); // 中心をアンカーポイントに設定
  
  //--- グラフィックリソースをビットマップオブジェクトに関連付ける
  ObjectSetString(0, obj_name, OBJPROP_BMPFILE, "::" + ExtResName);  // 「::」を付けてリソース名を指定
  
  //--- ビットマップの色をGreenYellowに設定し、透明度200で表示
  uint clr = ColorToARGB(clrGreenYellow, 200);  // ARGB形式で色を指定（透明度200）
  ArrayInitialize(ExtResData, clr);  // ピクセル配列全体を指定された色で初期化
  
  //--- DodgerBlue色を使用してグリッドを描画する
  for (int x = 0; x < ExtResWidth; x += 9)
    LineVertical(x, 0, ExtResHeight, ColorToARGB(clrDodgerBlue, 200));  // 垂直線を描画
  for (int y = 0; y < ExtResHeight; y += 9)
    LineHorizontal(0, ExtResWidth, y, ColorToARGB(clrDodgerBlue, 200));  // 水平線を描画
  
  //--- グラフィックリソースデータを更新する
  Update(ExtResName, ExtResData, ExtResWidth, ExtResHeight, true);
  
  //--- リソースとオブジェクトを削除する前に3秒待機
  Print("Wait 3 seconds before deleting the resource and graphic object");
  Sleep(3000);  // 3秒待機
  
  //--- リソースをファイルに保存する
  ResetLastError();  // エラーリセット
  if (!ResourceSave("::" + ExtResName, "ResourceSave\\" + ExtResName + ".bmp"))
  {
    Print("ResourceSave() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- リソースとグラフィックオブジェクトを削除する
  if (!ResourceFree("::" + ExtResName))
  {
    Print("ResourceFree() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  if (!ObjectDelete(0, obj_name))
  {
    Print("ObjectDelete() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- 最後のティック価格と時刻に基づいて新しいグラフィックラベルオブジェクトを作成する
  int x = 0, y = 0;
  if (!ChartTimePriceToXY(0, 0, tick.time, tick.bid, x, y))
  {
    Print("ChartTimePriceToXY() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  obj_name = "BitmapLabel";  // 新しいグラフィックラベルオブジェクト名
  if (!ObjectCreate(0, obj_name, OBJ_BITMAP_LABEL, 0, 0, 0))
  {
    Print("ObjectCreate() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- ラベルオブジェクトのアンカーポイントを中心に設定
  ObjectSetInteger(0, obj_name, OBJPROP_ANCHOR, ANCHOR_CENTER);
  
  //--- 座標を調整して、画像の幅だけ左にシフトして設定
  ObjectSetInteger(0, obj_name, OBJPROP_XDISTANCE, x - ExtResWidth);
  ObjectSetInteger(0, obj_name, OBJPROP_YDISTANCE, y);
  
  //--- 先に保存したbmp画像ファイルをリソースとして指定
  ObjectSetString(0, obj_name, OBJPROP_BMPFILE, "\\Files\\ResourceSave\\" + ExtResName + ".bmp");
  
  //--- チャートを更新
  ChartRedraw();
  
  //--- グラフィックラベルオブジェクトを削除する前に3秒待機
  Print("Wait 3 seconds before deleting the new graphic object");
  Sleep(3000);  // 3秒待機
  if (!ObjectDelete(0, obj_name))
    Print("ObjectDelete() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
}

//+------------------------------------------------------------------+
//| グラフィックリソースデータを更新する関数                           |
//+------------------------------------------------------------------+
void Update(const string res_name, const uint &pixel_data[], const uint width, const uint height, const bool redraw)
{
  //--- ゼロ次元が渡された場合は終了する
  if (width == 0 || height == 0)
    return;
  
  //--- リソースデータを更新し、必要ならチャートを再描画する
  if (ResourceCreate(res_name, pixel_data, width, height, 0, 0, 0, COLOR_FORMAT_ARGB_NORMALIZE) && redraw)
    ChartRedraw();
}

//+------------------------------------------------------------------+
//| 垂直線を描画する関数                                              |
//+------------------------------------------------------------------+
void LineVertical(int x, int y1, int y2, const uint clr)
{
  int tmp;
  
  //--- y座標を並べ替える
  if (y1 > y2)
  {
    tmp = y1;
    y1 = y2;
    y2 = tmp;
  }
  
  //--- 画像の境界外の場合は描画しない
  if (y2 < 0 || y1 >= ExtResHeight || x < 0 || x >= ExtResWidth)
    return;
  
  //--- 画像内に収まるように調整する
  if (y1 < 0)
    y1 = 0;
  if (y2 >= ExtResHeight)
    y2 = ExtResHeight - 1;
  
  //--- 垂直線を描画
  int index = y1 * ExtResWidth + x;
  for (int i = y1; i <= y2; i++, index += ExtResWidth)
    ExtResData[index] = clr;
}

//+------------------------------------------------------------------+
//| 水平線を描画する関数                                              |
//+------------------------------------------------------------------+
void LineHorizontal(int x1, int x2, int y, const uint clr)
{
  int tmp;
  
  //--- x座標を並べ替える
  if (x1 > x2)
  {
    tmp = x1;
    x1 = x2;
    x2 = tmp;
  }
  
  //--- 画像の境界外の場合は描画しない
  if (x2 < 0 || x1 >= ExtResWidth || y < 0 || y >= ExtResHeight)
    return;
  
  //--- 画像内に収まるように調整する
  if (x1 < 0)
    x1 = 0;
  if (x2 >= ExtResWidth)
    x2 = ExtResWidth - 1;
  
  //--- 水平線を描画
  ArrayFill(ExtResData, y * ExtResWidth + x1, (x2 - x1) + 1, clr);
}

//--- グラフィックリソースパラメータの設定
string ExtResName = "Resource";      // リソース名
int ExtResWidth = 100;               // リソースの幅（ピクセル）
int ExtResHeight = 100;              // リソースの高さ（ピクセル）
uint ExtResData[];                   // ピクセルデータを格納する配列
int ExtResSize = ExtResWidth * ExtResHeight; // ピクセル配列の総サイズ

//+------------------------------------------------------------------+
//| スクリプトプログラム開始関数                                      |
//+------------------------------------------------------------------+
void OnStart()
{
  //--- 最後のエラーをリセットする
  ResetLastError();
  
  //--- ピクセル配列のサイズをリサイズする
  if (ArrayResize(ExtResData, ExtResSize) != ExtResSize)
  {
    Print("ArrayResize() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- ピクセル配列を透明色で初期化し、グラフィックリソースを作成する
  ArrayInitialize(ExtResData, 0x00FFFFFF);  // 透明色（白に透明度）でピクセルを初期化
  if (!ResourceCreate(ExtResName, ExtResData, ExtResWidth, ExtResHeight, 0, 0, 0, COLOR_FORMAT_ARGB_NORMALIZE))
  {
    Print("ResourceCreate() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  Print("Size of created resource array: ", ExtResData.Size());  // 作成されたリソースのサイズを出力
  

  //--- 現在のティックデータ（価格と時間）を取得する
  MqlTick tick = {};  // MqlTick構造体でティックデータを格納
  if (!SymbolInfoTick(Symbol(), tick))
  {
    Print("SymbolInfoTick() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- ティックデータに基づいてビットマップオブジェクトを作成する
  string obj_name = "Bitmap";  // ビットマップオブジェクトの名前
  if (!ObjectCreate(0, obj_name, OBJ_BITMAP, 0, tick.time, tick.bid))
  {
    Print("ObjectCreate() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }

//--- ビットマップオブジェクトのサイズとアンカーポイントを設定する
  ObjectSetInteger(0, obj_name, OBJPROP_XSIZE, ExtResWidth);    // 幅を設定
  ObjectSetInteger(0, obj_name, OBJPROP_YSIZE, ExtResHeight);   // 高さを設定
  ObjectSetInteger(0, obj_name, OBJPROP_ANCHOR, ANCHOR_CENTER); // 中心をアンカーポイントに設定
  
  //--- グラフィックリソースをビットマップオブジェクトに関連付ける
  ObjectSetString(0, obj_name, OBJPROP_BMPFILE, "::" + ExtResName);  // 「::」を付けてリソース名を指定
  
  //--- ビットマップの色をGreenYellowに設定し、透明度200で表示
  uint clr = ColorToARGB(clrGreenYellow, 200);  // ARGB形式で色を指定（透明度200）
  ArrayInitialize(ExtResData, clr);  // ピクセル配列全体を指定された色で初期化

 //--- DodgerBlue色を使用してグリッドを描画する
  for (int x = 0; x < ExtResWidth; x += 9)
    LineVertical(x, 0, ExtResHeight, ColorToARGB(clrDodgerBlue, 200));  // 垂直線を描画
  for (int y = 0; y < ExtResHeight; y += 9)
    LineHorizontal(0, ExtResWidth, y, ColorToARGB(clrDodgerBlue, 200));  // 水平線を描画
  
  //--- グラフィックリソースデータを更新する
  Update(ExtResName, ExtResData, ExtResWidth, ExtResHeight, true);

 //--- リソースとオブジェクトを削除する前に3秒待機
  Print("Wait 3 seconds before deleting the resource and graphic object");
  Sleep(3000);  // 3秒待機
  
  //--- リソースをファイルに保存する
  ResetLastError();  // エラーリセット
  if (!ResourceSave("::" + ExtResName, "ResourceSave\\" + ExtResName + ".bmp"))
  {
    Print("ResourceSave() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  //--- リソースとグラフィックオブジェクトを削除する
  if (!ResourceFree("::" + ExtResName))
  {
    Print("ResourceFree() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  if (!ObjectDelete(0, obj_name))
  {
    Print("ObjectDelete() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }

//--- 最後のティック価格と時刻に基づいて新しいグラフィックラベルオブジェクトを作成する
  int x = 0, y = 0;
  if (!ChartTimePriceToXY(0, 0, tick.time, tick.bid, x, y))
  {
    Print("ChartTimePriceToXY() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }
  
  obj_name = "BitmapLabel";  // 新しいグラフィックラベルオブジェクト名
  if (!ObjectCreate(0, obj_name, OBJ_BITMAP_LABEL, 0, 0, 0))
  {
    Print("ObjectCreate() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
    return;  // エラーが発生したため、処理を終了する
  }

 //--- ラベルオブジェクトのアンカーポイントを中心に設定
  ObjectSetInteger(0, obj_name, OBJPROP_ANCHOR, ANCHOR_CENTER);
  
  //--- 座標を調整して、画像の幅だけ左にシフトして設定
  ObjectSetInteger(0, obj_name, OBJPROP_XDISTANCE, x - ExtResWidth);
  ObjectSetInteger(0, obj_name, OBJPROP_YDISTANCE, y);
  
  //--- 先に保存したbmp画像ファイルをリソースとして指定
  ObjectSetString(0, obj_name, OBJPROP_BMPFILE, "\\Files\\ResourceSave\\" + ExtResName + ".bmp");
  
  //--- チャートを更新
  ChartRedraw();
  
  //--- グラフィックラベルオブジェクトを削除する前に3秒待機
  Print("Wait 3 seconds before deleting the new graphic object");
  Sleep(3000);  // 3秒待機
  if (!ObjectDelete(0, obj_name))
    Print("ObjectDelete() failed. Error code: ", GetLastError());  // エラー発生時にエキスパートログに出力
}

//+------------------------------------------------------------------+
//| グラフィックリソースデータを更新する関数                           |
//+------------------------------------------------------------------+
void Update(const string res_name, const uint &pixel_data[], const uint width, const uint height, const bool redraw)
{
  //--- ゼロ次元が渡された場合は終了する
  if (width == 0 || height == 0)
    return;
  
  //--- リソースデータを更新し、必要ならチャートを再描画する
  if (ResourceCreate(res_name, pixel_data, width, height, 0, 0, 0, COLOR_FORMAT_ARGB_NORMALIZE) && redraw)
    ChartRedraw();
}

//+------------------------------------------------------------------+
//| 垂直線を描画する関数                                              |
//+------------------------------------------------------------------+
void LineVertical(int x, int y1, int y2, const uint clr)
{
  int tmp;
  
  //--- y座標を並べ替える
  if (y1 > y2)
  {
    tmp = y1;
    y1 = y2;
    y2 = tmp;
  }
  
  //--- 画像の境界外の場合は描画しない
  if (y2 < 0 || y1 >= ExtResHeight || x < 0 || x >= ExtResWidth)
    return;

 //--- 画像内に収まるように調整する
  if (y1 < 0)
    y1 = 0;
  if (y2 >= ExtResHeight)
    y2 = ExtResHeight - 1;
  
  //--- 垂直線を描画
  int index = y1 * ExtResWidth + x;
  for (int i = y1; i <= y2; i++, index += ExtResWidth)
    ExtResData[index] = clr;
}

//+------------------------------------------------------------------+
//| 水平線を描画する関数                                              |
//+------------------------------------------------------------------+
void LineHorizontal(int x1, int x2, int y, const uint clr)
{
  int tmp;
  
  //--- x座標を並べ替える
  if (x1 > x2)
  {
    tmp = x1;
    x1 = x2;
    x2 = tmp;
  }

//--- 画像の境界外の場合は描画しない
  if (x2 < 0 || x1 >= ExtResWidth || y < 0 || y >= ExtResHeight)
    return;
  
  //--- 画像内に収まるように調整する
  if (x1 < 0)
    x1 = 0;
  if (x2 >= ExtResWidth)
    x2 = ExtResWidth - 1;
  
  //--- 水平線を描画
  ArrayFill(ExtResData, y * ExtResWidth + x1, (x2 - x1) + 1, clr);
}