GS trend I

#property copyright "Copyright 2025, MetaQuotes Ltd."
#property link      " https://www.mql5.com "
#property version   "1.00"
#resource "\\Indicators\\GS_trend_I_v12.ex5"
int handle;
//--- input parameters
input int InpTimer=1;   //Timer,sec
input int NN=5;         //Limit
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
 {
   handle=iCustom(NULL,0,"::Indicators\\GS_trend_I_v12.ex5");
   if(handle==INVALID_HANDLE)
        {
         PrintFormat("Error getting the indicator handle GS trend I. Error code = %d",GetLastError());
         return(INIT_FAILED);
        }
//--- create timer
   EventSetTimer(InpTimer);
   
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//--- destroy timer
   EventKillTimer();
   
  }
//------------------------------
double iCustomGet(const int ind_handle,const int buffer,int start_pos)
  {
   double Custom[1];
   ResetLastError();
   if(CopyBuffer(ind_handle,buffer,start_pos,1,Custom)<0)
     {
      PrintFormat("Failed to copy data from the indicator, error code %d",GetLastError());
      return(0.0);
     }
   return(Custom[0]);
  }
//+------------------------------------------------------------------+
//| Timer function                                                   |
//+------------------------------------------------------------------+
void OnTimer()
{ static int i=0;
  if (i>NN) return;
  double r=iCustomGet(handle,1,i);
  Alert("i="+(string)i+": GS trend Signal = "+DoubleToString(r,5)+((r==0)?" (SELL_BUY)":(r==1)?" (BUY)":(r==2)?" (SELL)":" (No data)"));
  i++;
 }