【MQL4】複数時間足のトレンド一致度を点数化して表示するマルチタイムフレーム・インジケーターの作り方(mtf-trend-panel-indicator-mt4.mdとの違い)

//+------------------------------------------------------------------+
//|                                   MTFTrendAgreementScore.mq4      |
//|                     Copyright 2026, FX-EA System Project Creator |
//|                        https://creator.fx-ea-system-project.com/ |
//+------------------------------------------------------------------+
#property strict
#property indicator_chart_window

input string InpTimeframes         = "M15,H1,H4,D1"; //集計する時間足(カンマ区切り、スペース無し)
input int    InpFastPeriod         = 10;              //短期移動平均の期間
input int    InpSlowPeriod         = 30;              //長期移動平均の期間
input double InpRangeThresholdPips = 5;               //レンジ(方向なし)とみなす閾値(pips)

string CompareList[];
int    TFCount = 0;
string PanelPrefix = "MtfScore_";

int OnInit()
  {
   ushort sep = StringGetCharacter(",", 0);
   TFCount = StringSplit(InpTimeframes, sep, CompareList);

   for(int i = 0; i < TFCount + 2; i++) //+2はヘッダー行とスコア行
     {
      string name = PanelPrefix + IntegerToString(i);
      ObjectCreate(0, name, OBJ_LABEL, 0, 0, 0);
      ObjectSetInteger(0, name, OBJPROP_CORNER, CORNER_RIGHT_UPPER);
      ObjectSetInteger(0, name, OBJPROP_XDISTANCE, 10);
      ObjectSetInteger(0, name, OBJPROP_YDISTANCE, 20 + i * 18);
      ObjectSetInteger(0, name, OBJPROP_FONTSIZE, 10);
     }

   return(INIT_SUCCEEDED);
  }

void OnDeinit(const int reason)
  {
   for(int i = 0; i < TFCount + 2; i++)
      ObjectDelete(0, PanelPrefix + IntegerToString(i));
  }

//文字列("M15"等)をENUM_TIMEFRAMES(PERIOD_M15等)に変換する
int StringToPeriod(string tf)
  {
   if(tf == "M1")  return(PERIOD_M1);
   if(tf == "M5")  return(PERIOD_M5);
   if(tf == "M15") return(PERIOD_M15);
   if(tf == "M30") return(PERIOD_M30);
   if(tf == "H1")  return(PERIOD_H1);
   if(tf == "H4")  return(PERIOD_H4);
   if(tf == "D1")  return(PERIOD_D1);
   if(tf == "W1")  return(PERIOD_W1);
   if(tf == "MN1") return(PERIOD_MN1);
   return(PERIOD_CURRENT); //未対応の文字列は現在のチャートの時間足として扱う(フォールバック)
  }

//指定した時間足の、短期MAと長期MAの差から方向を判定する(+1=上昇/-1=下降/0=レンジ)
int JudgeDirection(string symbol, int timeframe)
  {
   double fastMA = iMA(symbol, timeframe, InpFastPeriod, 0, MODE_SMA, PRICE_CLOSE, 0);
   double slowMA = iMA(symbol, timeframe, InpSlowPeriod, 0, MODE_SMA, PRICE_CLOSE, 0);
   double diff      = fastMA - slowMA;
   double threshold = InpRangeThresholdPips * _Point * 10; //5桁/3桁ブローカーのpips換算

   if(diff > threshold)
      return(1);
   if(diff < -threshold)
      return(-1);
   return(0);
  }

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[])
  {
   int upCount = 0, downCount = 0;
   int directions[];
   ArrayResize(directions, TFCount);

   for(int i = 0; i < TFCount; i++)
     {
      int period = StringToPeriod(CompareList[i]);
      int dir = JudgeDirection(_Symbol, period);
      directions[i] = dir;
      if(dir == 1)
         upCount++;
      if(dir == -1)
         downCount++;
     }

   double score = (TFCount > 0) ? (double)(upCount - downCount) / TFCount * 100.0 : 0;

   string headerName = PanelPrefix + "0";
   ObjectSetString(0, headerName, OBJPROP_TEXT, "MTFトレンド一致度スコア");
   ObjectSetInteger(0, headerName, OBJPROP_COLOR, clrWhite);

   string scoreName  = PanelPrefix + "1";
   color  scoreColor = clrSilver;
   string scoreLabel = "方向性バラバラ";

   if(score >= 75)
     {
      scoreColor = clrLimeGreen;
      scoreLabel = "強い上昇一致";
     }
   else if(score <= -75)
     {
      scoreColor = clrOrangeRed;
      scoreLabel = "強い下降一致";
     }
   else if(score >= 25)
     {
      scoreColor = clrYellowGreen;
      scoreLabel = "やや上昇優勢";
     }
   else if(score <= -25)
     {
      scoreColor = clrOrange;
      scoreLabel = "やや下降優勢";
     }

   ObjectSetString(0, scoreName, OBJPROP_TEXT, StringFormat("スコア %.0f%%  (%s)", score, scoreLabel));
   ObjectSetInteger(0, scoreName, OBJPROP_COLOR, scoreColor);

   for(int i = 0; i < TFCount; i++)
     {
      string name    = PanelPrefix + IntegerToString(i + 2);
      string dirText = "レンジ";
      color  dirColor = clrSilver;

      if(directions[i] == 1)
        {
         dirText  = "上昇";
         dirColor = clrLimeGreen;
        }
      if(directions[i] == -1)
        {
         dirText  = "下降";
         dirColor = clrOrangeRed;
        }

      ObjectSetString(0, name, OBJPROP_TEXT, StringFormat("%s : %s", CompareList[i], dirText));
      ObjectSetInteger(0, name, OBJPROP_COLOR, dirColor);
     }

   return(rates_total);
  }