Hola .

Adjunto al indicador.

//+——————————————————– ——————-+
//| Impulso.mq4 |
//| Copyright © 2004, MetaQuotes Software Corp. |
//| http://www.metaquotes.net/ |
//+——————————————————– ——————-+
#property copyright “Copyright © 2004, MetaQuotes Software Corp.”
#enlace de propiedad “http://www.metaquotes.net/”

#indicador de propiedad_ventana_separada
#indicador de propiedad_buffers 2
#indicador de propiedad_color1 amarillo
#indicador de propiedad_color2 DodgerBlue

#indicador de propiedad_mínimo 0
#indicador de propiedad_máximo 100
#indicador de propiedad_nivel1 30
#indicador de propiedad_nivel2 70

//—- parámetros de entrada
extern int MomPeriod=14;
//—- almacenamiento
intermedio double MomBuffer1[],MomBuffer2[];
//+——————————————————– ——————-+
//| Función de inicialización de indicador personalizado |
//+——————————————————– ——————-+
int init()
{
string nombre_corto;
//—- línea indicadora
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,MomBuffer1);

SetIndexStyle(1,DRAW_LINE);
SetIndexBuffer(1,MomBuffer2);

//—- nombre de DataWindow y etiqueta de subventana de indicador
short_name=”Aroon(“+MomPeriod+””);
IndicadorCortoNombre(nombre_corto);
SetIndexLabel(0,nombre_corto);
//—-
SetIndexDrawBegin(0,MomPeriod);
//—-
retorno(0);
}
//+———————————————- ——————–+
//| Impulso |
//+——————————————————– ——————-+
int start()
{
int i,counted_bars=IndicatorCounted();
//—-
if(Bars<=MomPeriod) return(0); //bar kurang dari 14 keluar..
//—- cero inicial
if(counted_bars<1) //..jika bar yang sudah terhitung lebih kecil dari 1 maka nol kan semua
//mulai dari no buffer yang paling besar ke yang paling kecil=0
for(i=1;i<=MomPeriod;i++) {
MomBuffer1[Bars-i]=0.0;
MomBuffer2[Barras-i]=0.0;
}
//—-
i=Barras-MomPeriod-1;
if(counted_bars>=MomPeriod) i=Bars-counted_bars-1;//15-14-1=0
int nHigh,nLow;
while(i>=0)
{
doble Max=-100000;
doble Min=100000;
for(int k=i;k<i+MomPeriod;k++){
double Num=Close[k];
if(Num>Max){
Max=Num;
nAlto=k;
}
if(Num<Min){
Min=Num;
nBajo=k;
}
}

// Matemáticas del indicador Aroon.
MomBuffer1[i]=100.0*(MomPeriod-(nHigh-i))/MomPeriod;
MomBuffer2[i]=100.0*(MomPeriod-(nLow-i))/MomPeriod;
i–;
}
retorno(0);
}
//+———————————————- ——————–+

Las barras verdes indican largo y las rojas cortos. Las amarillas indefinición, no se entra.

Se entra en la dirección según el color indicado a la siguiente vela.