ProScreener de dos indicadores

• 11/26/2025 at 8:53 PM #254001
  NicoGB67

  Buenas, no sé si se podrá hacer el ProScreener que me gustaría tener, para mí sería lo que ando buscando desde hace tiempo y es obtener información valiosa de dos de mis indicadores favoritos en tiempo real, se trata del Smart Money Concepts y del ZigZag SR, ambos subidos por Iván; tengo el ProScrrener de ambos que generosamente Iván me hizo, pero lo que busco es algo conjunto de ambos y no sé como hacerlo; se trata de que me avise cuando tras un CHoCH o un BOS alcista se crea una onda impulsiva (LH), y que cuando el CHoCH o BOS sea bajista la onda sea correctiva (HL) ;no sé si me explico bien, quiero que cuando se dé en tiempo real un LH antes se haya producido un CHoCH o BOS alcista y al contrario con del bajista, los ProScreener que Iván hizo lo dejo abajo:

   

  //——————————————————————————–//
  //Screener_Smart Money Concepts
  //version = 1
  //29.07.2024
  //Iván González @ http://www.prorealcode.com
  //Sharing ProRealTime knowledge
  //——————————————————————————–//
  //—–Inputs———————————————————————//
  length=15

  showbull=3//1=all 2=bos 3=CHoCH
  showbear=3//1=all 2=bos 3=CHoCH

  //——————————————————————————–//
  //—–Swings———————————————————————//
  //—Swing length
  os=0
  upper=highest[length](high)
  lower=lowest[length](low)

  if high[length]>upper then
  os=0
  elsif low[length]<lower then
  os=1
  else
  os=os[1]
  endif

  if os=0 and os[1]<>0 then
  mytop=high[length]
  else
  mytop=0
  endif

  if os=1 and os[1]<>1 then
  mybot=low[length]
  else
  mybot=0
  endif
  //——————————————————————————–//
  //—–Pivot High—————————————————————–//
  if mytop then
  topcross=1
  topy=mytop
  endif
  //——————————————————————————–//
  //—–Pivot Low——————————————————————//
  if mybot then
  botcross=1
  boty=mybot
  endif
  //Detect bullish Structure
  signalLong=0
  if close crosses over topy and topcross then
  choch=undefined
  if trend<0 then
  choch=1
  endif

  if showbull=1 or (showbull=2 and not choch) or (showbull=3 and choch) then
  signalLong=1
  endif

  topcross=0
  trend=1
  endif

  //Detect Bullish Strcuture
  signalshort=0
  if close crosses under boty and botcross then
  choch=undefined
  if trend>0 then
  choch=1
  endif

  if showbear=1 or (showbear=2 and not choch) or (showbear=3 and choch) then
  signalshort=1
  endif

  botcross=0
  trend=-1
  endif

  screener[signalLong or signalShort](signalLong as “long”,signalShort as “short”)

   

  ---

   

  //————————————//
  // Inputs
  //————————————//
  prd=15
  //atr=averagetruerange[14](close)
  //————————————//
  // Calculate Pivot High and Low
  //————————————//
  ph = high=highest[prd](high)
  pl = low=lowest[prd](low)
  //————————————//
  // Calculate Direction
  //————————————//
  if ph and pl=0 then
  dir=1
  elsif pl and ph=0 then
  dir=-1
  else
  dir=dir
  endif
  dirchanged=dir<>dir[1]
  //————————————//
  // Calculate ZizZag levels and x
  //————————————//
  if ph or pl then
  if dirchanged then
  if dir=1 then
  $zigzag[t+1]=highest[prd](high)
  $zigzagidx[t+1]=barindex
  $dir[t+1]=1
  t=t+1
  elsif dir=-1 then
  $zigzag[t+1]=lowest[prd](low)
  $zigzagidx[t+1]=barindex
  $dir[t+1]=-1
  t=t+1
  endif
  else
  if dir=1 and highest[prd](high)> $zigzag[t] then
  $zigzag[t]=highest[prd](high)
  $zigzagidx[t]=barindex
  elsif dir=-1 and lowest[prd](low)< $zigzag[t] then
  $zigzag[t]=lowest[prd](low)
  $zigzagidx[t]=barindex
  endif
  endif
  endif
  //————————————//
  // Draw ZigZag and Levels
  //————————————//

  if islastbarupdate then

  if $dir[t]=1 then

  if $zigzag[t]<$zigzag[t-2] then
  type=12 //IMPULSIVA
  else
  type=11 //ALTO
  endif
  elsif $dir[t]=-1 then
  if $zigzag[t]<$zigzag[t-2] then
  type=22 //BAJO
  else
  type=21 // CORRECTIVA
  endif
  endif

  endif
  //————————————//
  screener[dirchanged](type as “Tipo”)

  

  NicoGB67

  Participant

  Topics: 10

  Replies: 15

  Been thanked: 1 time
  11/27/2025 at 9:36 AM #254003
  Iván

  Aquí tienes.

  // ------------------------------------------------------------------------- // ProScreener: SMC + ZigZag Combinado // Propósito: Detectar LH en estructura Alcista y HL en estructura Bajista // ------------------------------------------------------------------------- // CONFIGURACIÓN prd = 10 // Periodo común para ambos indicadores // ------------------------------------------------------------------------- // LÓGICA 1: SMART MONEY CONCEPTS (DETERMINACIÓN DE TENDENCIA) // ------------------------------------------------------------------------- // Variables de estado para SMC ONCE os = 0 ONCE mytop = 0 ONCE mybot = 0 ONCE topcross = 0 ONCE botcross = 0 ONCE smcTrend = 0 // 1 = Alcista, -1 = Bajista // Cálculo de Swings upper = highest[prd](high) lower = lowest[prd](low) IF high[prd] > upper THEN os = 0 ELSIF low[prd] < lower THEN os = 1 ELSE os = os[1] ENDIF IF os = 0 AND os[1] <> 0 THEN mytop = high[prd] ENDIF IF os = 1 AND os[1] <> 1 THEN mybot = low[prd] ENDIF // Gestión de Pivotes SMC IF mytop > 0 THEN topcross = 1 topy = mytop ENDIF IF mybot > 0 THEN botcross = 1 boty = mybot ENDIF // Determinación de Estructura (BOS/CHoCH) // Actualizamos la variable 'smcTrend' que usaremos como filtro IF close CROSSES OVER topy AND topcross = 1 THEN smcTrend = 1 topcross = 0 ENDIF IF close CROSSES UNDER boty AND botcross = 1 THEN smcTrend = -1 botcross = 0 ENDIF // ------------------------------------------------------------------------- // LÓGICA 2: ZIGZAG SR (DETECCIÓN DE ONDAS) // ------------------------------------------------------------------------- // Cálculo de Pivotes ZigZag ph = 0 pl = 0 IF high = highest[prd](high) THEN ph = 1 ENDIF IF low = lowest[prd](low) THEN pl = 1 ENDIF // Cálculo de Dirección ONCE dir = 0 IF ph = 1 AND pl = 0 THEN dir = 1 ELSIF pl = 1 AND ph = 0 THEN dir = -1 ELSE dir = dir // Mantiene dirección previa ENDIF dirchanged = (dir <> dir[1]) // Lógica de Arrays y Detección de Patrones senal = 0 IF ph = 1 OR pl = 1 THEN IF dirchanged THEN // Se ha confirmado un nuevo tramo IF dir = 1 THEN // Nuevo Pico Detectado pivothigh3=pivothigh2 pivothigh2=pivothigh1 pivothigh1 = highest[prd](high) // CONDICIÓN DE COMPRA: Estructura Alcista (SMC) + Onda LH (ZigZag) // LH (Lower High) = Pico actual menor que el pico anterior (t-2) IF smcTrend = 1 AND pivothigh1 < pivothigh3 THEN senal = 1 // Señal Alcista ENDIF ELSIF dir = -1 THEN // Nuevo Valle Detectado pivotlow3=pivotlow2 pivotlow2=pivotlow1 pivotlow1 = lowest[prd](low) // CONDICIÓN DE VENTA: Estructura Bajista (SMC) + Onda HL (Higher Low) // HL (Higher Low) = Valle actual mayor que el valle anterior (t-2) IF smcTrend = -1 AND pivotlow1 > pivotlow3 THEN senal = 2 // Señal Bajista ENDIF ENDIF ELSE // Actualización del tramo actual (si el precio sigue extendiendo el movimiento) IF dir = 1 AND highest[prd](high) > pivothigh1 THEN pivothigh1 = highest[prd](high) ELSIF dir = -1 AND lowest[prd](low) < pivotlow1 THEN pivotlow1 = lowest[prd](low) ENDIF ENDIF ENDIF // ---------------------------------------------- // SCREENER // ---------------------------------------------- SCREENER[senal > 0](senal AS "Senal")

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147

  // ------------------------------------------------------------------------- // ProScreener: SMC + ZigZag Combinado // Propósito: Detectar LH en estructura Alcista y HL en estructura Bajista // -------------------------------------------------------------------------   // CONFIGURACIÓN prd = 10 // Periodo común para ambos indicadores   // ------------------------------------------------------------------------- // LÓGICA 1: SMART MONEY CONCEPTS (DETERMINACIÓN DE TENDENCIA) // -------------------------------------------------------------------------   // Variables de estado para SMC ONCE os = 0 ONCE mytop = 0 ONCE mybot = 0 ONCE topcross = 0 ONCE botcross = 0 ONCE smcTrend = 0 // 1 = Alcista, -1 = Bajista   // Cálculo de Swings upper = highest[prd](high) lower = lowest[prd](low)   IF high[prd] > upper THEN    os = 0 ELSIF low[prd] < lower THEN    os = 1 ELSE    os = os[1] ENDIF   IF os = 0 AND os[1] <> 0 THEN    mytop = high[prd] ENDIF   IF os = 1 AND os[1] <> 1 THEN    mybot = low[prd] ENDIF   // Gestión de Pivotes SMC IF mytop > 0 THEN    topcross = 1    topy = mytop ENDIF   IF mybot > 0 THEN    botcross = 1    boty = mybot ENDIF   // Determinación de Estructura (BOS/CHoCH) // Actualizamos la variable 'smcTrend' que usaremos como filtro IF close CROSSES OVER topy AND topcross = 1 THEN    smcTrend = 1    topcross = 0 ENDIF   IF close CROSSES UNDER boty AND botcross = 1 THEN    smcTrend = -1    botcross = 0 ENDIF   // ------------------------------------------------------------------------- // LÓGICA 2: ZIGZAG SR (DETECCIÓN DE ONDAS) // -------------------------------------------------------------------------   // Cálculo de Pivotes ZigZag ph = 0 pl = 0   IF high = highest[prd](high) THEN    ph = 1 ENDIF   IF low = lowest[prd](low) THEN    pl = 1 ENDIF   // Cálculo de Dirección ONCE dir = 0   IF ph = 1 AND pl = 0 THEN    dir = 1 ELSIF pl = 1 AND ph = 0 THEN    dir = -1 ELSE    dir = dir // Mantiene dirección previa ENDIF   dirchanged = (dir <> dir[1])   // Lógica de Arrays y Detección de Patrones senal = 0   IF ph = 1 OR pl = 1 THEN       IF dirchanged THEN       // Se ha confirmado un nuevo tramo              IF dir = 1 THEN          // Nuevo Pico Detectado          pivothigh3=pivothigh2                   pivothigh2=pivothigh1                   pivothigh1 = highest[prd](high)                            // CONDICIÓN DE COMPRA: Estructura Alcista (SMC) + Onda LH (ZigZag)          // LH (Lower High) = Pico actual menor que el pico anterior (t-2)          IF smcTrend = 1 AND pivothigh1 < pivothigh3 THEN             senal = 1 // Señal Alcista          ENDIF                ELSIF dir = -1 THEN          // Nuevo Valle Detectado          pivotlow3=pivotlow2                   pivotlow2=pivotlow1                   pivotlow1 = lowest[prd](low)                   // CONDICIÓN DE VENTA: Estructura Bajista (SMC) + Onda HL (Higher Low)          // HL (Higher Low) = Valle actual mayor que el valle anterior (t-2)          IF smcTrend = -1 AND pivotlow1 > pivotlow3 THEN             senal = 2 // Señal Bajista          ENDIF                ENDIF           ELSE       // Actualización del tramo actual (si el precio sigue extendiendo el movimiento)       IF dir = 1 AND highest[prd](high) > pivothigh1 THEN          pivothigh1 = highest[prd](high)                ELSIF dir = -1 AND lowest[prd](low) < pivotlow1 THEN          pivotlow1 = lowest[prd](low)                ENDIF    ENDIF ENDIF   // ---------------------------------------------- // SCREENER // ---------------------------------------------- SCREENER[senal > 0](senal AS "Senal")

  

  Iván

  Moderator

  Topics: 0

  Replies: 1932

  Been thanked: 870 times
  11/27/2025 at 9:39 AM #254004
  NicoGB67

  Buenos días, quería hacer un inciso sobre mi petición; me he dado cuenta mirando en tiempo real el gráfico que cuando se está formando una línea zig zag por ejemplo LH a la que yo renombro “Onda Impulsiva”, esta no se queda con el LH fijado hasta que no comienza otro cambio de línea zig zag contraria y es etiquetada con un HL, porque mientras no se dé dicho HL, el zig zag podría seguir bajando y pasar de LH (onda Impulsiva) a LL (Bajo o suelo); (no sé si me explico bien), por lo que mi petición sería que se diera un LH (Onda Impulsiva) una vez fijado tras una cambio de zig zag con el HL, ya que mientras no salga dicho HL se puede dar la vuelta y no llegar a ser LH fijo.

  pd.- no veas el rollo que he escrito, me temo no me entiendan.

  

  NicoGB67

  Participant

  Topics: 10

  Replies: 15

  Been thanked: 1 time
  11/27/2025 at 12:35 PM #254005
  NicoGB67

  Hola Iván, muchas gracias por tu trabajo y responder con tanta rapidez, pero creo que algo no va bien, al menos he puesto en mi gráfico el ProScreener que me has puesto y no me sale ningún aviso, en cambio busco algunos valores y si que se está produciendo lo que yo pedía, no sé si puedo enviar un archivo con el gráfico para que puedas ver lo que digo; ahora mismo tengo por ejemplo la  empresa ELECNOR dónde el 7 de Octubre se creo un BOS, el pasado 21 de Noviembre se ha creado un LH ya que hoy mismo el zig zag que sube, ha pintado un HL confirmando dicho HL. No sé si el ProScreener que has hecho es de alguna manera diferente y crea una alerta que puede que sea incluso mejor, no lo sé porque aún no me llego la posibilidad de comprobarlo hasta que veo algún aviso, saludos.

  

  NicoGB67

  Participant

  Topics: 10

  Replies: 15

  Been thanked: 1 time
  11/27/2025 at 5:09 PM #254009
  NicoGB67

  Hola de nuevo Iván, pues he estado casi toda la mañana comprobando como evolucionaba el ProScreener en 1 min. EUR/USD (lo puse en esa temporalidad para tener más señales)  y falla, no me avisa cuando espero que me avise, y cuando alguna vez avisa lo hace en algo que no le pido como al darse un HH, además cuando sale el mensaje, este dura segundos, por lo cual si voy al aseo por ejemplo, al llegar no me entero de si pasó algo, te agradezco todo tu esfuerzo pero puede que mi solicitud entiendo sea complicado de llevar a buen puerto.

  

  NicoGB67

  Participant

  Topics: 10

  Replies: 15

  Been thanked: 1 time
• Author
  Posts