iMFISignAlertは、クラシックなマネーフローインデックスオシレーターに基づいたセマフォアロウシグナルインジケーターです。このインジケーターは、買われすぎや売られすぎのエリアを離れる際にシグナルを出し、アラートを表示したり、メールやモバイルデバイスへのプッシュ通知を送信することができます。
アラートやメールメッセージ、プッシュ通知を実装するために、インジケーターコードに以下の変更が加えられました：
- 新しい入力パラメータを追加しました：
inputuint NumberofBar=1;//シグナルのバー数inputbool SoundON=true; //アラートを有効にしますinputuint NumberofAlerts=2;//アラートの数inputbool EMailON=false; //シグナルをメール送信しますinputbool PushON=false; //モバイルデバイスへの送信を有効にします
- インジケーターコードの最後に、BuySignal()、SellSignal()、GetStringTimeframe()の3つの新しい関数を追加しました：
//+------------------------------------------------------------------+//| 買いシグナル関数 |//+------------------------------------------------------------------+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)); //---- }
- OnCalculate()ブロックのインジケーター計算サイクル後に、BuySignal()およびSellSignal()関数を追加しました：
BuySignal("iWPRSign",BuyBuffer,rates_total,prev_calculated,close,spread); SellSignal("iWPRSign",SellBuffer,rates_total,prev_calculated,close,spread);
BuyBufferとSellBufferは、買いと売りのシグナルを格納するためのインジケーターバッファの名前です。インジケーターバッファ内の空の値は、ゼロまたはEMPTY_VALUEとして設定する必要があります。
BuySignal()およびSellSignal()関数は、インジケーターコードのOnCalculate()ブロック内で一度だけ呼び出されることが想定されています。
Fig.1. チャート上のiMFISignAlertインジケーター
Fig.2. iMFISignAlertインジケーター。アラートを生成中。
コメント 0