Buenas Noches:

Se podría hacer Screener de este indicador indicando Zonas de Soportes y Resistencias.

Gracias

//————————————–

//PRC_DTFX Algo Zones [LuxAlgo]

//version = 0

//22.12.2025

//Iván González @ http://www.prorealcode.com

//Sharing ProRealTime knowledge

//————————————–

// — Parameters —

//————————————–

prd = 10

fibLevel1 = 0.3

fibLevel2 = 0.5

fibLevel3 = 0.7

//————————————–

// — Pivot Detection —

//————————————–

// Pivot high

IF high[prd] = HIGHEST[2 * prd + 1](high) THEN

   ph = high[prd]

   phx = BARINDEX[prd]

   boxBreak = 0

   drawpoint(phx,ph,1)coloured(“grey”)

ENDIF

// Pivot Low

IF low[prd] = LOWEST[2 * prd + 1](low) THEN

   pl = low[prd]

   plx = BARINDEX[prd]

   boxBreak = 0

   drawpoint(plx,pl,1)coloured(“grey”)

ENDIF

//————————————–

// — Breakout Logic —

//————————————–

conditionUp = close CROSSES OVER ph

conditionDown = close CROSSES UNDER pl

IF (conditionUp OR conditionDown) AND boxBreak = 0 THEN

   // A new zone is born

   boxBreak = 1

   zoneActive = 1

   // Determine the box origin

   IF phx < plx THEN

      startX = phx

   ELSE

      startX = plx

   ENDIF

   // Store levels for the continuous lines

   rangeSize = ph – pl

   // Calculate Fibonacci levels for this specific zone

   activeFib1 = pl + (rangeSize * fibLevel1)

   activeFib2 = pl + (rangeSize * fibLevel2)

   activeFib3 = pl + (rangeSize * fibLevel3)

   // Set colors based on breakout direction

   IF conditionUp THEN

      // Bullish colors (Greenish)

      r = 8

      g = 153

      b = 129

   ELSE

      // Bearish colors (Reddish)

      r = 242

      g = 54

      b = 69

   ENDIF

   // Draw the static rectangle (from origin to breakout bar)

   DRAWRECTANGLE(startX, ph, BARINDEX, pl) COLOURED(r, g, b, 50) BORDERCOLOR(0, 0, 0, 0)

   // Update the start bar for the moving lines

   lastBreakoutBar = BARINDEX

ENDIF

//————————————–

// — Continuous Fibo Line Projection —

//————————————–

IF zoneActive = 1 AND BARINDEX > lastBreakoutBar THEN  // Draw segments from the previous bar to the current one to create a continuous line

   DRAWSEGMENT(BARINDEX[1], activeFib1, BARINDEX, activeFib1) STYLE(DOTTEDLINE, 1) COLOURED(r, g, b)

   DRAWSEGMENT(BARINDEX[1], activeFib2, BARINDEX, activeFib2) STYLE(LINE, 1) COLOURED(r, g, b)

   DRAWSEGMENT(BARINDEX[1], activeFib3, BARINDEX, activeFib3) STYLE(DOTTEDLINE, 1) COLOURED(r, g, b)

ENDIF

//————————————–

// — Internal box lines —

//————————————–

IF (conditionUp OR conditionDown) AND boxBreak = 1 THEN

   DRAWSEGMENT(startX, activeFib1, BARINDEX, activeFib1) STYLE(DOTTEDLINE, 1) COLOURED(r, g, b)

   DRAWSEGMENT(startX, activeFib2, BARINDEX, activeFib2) STYLE(LINE, 1) COLOURED(r, g, b)

   DRAWSEGMENT(startX, activeFib3, BARINDEX, activeFib3) STYLE(DOTTEDLINE, 1) COLOURED(r, g, b)

ENDIF

//————————————–

RETURN