//--- Definición de variables de entrada
x1 = 0 //--- Desplazamiento de la onda
x2 = 10 //--- Desplazamiento de la onda
x3 = 20 //--- Desplazamiento de la onda
//--- Calculo de las ondas
wave1 = highest[barssince(high>x1)][high]
wave2 = lowest[barssince(low<x2)][low]
wave3 = highest[barssince(high>x3)][high]
//--- Dibujar las ondas
DRAWLINE(x1, wave1, x2, wave2) COLOURED(0,0,255)
DRAWLINE(x2, wave2, x3, wave3) COLOURED(0,0,255)
//--- Verificar situación actual del mercado
if close > wave3 then
DRAWTEXT("Tercera onda completada", x3, wave3) COLOURED(0,255,0)
elseif close > wave2 then
DRAWTEXT("Segunda onda completada", x2, wave2) COLOURED(255,255,0)
elseif close > wave1 then
DRAWTEXT("Primera onda completada", x1, wave1) COLOURED(255,0,0)
else
DRAWTEXT("Ninguna onda completada", x1, wave1) COLOURED(0,0,0)
endif
return
.
