MT4対応：スワップ自動計算のインジケーターをMQL4で作る方法

//+------------------------------------------------------------------+
//|                                                      CHK_swap.mq4 |
//|                                     Copyright 2020, pfx Software |
//|                                             https://fx-prog.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright 2020, mef Software"
#property link      "https://fx-prog.com/"
#property version   "1.10"
#property indicator_chart_window

input double Tuuka_Tani = 10;     //10万通貨の場合10

input int display_X = 5;      //表示位置X
input int display_Y = 30;     //表示位置Y

string objectName = "SHOW_SWAP_POINT";

int prevWeek;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {

//---
   //ラベルオブジェクトの作成
   if(!ObjectCreate(0, objectName, OBJ_LABEL, 0, 0, 0))
   {
      return(INIT_FAILED);
   }
   // 座標のアンカー位置
   ObjectSetInteger(0, objectName ,OBJPROP_ANCHOR, ANCHOR_LEFT_LOWER);
   // Ｘ位置
   ObjectSetInteger(0, objectName, OBJPROP_XDISTANCE, display_X);
   // Ｙ位置
   ObjectSetInteger(0, objectName, OBJPROP_YDISTANCE, display_Y);
   // 色
   ObjectSetInteger(0, objectName, OBJPROP_COLOR, clrWhite);
   // 読み取り専用
   ObjectSetInteger(0, objectName, OBJPROP_READONLY, true);
   // 選択不可
   ObjectSetInteger(0, objectName, OBJPROP_SELECTABLE, false);
   // フォント名
   ObjectSetString(0, objectName, OBJPROP_FONT, "ＭＳ ゴシック");
   // フォントサイズ
   ObjectSetInteger(0, objectName, OBJPROP_FONTSIZE, 8);

   return(INIT_SUCCEEDED);
  }
  
void OnDeinit(const int reason)
{
   ObjectDelete(0,objectName); 
}  
//+------------------------------------------------------------------+
//| 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[])
{
   static int prevDayOfWeek = -1;

   // 曜日が変わったら更新
   int currentDay = DayOfWeek();
   if(currentDay == prevDayOfWeek) return(0);
   prevDayOfWeek = currentDay;

   double lotsize   = MarketInfo(Symbol(), MODE_LOTSIZE);
   double point     = MarketInfo(Symbol(), MODE_POINT);
   double swapLong  = MarketInfo(Symbol(), MODE_SWAPLONG);
   double swapShort = MarketInfo(Symbol(), MODE_SWAPSHORT);
   int    swapType  = MarketInfo(Symbol(), MODE_SWAPTYPE);
   double rate      = MarketInfo(Symbol(), MODE_ASK);
   double unit      = Tuuka_Tani * 10000;

   double resultLong = 0;
   double resultShort= 0;
   string message;

   // 計算パターン
   switch(swapType) {
      case 0:
         resultLong  = lotsize * swapLong * point * Tuuka_Tani / 10;
         resultShort = lotsize * swapShort * point * Tuuka_Tani / 10;
         break;
      case 1:
         resultLong  = rate * swapLong * Tuuka_Tani / 10;
         resultShort = rate * swapShort * Tuuka_Tani / 10;
         break;
      case 2:
         resultLong  = unit * (swapLong / 100.0 / 360.0) * rate;
         resultShort = unit * (swapShort / 100.0 / 360.0) * rate;
         break;
      default:
         message = "スワップ計算できませんでした";
         break;
   }

   if(swapType != 4) {
      message = StringFormat("%.0f万通貨 買いスワップ:%.0f円 売りスワップ:%.0f円", Tuuka_Tani, resultLong, resultShort);
   }

   // ラベルに表示
   ObjectSetString(0, objectName, OBJPROP_TEXT, message);

   Print("スワップ更新:", Symbol(), " ", message);

   return(rates_total);
}