Untitled

//@version=5
indicator('RSN TRAMA', 'RSN TRAMA', overlay=true)
length = input(99)
src = input(close)
//--dS--
ama = 0.
hh = math.max(math.sign(ta.change(ta.highest(length))), 0)
ll = math.max(math.sign(ta.change(ta.lowest(length)) * -1), 0)
tc = math.pow(ta.sma(hh or ll ? 1 : 0, length), 2)
ama := nz(ama[1] + tc * (src - ama[1]), src)

// Renk koşulu: Yükselişte yeşil, düşüşte kırmızı
lineColor = ama > ama[1] ? color.green : color.red

plot(ama, 'Plot', color=lineColor, linewidth=2)