iWPRSignAlert - MetaTrader 5 के लिए एक बेहतरीन संकेतक

iWPRSignAlert एक सेमाफोर तीर संकेतक है जो क्लासिक विलियम्स पर्सेंट रेंज ऑस्सीलेटर पर आधारित है। यह ओवरबॉट और ओवरसोल्ड क्षेत्रों को छोड़ते समय संकेत प्रदान करता है, जिसमें अलर्ट, ईमेल भेजने और मोबाइल डिवाइस पर पुश-नोटिफिकेशन शामिल हैं।

इस संकेतक के कोड में निम्नलिखित परिवर्तन किए गए हैं ताकि अलर्ट, ईमेल संदेश और पुश-नोटिफिकेशन का कार्यान्वयन किया जा सके:

नए इनपुट पैरामीटर जोड़े गए हैं:

inputuint NumberofBar=1;// संकेत के लिए बार संख्याinputbool SoundON=true; // अलर्ट सक्षम करेंinputuint NumberofAlerts=2;// अलर्ट की संख्याinputbool EMailON=false; // संकेत को मेल करने के लिए सक्षम करेंinputbool PushON=false; // मोबाइल डिवाइस पर संकेत भेजने के लिए सक्षम करें

संकेतक कोड के अंत में तीन नए फंक्शन जोड़े गए हैं: BuySignal(), SellSignal() और GetStringTimeframe()

//+------------------------------------------------------------------+//| खरीद संकेत कार्य                                              |//+------------------------------------------------------------------+void BuySignal(string SignalSirname,      // ईमेल और पुश संदेशों के लिए संकेतक नाम का पाठ
               double &BuyArrow[],        // खरीद संकेतों के लिए संकेतक बफर
               constint Rates_total,     // वर्तमान बार की संख्या
               constint Prev_calculated, // पिछले टिक पर बार की संख्या
               constdouble &Close[],     // बंद मूल्य
               constint &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);
     }

//---
  }
//+------------------------------------------------------------------+//| बिक्री संकेत कार्य                                             |//+------------------------------------------------------------------+void SellSignal(string SignalSirname,      // ईमेल और पुश संदेशों के लिए संकेतक नाम का पाठ
                double &SellArrow[],       // बिक्री संकेतों के लिए संकेतक बफर
                constint Rates_total,     // वर्तमान बार की संख्या
                constint Prev_calculated, // पिछले टिक पर बार की संख्या
                constdouble &Close[],     // बंद मूल्य
                constint &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);
     }
//---
  }
//+------------------------------------------------------------------+//|  समय सीमा को स्ट्रिंग के रूप में प्राप्त करना                         |//+------------------------------------------------------------------+string GetStringTimeframe(ENUM_TIMEFRAMES timeframe)
  {
//----
   return(StringSubstr(EnumToString(timeframe),7,-1));
//----
  }

BuySignal() और SellSignal() फंक्शनों को संकेतक गणना चक्रों के बाद OnCalculate() ब्लॉक में जोड़ा गया:
```
BuySignal("iWPRSign",BuyBuffer,rates_total,prev_calculated,close,spread);
    SellSignal("iWPRSign",SellBuffer,rates_total,prev_calculated,close,spread);
```

जहाँ BuyBuffer और SellBuffer खरीद और बिक्री संकेतों के लिए संकेतक बफर के नाम हैं। संकेतक बफर में खाली मान या तो शून्य या EMPTY_VALUE सेट किए जाने चाहिए।

यह मान लिया गया है कि संकेतक कोड के OnCalculate() ब्लॉक में केवल एक ही BuySignal() और SellSignal() फंक्शन का कॉल किया जाएगा।

Fig.1. The iWPRSignAlert indicator