//@version=3
study(title='Median Renko Overlay', shorttitle='MRO', overlay=true)
ticksize = input(0.00001)
boxsize = input(50) * ticksize

topprice = na
bottomprice = na
reversal = na

topprice := nz(topprice[1], close)
bottomprice := nz(bottomprice[1], close - boxsize)
reversal := nz(reversal[1], close - boxsize * 2)

if (close > topprice + boxsize)
    topprice := close
    bottomprice := (topprice[1] + bottomprice[1])/2
    reversal := bottomprice - boxsize
if (close < bottomprice - boxsize)
    bottomprice := close
    topprice := (topprice[1] + bottomprice[1])/2
    reversal := topprice + boxsize

a = plot(series=topprice, title='T', color=blue, transp=60)
b = plot(series=bottomprice, title='B', color=blue, transp=60)
c = plot(series=reversal, title='R', color=black, style=circles, transp=25)

fill(a, b, color=aqua, transp=80)