Indicador Alerta ADX v.1 para PRT

Hoy os presento el Indicador para PRT ALERTA ADX v.1 basado en el Indicador Movimiento Direccional ADX de J. Welles Wilder. Como ya sabeis está formado por 3 líneas, línea ADX, linea +DI de movimiento positivo y línea -DI de movimiento negativo.
El Indicador ADX mide la fuerza de la tendencia ya sea alcista o bajista, expresada por medio de su línea principal ADX. Por encima de 25 se considera que el valor está en tendencia. Si supera el nivel 30 se considera que la tendencia es fuerte y gráficamente se observa por tener una pendiente positiva. A partir del nivel 50 podemos considerar que el valor entra en zona de saturación o posible techo de mercado, y por tanto susceptible de revertirse la tendencia. Por debajo del nivel 25 se considera que el valor está sin tendencia o en un rango lateral, por lo que se aconseja no operar hasta que lo supere.

Las líneas +DI y -DI acompañan a la tendencia de manera que en tendencia alcista la línea +DI se sitúa por encima de la línea -DI y en tendencia bajista al revés.
A la hora de operar los cruces de las líneas +DI y -DI nos ofrecen puntos de entrada en la dirección que marquen estas líneas siempre que la línea ADX esté por encima del nivel 25.

En la programación del indicador he utilizado una ADX con valor 9 y valor 14 para las líneas +DI y -DI.
Para tener toda la información necesaria sobre el Indicador Movimiento Direccional ADX os dejo este enlace: http://www.bolsalibre.es/articles/view/adx-average-direction-index

 ________________________________________________________________________________________
REM ALERTA ADX v.1
REM CREADO POR TXEMA MEDINA EN ABRIL 2013
REM http://labolsamemata.blogspot.com
REM CONDICIONES DEL INDICADOR:
REM INICIO DE LA TENDENCIA = ADX MAYOR DE 23
REM CONFIRMACION DE LA TENDENCIA = ADX MAYOR DE 30
REM SIN TENDENCIA O LATERAL = ADX MENOR DE 23
REM SATURACION = POSIBLE TECHO DE MERCADO = ADX MAYOR DE 50
REM COMBINADO CON EL INDICADOR BULL/BEAR Y ALERTA GATILLO 7.0 SE PRODUCEN SEÑALES POTENTES

myADX = ADX[9]
myDIplus = DIplus[14](close)
myDIminus = DIminus[14](close)

Largos1 = myADX > 23.0 and myADX < 30.0 and myDIplus > myDIminus
Largos2 = myADX > 30.0 and myDIplus > myDIminus
Saturacion = myADX > 50.0
Esperar = myADX < 23.0
Cortos1 = myaDX > 23.0 and myADX < 30.0 and myDIminus > myDIplus
Cortos2 = myADX > 30.0 and myDIminus > myDIplus

cero = 0
IF Largos1 then
BarraLargos1 = 1
ELSE
BarraLargos1 = 0
ENDIF

IF Largos2 then
BarraLargos2 = 1
ELSE
BarraLargos2 = 0
ENDIF

IF Saturacion then
BarraSaturacion = 1
ELSE
BarraSaturacion = 0
ENDIF

IF Esperar then
BarraEsperar = 1
ELSE
BarraEsperar = 0
ENDIF

IF Cortos1 then
BarraCortos1 = 0.5
ELSE
BarraCortos1 = 0
ENDIF

IF Cortos2 then
BarraCortos2 = 1
ELSE
BarraCortos2 = 0
ENDIF

RETURN BarraLargos1 COLOURED (0,255,0) as "Largos1", BarraLargos2 COLOURED (51,153,0) as "Largos2", BarraSaturacion COLOURED (255,55,255) as "Saturacion", BarraEsperar COLOURED (255,153,0) as "Esperar", BarraCortos1 COLOURED (255,0,0) as "Cortos1", BarraCortos2 COLOURED (255,0,0) as "Cortos2", cero as "cero"