TradeMax Estoctuning

//@version=5
//Author: https://www.tradingview.com/u/Wemersonmax
indicator('TradeMax Estoctuning')

length = input(14, 'Length')

src = input(hlc3)
k1 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 3), 3)
k2 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 4), 3)
k3 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 5), 3)
k4 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 6), 3)
k5 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 7), 3)
k6 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 8), 3)
k7 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 9), 3)
k8 = ta.ema(ta.sma(ta.stoch(src, high, low, length), 10), 3)

plot(k1, linewidth=2, color=k1 >= k2 ? color.lime : color.red)
plot(k2, linewidth=2, color=k2 >= k3 ? color.lime : color.red)
plot(k3, linewidth=2, color=k3 >= k4 ? color.lime : color.red)
plot(k4, linewidth=2, color=k4 >= k5 ? color.lime : color.red)
plot(k5, linewidth=2, color=k5 >= k6 ? color.lime : color.red)
plot(k6, linewidth=2, color=k6 >= k7 ? color.lime : color.red)
plot(k7, linewidth=2, color=k7 >= k8 ? color.lime : color.red)
plot(k8, linewidth=2, color=k8 >= k8[1] ? color.lime : color.red)

upline = hline(80, color=color.white, title='OB Level')
midline = hline(50, linewidth=1, title='Mid Level')
downline = hline(20, color=color.white, title='OS Level')