Autor original: RoboFx
El indicador Balance de Poder (BOP) presenta un histograma de colores que muestra la fuerza y dirección de la tendencia actual, incluyendo alertas que se envían por correo electrónico y notificaciones push a dispositivos móviles. Este histograma cambia de color según los niveles de sobrecompra y sobreventa que establezcas y la dirección del movimiento del histograma.
Se han realizado los siguientes cambios en el código del indicador para implementar las alertas, mensajes de correo electrónico y notificaciones push:
- Se introdujeron nuevos parámetros de entrada:
//---- Variables de entrada para alertas inputuint NumeroDeBarras=1; //Número de barras para la señalinputbool SonidoActivado=true; //Habilitar alertasinputuint NumeroDeAlertas=2; //Número de alertasinputbool CorreoActivado=false; //Habilitar envío de señal por correoinputbool PushActivado=false; //Habilitar envío de señal 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 NombreSeñal,// texto del nombre del indicador para correos y mensajes push double &ColorArray[],// buffer de índice de color int ColorIndice,// índice de color en el buffer de índice de color para generar una señal constint TotalBarras, // número actual de barras constint Prev_calculado, // número de barras en el tick anterior constdouble &Cierre[], // precio de cierre constint &Spread[]) // spread { //--- staticuint contador=0; if(TotalBarras!=Prev_calculado) contador=0; bool SeñalCompra=false; bool PruebaSerie=ArrayGetAsSeries(ColorArray); int indice,indice1; if(PruebaSerie) { indice=int(NumeroDeBarras); indice1=indice+1; } else { indice=TotalBarras-int(NumeroDeBarras)-1; indice1=indice-1; } if(ColorArray[indice1]!=ColorIndice && ColorArray[indice]==ColorIndice) SeñalCompra=true; if(SeñalCompra && contador<=NumeroDeAlertas) { contador++; MqlDateTime tm; TimeToStruct(TimeCurrent(),tm); string texto=TimeToString(TimeCurrent(),TIME_DATE)+" "+string(tm.hour)+":"+string(tm.min); PruebaSerie=ArrayGetAsSeries(Cierre); if(PruebaSerie) indice=int(NumeroDeBarras); else indice=TotalBarras-int(NumeroDeBarras)-1; doubleAsk=Cierre[indice]; doubleBid=Cierre[indice]; PruebaSerie=ArrayGetAsSeries(Spread); if(PruebaSerie) indice=int(NumeroDeBarras); else indice=TotalBarras-int(NumeroDeBarras)-1; Bid+=Spread[indice]; string sAsk=DoubleToString(Ask,_Digits); string sBid=DoubleToString(Bid,_Digits); string sPeriodo=GetStringTimeframe(ChartPeriod()); if(SonidoActivado) Alert("Señal de COMPRA Ask=",Ask," Bid=",Bid," tiempo actual=",texto," Símbolo=",Symbol()," Periodo=",sPeriodo); if(CorreoActivado) SendMail(NombreSeñal+": Alerta de SEÑAL de COMPRA","Señal de COMPRA en Ask="+sAsk+", Bid="+sBid+", Fecha="+texto+" Símbolo="+Symbol()+" Periodo="+sPeriodo); if(PushActivado) SendNotification(NombreSeñal+": SEÑAL de COMPRA en Ask="+sAsk+", Bid="+sBid+", Fecha="+texto+" Símbolo="+Symbol()+" Periodo="+sPeriodo); } //--- } //+------------------------------------------------------------------+//| Función de señal de venta |//+------------------------------------------------------------------+void SellSignal(string NombreSeñal, // texto del nombre del indicador para correos y mensajes push double &ColorArray[], // buffer de índice de color int ColorIndice, // índice de color en el buffer de índice de color para generar una señal constint TotalBarras, // número actual de barras constint Prev_calculado, // número de barras en el tick anterior constdouble &Cierre[], // precio de cierre constint &Spread[]) // spread { //--- staticuint contador=0; if(TotalBarras!=Prev_calculado) contador=0; bool SeñalVenta=false; bool PruebaSerie=ArrayGetAsSeries(ColorArray); int indice,indice1; if(PruebaSerie) { indice=int(NumeroDeBarras); indice1=indice+1; } else { indice=TotalBarras-int(NumeroDeBarras)-1; indice1=indice-1; } if(ColorArray[indice1]!=ColorIndice && ColorArray[indice]==ColorIndice) SeñalVenta=true; if(SeñalVenta && contador<=NumeroDeAlertas) { contador++; MqlDateTime tm; TimeToStruct(TimeCurrent(),tm); string texto=TimeToString(TimeCurrent(),TIME_DATE)+" "+string(tm.hour)+":"+string(tm.min); PruebaSerie=ArrayGetAsSeries(Cierre); if(PruebaSerie) indice=int(NumeroDeBarras); else indice=TotalBarras-int(NumeroDeBarras)-1; doubleAsk=Cierre[indice]; doubleBid=Cierre[indice]; PruebaSerie=ArrayGetAsSeries(Spread); if(PruebaSerie) indice=int(NumeroDeBarras); else indice=TotalBarras-int(NumeroDeBarras)-1; Bid+=Spread[indice]; string sAsk=DoubleToString(Ask,_Digits); string sBid=DoubleToString(Bid,_Digits); string sPeriodo=GetStringTimeframe(ChartPeriod()); if(SonidoActivado) Alert("Señal de VENTA Ask=",Ask," Bid=",Bid," tiempo actual=",texto," Símbolo=",Symbol()," Periodo=",sPeriodo); if(CorreoActivado) SendMail(NombreSeñal+": Alerta de SEÑAL de VENTA","Señal de VENTA en Ask="+sAsk+", Bid="+sBid+", Fecha="+texto+" Símbolo="+Symbol()+" Periodo="+sPeriodo); if(PushActivado) SendNotification(NombreSeñal+": SEÑAL de VENTA en Ask="+sAsk+", Bid="+sBid+", Fecha="+texto+" Símbolo="+Symbol()+" Periodo="+sPeriodo); } //--- } //+------------------------------------------------------------------+//| Obtener el marco de tiempo 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("BalanceOfPower_Histogram_Alert",ColorIndBuffer,0,TotalBarras,Prev_calculado,Cierre,Spread); SellSignal("BalanceOfPower_Histogram_Alert",ColorIndBuffer,7,TotalBarras,Prev_calculado,Cierre,Spread); //---
Donde ColorIndBuffer es el nombre del buffer de índice de color que almacena el color de las velas en forma de un índice.
Se supone que solo se utilizará una llamada a las funciones BuySignal() y SellSignal() en el bloque OnCalculate() del código del indicador.
El indicador utiliza las clases de la biblioteca SmoothAlgorithms.mqh (cópiala en <carpeta_de_datos_terminal>\MQL5\Include). El uso de las clases se describió a fondo en el artículo "Promediando Series de Precios para Cálculos Intermedios Sin Usar Buffers Adicionales".
Originalmente, este indicador fue escrito en MQL5 y fue publicado por primera vez en la Base de Código el 07.02.2013.
Fig1. El indicador Balance de Poder_Histogram_Alert en el gráfico
Fig.2. El indicador Balance de Poder_Histogram_Alert Generando alertas.
Comentarios 0