[RS]Renko RSI V0

study("[RS]RRSI", overlay=false)
//  ||---
//  ||---   Renko Source
decay = input(125) * syminfo.mintick
cc = round(close/decay)
rprice = cc*decay
predosc = nz(ropen[1], rprice)
ropen = close > predosc + decay ? rprice :
        close < predosc - decay ? rprice : predosc
//  ||---
//  ||---

rrsi = rsi(ropen, input(14))
nrsi = rsi(close, 14)
plot(rrsi, style=line, color=black, linewidth=1)
plot(nrsi, style=line, color=black, linewidth=1)
hline(70, color=maroon)
hline(50)
hline(30, color=green)