//@version=4
study("Poor Man's Cumulative Tick", shorttitle="Poor Man's Cumulative Tick", overlay=false)

travel = ((high-low)*2-abs(open-close))
direction = (close>open?1:-1)
scale =  sma(high-low,1000)
relativevol = volume/sma(volume,1000)*scale
midpoint = travel*direction

op = midpoint + relativevol * direction
cl = midpoint - relativevol * direction
hi = op+(high-max(open,close))*scale
lo = cl-(min(open,close)-low)*scale

sessionChanged() =>
    hd = change(hour)
    (hd >= 0 and hd < 2) or hd == -23 ? 0 : 1

cumBar(value) =>
    cumVal = 0.0
    cumVal := sessionChanged() ? 0 : value + nz(cumVal[1],0)

moveUp = close > open

data = cumBar(cl)

c = data>0?(moveUp?color.blue:#2196F3AA):(moveUp?#FFEB38AA:color.yellow)

plot(data,title="Cumulative Tick",linewidth=2, style=plot.style_columns, color=c)

plotshape(moveUp, title="Advancing", style=shape.triangleup, color=color.blue, location=location.top)
plotshape(not moveUp, title="Declining", style=shape.triangledown, color=color.yellow, location=location.bottom)