[LAVA] Renko Mod

// Tradingview.com Pinescript @author Ni6HTH4wK [LAVA] with assistance from @zmm20
// Original code by Richard Santos, [RS]Renko Mod
// ########## ☺♦♣♠♥☺ TIP YUR DEALER ☺♥♠♣♦☺ ###########
// [RS] https://www.tradingview.com/u/RicardoSantos/
// [LAVA]  19P7bkzqSAwSm6X7tXmRVkx6AuBXEUZioo
study("[LAVA] Renko Mod", overlay=true)

// Vars
n1 = input(5, title="Bricksize", minval=.01, type=float)
q1 = input(false, title="Type 1 (Def 2)")
q2 = input(false, title="Bar Colors")
q3 = input(false, title="Quickness?")

// Sources
prclos = na(rclose[1])?round(close):nz(rclose[1])
propen = na(ropen[1])?round(open):nz(ropen[1])

// Function
tall(r) => q3? close>prclos+r ? round((close-prclos)/n1)*n1+prclos : prclos+r : prclos+r
fall(r) => q3? close<prclos-r ? round((close-prclos)/n1)*n1+prclos : prclos-r : prclos-r

// Renko (type 1 or type 2)
type = (q1?n1:n1*2)
rclose = close>prclos+type? prclos>propen? tall(n1) : tall(type) : close>prclos+n1 and prclos>propen? tall(n1) :
    close<prclos-type? prclos<propen? fall(n1) : fall(type) : close<prclos-n1 and prclos<propen? fall(n1) : prclos
ropen = rclose > prclos ? prclos>propen or q1? prclos : prclos+n1 :
    rclose < prclos ? prclos<propen or q1? prclos : prclos-n1 :
    rclose-ropen[1] > n1 ? rclose-n1 : ropen[1]-rclose > n1 ? rclose+n1 : nz(ropen[1])

// Coloring
que = rclose > prclos ? 1 : rclose < prclos ? -1 : nz(que[1])
rc = que>0?green : que<0?red : na

// Plotting
plot(que>0?ropen:na, title="Renko Gurīn Open", style=circles, color=green, linewidth=2)
plot(que<0?ropen:na, title="Renko Aka Open", style=circles, color=red, linewidth=2)
plot(que>0?rclose:na, title="Renko Gurīn Close", style=cross, color=green, linewidth=3)
plot(que<0?rclose:na, title="Renko Aka Close", style=cross, color=red, linewidth=3)
barcolor(q2?rc:na)