Sniper Stochastics colored

study(title="Sniper Stochastics colored", shorttitle="Snp Stoch colored")
length1 = input(55, minval=1), smoothK1 = input(1, minval=1), smoothD1 = input(1, minval=1)
length2 = input(89, minval=1), smoothK2 = input(1, minval=1), smoothD2 = input(1, minval=1)
length3 = input(144,minval=1),smoothk3 = input(1,minval=1),smoothD3 = input(1,minval=1)
k1 = sma(stoch(close, high, low, length1), smoothK1)
d1 = sma(k1, smoothD1)

up = k1 > k1[1]
down = k1 < k1[1]
mycolor = up ? green : down ? red : blue
plot(k1, color=mycolor)

k2 = sma(stoch(close, high, low, length2), smoothK2)
d2 = sma(k2, smoothD2)
up2 = k2 > k2[1]
down2 = k2 < k2[1]
mycolor2 = up2 ? green : down2 ? red : blue
plot(k2, color=mycolor2)

k3 = sma(stoch(close,high,low,length3),smoothk3)
d3 = sma(k3,smoothD3)
up3 = k3 > k3[1]
down3 = k3 < k3[1]
mycolor3 = up3 ? green : down3 ? red : blue
plot(k3, color=mycolor3)


h0 = hline(80)
h1 = hline(20)
fill(h0, h1, color = yellow, transp=90)