El ColorParabolic es un indicador de señales tipo semáforo que incluye alertas, envíos de correos electrónicos y notificaciones push.
A continuación, te cuento sobre las modificaciones que se han hecho al código del indicador para implementar estas alertas:
-
Se han introducido nuevos parámetros de entrada:
input uint NumberofBar=1;// Número de barra para la señal input bool SoundON=true; // Activar alertas input uint NumberofAlerts=2;// Número de alertas input bool EMailON=false; // Activar envío de señales por correo input bool PushON=false; // Activar envío de señales a dispositivos móviles
-
Se añadieron tres nuevas funciones al final del código del indicador: BuySignal(), SellSignal() y GetStringTimeframe()
//+------------------------------------------------------------------+ //| Función de señal de compra | //+------------------------------------------------------------------+ void BuySignal(string SignalSirname, // nombre del indicador para correos y mensajes push double &BuyArrow[], // buffer del indicador con señales de compra 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; 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; double Ask=Close[index]; double Bid=Close[index]; SeriesTest=ArrayGetAsSeries(Spread); if(SeriesTest) index=int(NumberofBar); else index=Rates_total-int(NumberofBar)-1; Bid+=Spread[index]*_Point; string sAsk=DoubleToString(Ask,_Digits); string sBid=DoubleToString(Bid,_Digits); string sPeriod=GetStringTimeframe(ChartPeriod()); if(SoundON) Alert("Señal de COMPRA Ask=",Ask," Bid=",Bid," currtime=",text," Símbolo=",Symbol()," Period=",sPeriod); if(EMailON) SendMail(SignalSirname+": Alerta de señal de COMPRA","Señal de COMPRA en Ask="+sAsk+", Bid="+sBid+", Fecha="+text+" Símbolo="+Symbol()+" Period="+sPeriod); if(PushON) SendNotification(SignalSirname+": Señal de COMPRA en Ask="+sAsk+", Bid="+sBid+", Fecha="+text+" Símbolo="+Symbol()+" Period="+sPeriod); } //--- } //+------------------------------------------------------------------+ //| Función de señal de venta | //+------------------------------------------------------------------+ void SellSignal(string SignalSirname, // nombre del indicador para correos y mensajes push double &SellArrow[], // buffer del indicador con señales de venta 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; 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; double Ask=Close[index]; double Bid=Close[index]; SeriesTest=ArrayGetAsSeries(Spread); if(SeriesTest) index=int(NumberofBar); else index=Rates_total-int(NumberofBar)-1; Bid+=Spread[index]*_Point; string sAsk=DoubleToString(Ask,_Digits); string sBid=DoubleToString(Bid,_Digits); string sPeriod=GetStringTimeframe(ChartPeriod()); if(SoundON) Alert("Señal de VENTA Ask=",Ask," Bid=",Bid," currtime=",text," Símbolo=",Symbol()," Period=",sPeriod); if(EMailON) SendMail(SignalSirname+": Alerta de señal de VENTA","Señal de VENTA en Ask="+sAsk+", Bid="+sBid+", Fecha="+text+" Símbolo="+Symbol()+" Period="+sPeriod); if(PushON) SendNotification(SignalSirname+": Señal de VENTA en Ask="+sAsk+", Bid="+sBid+", Fecha="+text+" Símbolo="+Symbol()+" Period="+sPeriod); } //--- } //+------------------------------------------------------------------+ //| Obteniendo el marco temporal como cadena | //+------------------------------------------------------------------+ string GetStringTimeframe(ENUM_TIMEFRAMES timeframe) { //---- return(StringSubstr(EnumToString(timeframe),7,-1)); //---- }
-
Se añadieron un par de llamadas a las funciones BuySignal() y SellSignal() después de los ciclos de cálculo del indicador en el bloque OnCalculate()
//--- BuySignal("ColorParabolic_Alert",BuyBuffer,rates_total,prev_calculated,close,spread); SellSignal("ColorParabolic_Alert",SellBuffer,rates_total,prev_calculated,close,spread); //---
Donde BuyBuffer y SellBuffer son los nombres de los buffers del indicador para almacenar las señales de compra y venta. Los valores vacíos en los buffers del indicador deben ser establecidos como ceros o EMPTY_VALUE.
Se asume que solo se utilizará una llamada a las funciones BuySignal() y SellSignal() en el bloque OnCalculate() del código del indicador.
Fig1. ColorParabolic_Alert en un gráfico
Fig.2. El indicador ColorParabolic_Alert. Generando alertas.
Publicaciones relacionadas
- MetaCOT 2 CFTC ToolBox: Herramientas Esenciales para Análisis en MT4
- Líneas Verticales: Potencia tu Análisis en MetaTrader 4
- Ideal ZigZag: Un Indicador Rápido para MetaTrader 5
- Convergencia y Divergencia Estocástica: Un Indicador Clave para MetaTrader 5
- Cruce de Líneas de Tendencia: Un Indicador Esencial para MetaTrader 5