JBrainTrend1Stop_Alert - indicador para MetaTrader 5

Indicador de tendencia JBrainTrend1Stop con alertas, envío de mensajes de correo y notificaciones push al smartphone.

Para el envío de alertas, mensajes de correo y mensajes push al smarphone, se han realizado los siguientes cambios en el código del indicador:

1. En los parámetros de entrada del indicador se han escrito nuevas variables de entrada

   input uint NumberofBar=1;//Número de la barra para la alerta
   input bool SoundON=true; //Permiso para la alerta
   input uint NumberofAlerts=2;//Número de alertas
   input bool EMailON=false; //Permiso para enviar una señal por correo
   input bool PushON=false; //Permiso para enviar una señal al móvil
   

2. Se han añadido tres nuevas funciones BuySignal(), SellSignal() y GetStringTimeframe() al final del código del indicador
   //+------------------------------------------------------------------+
   //| Buy signal function                                              |
   //+------------------------------------------------------------------+
   void BuySignal(string SignalSirname,      // texto del nombre del indicador para las señales de correo y push
                  double &BuyArrow[],        // búfer de indicador con las señales para la tendencia ascendente
                  double &SellArrow[],       // búfer de indicador con las señales para la tendencia descendente
                  const int Rates_total,     // número actual de barras
                  const int Prev_calculated, // número de barras en el tick anterior
                  const double &Close[],     // precio de cierre
                  const int &Spread[])       // spread
     {
   //---
      static uint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool BuySignal=false;
      bool SeriesTest=ArrayGetAsSeries(BuyArrow);
      int index,index1;
      if(SeriesTest)
        {
         index=int(NumberofBar);
         index1=index+1;
        }
      else
        {
         index=Rates_total-int(NumberofBar)-1;
         index1=index-1;
        }
      if(SellArrow[index1] && SellArrow[index1]!=EMPTY_VALUE && BuyArrow[index] && BuyArrow[index]!=EMPTY_VALUE) BuySignal=true;
      if(BuySignal && counter<=NumberofAlerts)
        {
         counter++;
         MqlDateTime tm;
         TimeToStruct(TimeCurrent(),tm);
         string text=TimeToString(TimeCurrent(),TIME_DATE)+" "+string(tm.hour)+":"+string(tm.min);
         SeriesTest=ArrayGetAsSeries(Close);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         double Ask=Close[index];
         double Bid=Close[index];
         SeriesTest=ArrayGetAsSeries(Spread);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         Bid+=_Point*Spread[index];
         string sAsk=DoubleToString(Ask,_Digits);
         string sBid=DoubleToString(Bid,_Digits);
         string sPeriod=GetStringTimeframe(ChartPeriod());
         if(SoundON) Alert("BUY signal \n Ask=",Ask,"\n Bid=",Bid,"\n currtime=",text,"\n Symbol=",Symbol()," Period=",sPeriod);
         if(EMailON) SendMail(SignalSirname+": BUY signal alert","BUY signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
         if(PushON) SendNotification(SignalSirname+": BUY signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
        }
   
   //---
     }
   //+------------------------------------------------------------------+
   //| Sell signal function                                             |
   //+------------------------------------------------------------------+
   void SellSignal(string SignalSirname,      // texto del nombre del indicador para las señales de correo y push
                   double &SellArrow[],       // búfer de indicador con las señales para la tendencia descendente
                   double &BuyArrow[],        // búfer de indicador con las señales para la tendencia ascendente
                   const int Rates_total,     // número actual de barras
                   const int Prev_calculated, // número de barras en el tick anterior
                   const double &Close[],     // precio de cierre
                   const int &Spread[])       // spread
     {
   //---
      static uint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool SellSignal=false;
      bool SeriesTest=ArrayGetAsSeries(SellArrow);
      int index,index1;
      if(SeriesTest)
        {
         index=int(NumberofBar);
         index1=index+1;
        }
      else
        {
         index=Rates_total-int(NumberofBar)-1;
         index1=index-1;
        }
      if(BuyArrow[index1] && BuyArrow[index1]!=EMPTY_VALUE && SellArrow[index] && SellArrow[index]!=EMPTY_VALUE) SellSignal=true;
      if(SellSignal && counter<=NumberofAlerts)
        {
         counter++;
         MqlDateTime tm;
         TimeToStruct(TimeCurrent(),tm);
         string text=TimeToString(TimeCurrent(),TIME_DATE)+" "+string(tm.hour)+":"+string(tm.min);
         SeriesTest=ArrayGetAsSeries(Close);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         double Ask=Close[index];
         double Bid=Close[index];
         SeriesTest=ArrayGetAsSeries(Spread);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         Bid+=_Point*Spread[index];
         string sAsk=DoubleToString(Ask,_Digits);
         string sBid=DoubleToString(Bid,_Digits);
         string sPeriod=GetStringTimeframe(ChartPeriod());
         if(SoundON) Alert("SELL signal \n Ask=",Ask,"\n Bid=",Bid,"\n currtime=",text,"\n Symbol=",Symbol()," Period=",sPeriod);
         if(EMailON) SendMail(SignalSirname+": SELL signal alert","SELL signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
         if(PushON) SendNotification(SignalSirname+": SELL signal at Ask="+sAsk+", Bid="+sBid+", Date="+text+" Symbol="+Symbol()+" Period="+sPeriod);
        }
   //---
     }
   //+------------------------------------------------------------------+
   //|  Obteniendo el marco temporal en forma de línea                              |
   //+------------------------------------------------------------------+
   string GetStringTimeframe(ENUM_TIMEFRAMES timeframe)
     {
   //----
      return(StringSubstr(EnumToString(timeframe),7,-1));
   //----
     }
3. En el bloque OnCalculate(), después de los ciclos de cálculo del indicador, se han añadido un par de llamadas de las funciones BuySignal() y SellSignal()
   //---    
      BuySignal("JBrainTrend1Stop_Alert",BuyStopBuffer,SellStopBuffer,rates_total,prev_calculated,close,spread);
      SellSignal("JBrainTrend1Stop_Alert",SellStopBuffer,BuyStopBuffer,rates_total,prev_calculated,close,spread);
   //---  

Donde BuyStopBuffer y SellStopBuffer son los nombres de los búferes de indicador para guardar las señales de las tendencias ascendentes y descendentes (líneas de los stops para las posiciones largas y cortas). En los búferes de indicador, en ausencia de la tendencia correspondiente, como valores vacíos deberán existir o bien ceros, o bien EMPTY_VALUE.

Se supone que en el código del indicador, en el bloque OnCalculate(), se usará solo una llamada a las funciones BuySignal() y SellSignal().

Para trabajar con el indicador, en la carpeta MQL5\Indicators del terminal de cliente tiene que existir el archivo compilado del indicador JMA.mq5.

Fig. 1. Indicador JBrainTrend1Stop_Alert на графике

Fig.2. Indicador JBrainTrend1Stop_Alert. Envío de la alerta