EMA SPEED & ACCELEARTION PARA PRT

Viewing 8 posts - 1 through 8 (of 8 total)
  • Author
    Posts
  • #181673 quote
    realizedtrade
    Participant
    New

    Hola, buenas a todos.

    He encontrado este indicador en Tradingview, que me parece interesantísimo, y quería poder utilizarlo aquí, el problema… No tengo conocimientos para migrar el indicador, alguno me puede dar ideas?

    Os dejo el código por aquí ( en lenguaje PINE de TRADINGVIEW):

    //@version=4
    study(“EMA21 Speed & Accel”, overlay=false)
    // Variable definition
    NP = input(1, minval=1, title=”Number of Periods to use in finite difference derivatives”)
    // CURVSC = input(0.1, minval=0, title=”Accel Plot Scale”) // Not used in this release
    //
    len1 = input(21, minval=1, title=”EMA Length”)
    out1 = ema(close, len1)
    // background color when speed & acceleration are >=0
    verdeclaro=#98FB98
    blanco=#FFFFFF
    //
    // SLOW MA Derivative (Speed in %/Period) Calculation (over NP periods)
    //
    SMAS = (1.50*ema(close, len1)-2*ema(close[NP], len1)+0.5*ema(close[2*NP], len1))/(NP*ema(close, len1)) // derivada con tres puntos
    // Se plotea SMASMA para suavizar un poco
    SMASMA = sma(SMAS, 5)
    //
    plot(max(SMASMA*100,-5), title=”%-per-day”, color=color.blue, linewidth=3)
    //
    // SMAS Derivative (Curvature = acceleration in %/period/period ) = Speed derivative = Acceleration
    //
    CURV = (ema(close, len1)-2*ema(close[NP], len1)+ema(close[2*NP], len1))/(NP*NP) // derivada SEGUNDA con tres puntos
    //
    CURVMA = sma(CURV,5)
    // Scale Curvature
    maxslope=highest(SMASMA,200)*100
    maxcurvature=highest(CURVMA,200)
    scale=1*maxslope/maxcurvature
    //
    plot(iff(CURVMA>0, min(CURVMA*scale,5), max(CURVMA*scale,-5)), title=”CURV”, color=color.fuchsia, linewidth=2)
    //
    // Colorear verde claro u oscuro en función de CURV >=0 and/or SMASMA >=0
    //
    bgcolor((CURVMA>=0 and SMASMA>=0) ? verdeclaro : blanco,
    transp=40)
    // Se plotea el eje de abscisas
    plot(0, title=”0″, color=color.black)

     

    Gracias a todos de antemano.

     

    Un saludo,

    Óscar.

    #181677 quote
    supertiti
    Participant
    Master
    //@version=4
    study(“EMA21 Speed & Accel”, overlay=false)
    // Variable definition
    NP = input(1, minval=1, title=”Number of Periods to use in finite difference derivatives”)
    // CURVSC = input(0.1, minval=0, title=”Accel Plot Scale”) // Not used in this release
    //
    len1 = input(21, minval=1, title=”EMA Length”)
    out1 = ema(close, len1)
    // background color when speed & acceleration are >=0
    verdeclaro=#98FB98
    blanco=#FFFFFF
    //
    // SLOW MA Derivative (Speed in %/Period) Calculation (over NP periods)
    //
    SMAS = (1.50*ema(close, len1)-2*ema(close[NP], len1)+0.5*ema(close[2*NP], len1))/(NP*ema(close, len1)) // derivada con tres puntos
    // Se plotea SMASMA para suavizar un poco
    SMASMA = sma(SMAS, 5)
    //
    plot(max(SMASMA*100,-5), title=”%-per-day”, color=color.blue, linewidth=3)
    //
    // SMAS Derivative (Curvature = acceleration in %/period/period ) = Speed derivative = Acceleration
    //
    CURV = (ema(close, len1)-2*ema(close[NP], len1)+ema(close[2*NP], len1))/(NP*NP) // derivada SEGUNDA con tres puntos
    //
    CURVMA = sma(CURV,5)
    // Scale Curvature
    maxslope=highest(SMASMA,200)*100
    maxcurvature=highest(CURVMA,200)
    scale=1*maxslope/maxcurvature
    //
    plot(iff(CURVMA>0, min(CURVMA*scale,5), max(CURVMA*scale,-5)), title=”CURV”, color=color.fuchsia, linewidth=2)
    //
    // Colorear verde claro u oscuro en función de CURV >=0 and/or SMASMA >=0
    //
    bgcolor((CURVMA>=0 and SMASMA>=0) ? verdeclaro : blanco,
    transp=40)
    // Se plotea el eje de abscisas
    plot(0, title=”0″, color=color.black)

    Asi esta mejor para Nicolas

    #181755 quote
    realizedtrade
    Participant
    New

    Muchísimas gracias!

    Un saludo,

    Óscar.

    #222560 quote
    cjr30
    Participant
    Master

    Buenas tardes,

    Estaba dando un vistazo a la web de Tradingview y me encontré  con este indicador, el cual observo que en su día se solicito por parte del forero “realizedtrade” su posible conversión. El indicador en cuestión según su autor se trata de :”El Script calcula y plotea la primera y segunda derivada de una EMA de “length” períodos, con un valor por defecto de 21.

    – La curva azul es la primera derivada de la EMA; que puede ser interpretada conmo su “velocidad”, “pendiente” o % de ganancia o pérdida que se tendría sobre la EMA. Cuando la unidad de tiempo del gráfico es Días, permite visualizar en la escala de la derecha el % de ganancia o pérdida por día.

    – La curva Fucsia muestra la segunda derivada, o “Aceleración”, que se puede interpretar como la fuerza que puede aumentar o disminuir la pendiente de la EMA.

    Cuando la Velocidad y Aceleración son mayores que cero, las ganancias aumentan cada período, y el fondo de colorea de verde.

    Las derivadas primera y segunda se calculan usando técnicas de funciones de forma, como las aplicadas en el MEF.”

     

    Alguien lo ha conseguido convertir a ProrealBuilder?.

    Si es así se podría compartir.

    Gracias por anticipado

    #222566 quote
    robertogozzi
    Moderator
    Master
    #222571 quote
    cjr30
    Participant
    Master

    Correcto Roberto, pero esta en lenguaje de Tradingview no en Probuilder

    #222575 quote
    robertogozzi
    Moderator
    Master

    Ahi esta:

    //EMA21 Speed & Accel
    //
    //https://www.tradingview.com/script/omlpqq5X/
    //
    //https://www.prorealcode.com/topic/ema-speed-acceleartion-para-prt/
    //
    //@version=4    by Saltapones
    //
    backgroundcolor("White")
    NP     = 1
    len1   = 21
    //out1   = average[len1,1](close)
    SMAS   = (1.50*average[len1,1](close)-2*average[len1,1](close[NP])+0.5*average[len1,1](close[2*NP]))/(NP*average[len1,1](close))
    SMASMA = average[5,0](SMAS)
    y      = max(SMASMA*100,-5)
    CURV   = (average[len1,1](close)-2*average[len1,1](close[NP])+average[len1,1](close[2*NP]))/(NP*NP)
    CURVMA = average[5,0](CURV)
    maxslope     = highest[200](SMASMA)*100
    maxcurvature = highest[200](CURVMA)
    scale        = 1*maxslope/maxcurvature
    x    = min(CURVMA*scale,5)
    IF CURV <= 0 THEN
       x = max(CURVMA*scale,-5)
    ENDIF
    IF CURVMA >= 0 AND SMASMA >= 0 THEN
       backgroundcolor("LawnGreen")
    ENDIF
    RETURN x AS "Curvature" coloured(255,0,255,255),y AS "Average" coloured(65,105,225,255)
    #222579 quote
    cjr30
    Participant
    Master

    Impresionante.

    Menuda rapidez y eficacia.

    Muchísimas gracias

    robertogozzi thanked this post
Viewing 8 posts - 1 through 8 (of 8 total)
  • You must be logged in to reply to this topic.

EMA SPEED & ACCELEARTION PARA PRT


ProBuilder: Indicadores y Herramientas

New Reply
Author
Summary

This topic contains 7 replies,
has 4 voices, and was last updated by cjr30
2 years, 3 months ago.

Topic Details
Forum: ProBuilder: Indicadores y Herramientas
Language: Spanish
Started: 11/16/2021
Status: Active
Attachments: 3 files
Logo Logo
Loading...