study(title="Pig RS%", shorttitle="RS%", overlay=false)

//RSI
src = close, len = input(14, minval=1, title="RSI Length")

ag = rma(max(change(src), 0), len)
al = rma(-min(change(src), 0), len)
p=input(20,title="period SD")
mult=input(2, title="SD mult")
smooth=input(3, title="smooth")
rs = ag/al
basis = sma(rs, p)
dev = mult * stdev(rs, p)
upper = basis + dev
lower = basis - dev

rsp = (rs - lower)/(upper - lower)

plot(rsp, color=#40E0D0,linewidth=2, transp=0)
h0 = hline(1, linestyle=dashed)
h1 = hline(0, linestyle=dashed)
h2 = hline(0.5, linestyle=dashed)