MAGICTREND SCREENER

• 10/07/2025 at 9:28 PM #252310
  Miguel Angel

  BUENAS NOCHES

  NECESITO UN SCRENER BASADO EN EL MAGICTREND CAMBIO DE ROJO A VERDE  PARA ACCIONES ENTRE 3 Y 30 DOLARES

  GRACIAS DE ANTEMANO

   

  

  Miguel Angel

  Participant

  Topics: 2

  Replies: 1

  Been thanked: 0 times
  10/08/2025 at 9:19 AM #252325
  robertogozzi

  Ahí está:

  cciP = 20 atrP = 14 atrM = 1 smaP = 5 IF BarIndex > max(cciP,atrP) THEN lastCCI = thisCCI thisCCI = CCI[cciP](typicalPrice) myATR = AverageTrueRange[atrP](close) // temp2 = Average[smaP,0](myATR) * atrM buffDN = high + temp2 buffUP = low - temp2 // IF (thisCCI >= 0) AND (lastCCI < 0) THEN buffUP = buffDN[1] ENDIF IF (thisCCI <= 0) AND (lastCCI > 0) THEN buffDN = buffUP[1] ENDIF IF (thisCCI >= 0) THEN IF (buffUP < buffUP[1]) THEN buffUP = buffUP[1] ENDIF ELSIF (thisCCI <= 0) THEN IF (buffDN > buffDN[1]) THEN buffDN = buffDN[1] ENDIF ENDIF IF thisCCI >= 0 THEN MagicTrend = buffUP ELSIF thisCCI <= 0 THEN MagicTrend = buffDN ENDIF ELSE thisCCI = 0 lastCCI = 0 myATR = 0 buffUP = 0 buffDN = 0 buffDN = 0 buffUP = 0 MagicTrend = 0 ENDIF c1 = close CROSSES OVER MagicTrend c2 = (close >= 3) AND (close <= 30) Cond = c1 AND c2 SCREENER[Cond]

  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

  cciP = 20 atrP = 14 atrM = 1 smaP = 5 IF BarIndex > max(cciP,atrP) THEN lastCCI = thisCCI thisCCI = CCI[cciP](typicalPrice) myATR   = AverageTrueRange[atrP](close) // temp2   = Average[smaP,0](myATR) * atrM buffDN  = high + temp2 buffUP  = low  - temp2 // IF (thisCCI >= 0) AND (lastCCI  < 0) THEN buffUP = buffDN[1] ENDIF IF (thisCCI <= 0) AND (lastCCI  > 0) THEN buffDN = buffUP[1] ENDIF IF (thisCCI >= 0) THEN IF (buffUP < buffUP[1]) THEN buffUP = buffUP[1] ENDIF ELSIF (thisCCI <= 0) THEN IF (buffDN > buffDN[1]) THEN buffDN = buffDN[1] ENDIF ENDIF IF thisCCI >= 0 THEN MagicTrend = buffUP ELSIF thisCCI <= 0 THEN MagicTrend = buffDN ENDIF ELSE thisCCI    = 0 lastCCI    = 0 myATR      = 0 buffUP     = 0 buffDN     = 0 buffDN     = 0 buffUP     = 0 MagicTrend = 0 ENDIF c1   = close CROSSES OVER MagicTrend c2   = (close >= 3) AND (close <= 30) Cond = c1 AND c2 SCREENER[Cond]

   

  1 user thanked author for this post.

  Iván

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17934

  Been thanked: 4537 times
  10/08/2025 at 9:26 AM #252326
  Iván

  Ahí va

  cciP = 20 thisCCI = CCI[cciP](typicalPrice) screener[thisCCI >= 0 and thisCCI[1] < 0 and close>3 and close<30]

  1 2 3 4

  cciP = 20 thisCCI = CCI[cciP](typicalPrice)   screener[thisCCI >= 0 and thisCCI[1] < 0 and close>3 and close<30]

  

  Iván

  Moderator

  Topics: 0

  Replies: 1858

  Been thanked: 816 times
• Author
  Posts