JKSW Relative Strength Index

study(title="JKSW Relative Strength Index", shorttitle="JKSW RSI")

// Plot the RSI 
src = close
len = 50
up = rma(max(change(src), 0), len)
down = rma(-min(change(src), 0), len)
rsi = down == 0 ? 100 : up == 0 ? 0 : 100 - (100 / (1 + up / down))
plot(rsi, color=red, title="RSI value")

// Overbought lines...
hline(60, "Moderately overbought", orange)
overbought = hline(65, "Overbought", orange)
hline(70, "Extremely overbought", red)

// Oversold lines...
hline(40, "Moderately oversold", lime)
oversold = hline(35,"Oversold", lime)
hline(30, "Extemely oversold", green)

// Mid line
hline(50, "Mid line", black, dotted)

// Fill the overbought and oversold hlines
fill(overbought, oversold, color=green, transp=95, title="RSI area")