iWPRSignAlert - Ein leistungsstarker Indikator für MetaTrader 5

Der Semaphore-Pfeil-Signalindikator basiert auf dem klassischen Williams’ Percent Range Oszillator und zeigt das Verlassen der überkauften und überverkauften Bereiche an. Außerdem verfügt er über Benachrichtigungen, die E-Mails und Push-Benachrichtigungen an mobile Geräte senden.

Um die Benachrichtigungen, E-Mail-Nachrichten und Push-Benachrichtigungen zu implementieren, wurden folgende Änderungen im Indikatorcode vorgenommen:

1. Neue Eingabeparameter hinzugefügt:

   inputuint NumberofBar=1;//Anzahl der Balken für das Signalinputbool SoundON=true; //Benachrichtigungen aktiviereninputuint NumberofAlerts=2;//Anzahl der Benachrichtigungeninputbool EMailON=false; //E-Mails für das Signal aktiviereninputbool PushON=false; //Push-Benachrichtigungen aktivieren

2. Drei neue Funktionen am Ende des Indikatorcodes hinzugefügt: BuySignal(), SellSignal() und GetStringTimeframe()

   //+------------------------------------------------------------------+//| Funktion für Kaufsignal                                            |//+------------------------------------------------------------------+void BuySignal(string SignalSirname,      // Text des Indikatornamens für E-Mail und Push-Nachrichten
                  double &BuyArrow[],        // Indikatorpuffer mit Kaufsignalen
                  constint Rates_total,     // aktuelle Anzahl der Balken
                  constint Prev_calculated, // Anzahl der Balken beim vorherigen Tick
                  constdouble &Close[],     // Schlusskurs
                  constint &Spread[])       // Spread
     {
   //---
      staticuint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool BuySignal=false;
      bool SeriesTest=ArrayGetAsSeries(BuyArrow);
      int index;
      if(SeriesTest) index=int(NumberofBar);
      else index=Rates_total-int(NumberofBar)-1;
      if(NormalizeDouble(BuyArrow[index],_Digits) && 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;
         doubleAsk=Close[index];
         doubleBid=Close[index];
         SeriesTest=ArrayGetAsSeries(Spread);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         Bid+=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);
        }
   
   //---
     }
   //+------------------------------------------------------------------+//| Funktion für Verkaufssignal                                             |//+------------------------------------------------------------------+void SellSignal(string SignalSirname,      // Text des Indikatornamens für E-Mail und Push-Nachrichten
                   double &SellArrow[],       // Indikatorpuffer mit Verkaufssignalen
                   constint Rates_total,     // aktuelle Anzahl der Balken
                   constint Prev_calculated, // Anzahl der Balken beim vorherigen Tick
                   constdouble &Close[],     // Schlusskurs
                   constint &Spread[])       // Spread
     {
   //---
      staticuint counter=0;
      if(Rates_total!=Prev_calculated) counter=0;
   
      bool SellSignal=false;
      bool SeriesTest=ArrayGetAsSeries(SellArrow);
      int index;
      if(SeriesTest) index=int(NumberofBar);
      else index=Rates_total-int(NumberofBar)-1;
      if(NormalizeDouble(SellArrow[index],_Digits) && 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;
         doubleAsk=Close[index];
         doubleBid=Close[index];
         SeriesTest=ArrayGetAsSeries(Spread);
         if(SeriesTest) index=int(NumberofBar);
         else index=Rates_total-int(NumberofBar)-1;
         Bid+=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);
        }
   //---
     }
   //+------------------------------------------------------------------+//|  Zeitrahmen als String abrufen                               |//+------------------------------------------------------------------+string GetStringTimeframe(ENUM_TIMEFRAMES timeframe)
     {
   //----
      return(StringSubstr(EnumToString(timeframe),7,-1));
   //----
     }
   

3. Ein paar Aufrufe zu den Funktionen BuySignal() und SellSignal() nach den Berechnungsschleifen im OnCalculate()-Block hinzugefügt:

   BuySignal("iWPRSign",BuyBuffer,rates_total,prev_calculated,close,spread);
       SellSignal("iWPRSign",SellBuffer,rates_total,prev_calculated,close,spread);
   

Hierbei sind BuyBuffer und SellBuffer die Namen der Indikatorpuffer, die die Kauf- und Verkaufssignale speichern. Die leeren Werte in den Indikatorpuffern müssen entweder Null oder EMPTY_VALUE gesetzt werden.

Es wird angenommen, dass nur ein Aufruf der Funktionen BuySignal() und SellSignal() im OnCalculate()-Block des Indikatorcodes verwendet wird.

Abb.1. Der iWPRSignAlert-Indikator auf dem Chart

Abb.2. Der iWPRSignAlert-Indikator. Generiert Benachrichtigungen.