Trazar FIBONACCI automatico

Viewing 3 posts - 1 through 3 (of 3 total)

Author

Posts

11/15/2023 at 8:48 PM #223763 quote

deletedaccount22102025

Participant

New

Hola a tod@s, a ver si pudiérais ayudarme con un indicador.

El indicador debe trazar los niveles de retroceso de Fibonacci usando como máximos y mínimos de los puntos pivote en un periodo de 10 velas.

Gracias de antemano,

Un saludo

11/24/2023 at 12:30 PM #224241 quote

robertogozzi

Moderator

Legend

Ahi esta:

DEFPARAM CalculateOnLastBars = 3000
DEFPARAM DrawOnLastBarOnly   = True
//
ONCE p  = 10
Pivot   = (DHigh(1) + DLow(1) + Close[1]) / 3
HH      = highest[p](Pivot)
LL      = lowest[p](Pivot)
Diff    = HH - LL
Fib0236 = Diff * 0.236
Fib0382 = Diff * 0.382
Fib0500 = Diff * 0.500
Fib0618 = Diff * 0.618
Fib0764 = Diff * 0.764
Up     = 0
Dn     = 0
FOR i = 0 TO (p - 1)
IF Pivot[i] = HH THEN
Up = 1
BREAK
ENDIF
IF Pivot[i] = LL THEN
Dn = 1
BREAK
ENDIF
NEXT
DRAWHLINE(HH) coloured(238,122,233,255)//(0,128,0,255)
DRAWHLINE(LL) coloured(238,122,233,255)//(0,128,0,255)
IF Up THEN
DRAWTEXT("---------------------------(23.6%)",BarIndex,HH - Fib0236,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(38.2%)",BarIndex,HH - Fib0382,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(50.0%)",BarIndex,HH - Fib0500,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(61.8%)",BarIndex,HH - Fib0618,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(76.4%)",BarIndex,HH - Fib0764,SansSerif,Bold,10)coloured(238,122,233,255)
ELSIF Dn THEN
DRAWTEXT("---------------------------(23.6%)",BarIndex,LL + Fib0236,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(38.2%)",BarIndex,LL + Fib0382,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(50.0%)",BarIndex,LL + Fib0500,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(61.8%)",BarIndex,LL + Fib0618,SansSerif,Bold,10)coloured(238,122,233,255)
DRAWTEXT("---------------------------(76.4%)",BarIndex,LL + Fib0764,SansSerif,Bold,10)coloured(238,122,233,255)
ENDIF
RETURN

Fibonacci-Pivot.itf

11/24/2023 at 4:41 PM #224259 quote

deletedaccount22102025

Participant

New

Gracias Roberto por tu tiempo. Voy a probarlo. Un saludo