# Comparison of Today's Volume at bar and Volume at time
# Mobius
# V01.11.02.2017
# V02.11.02.2017 Revision to display On Volume and added a histogram to overlay current volume with previous days volume.
declare On_Volume;
def v = volume;
def bar = barNumber();
def xBar = if SecondsTillTime(0930) == 0
then bar
else xBar[1];
def pxBar = if xBar != xBar[1]
then xBar[1]
else pxBar[1];
def zxBar = if SecondsFromTime(0930) >= 0 and
SecondsTillTime(1600) > 1
then 0
else if SecondsTillTime(1600) == 0
then bar
else zxBar[1];
def pzxBar = if zxBar != zxBar[1]
then zxBar[1]
else pzxBar[1];
def pxBars = if bar == xBar
then pxBar
else if bar >= xBar
then pxBars[1] + 1
else pxBars[1];
def length = bar - (pxBars-1);
def RelVol = if bar >= xBar
then getValue(v, length)
else 0;
def pVol = if bar == xBar
then 0
else if bar > xBar
then pVol[1] + RelVol
else pVol[1];
def tVol = if SecondsTillTime(0930) == 0
then v
else if SecondsFromTime(0930) > 0 and SecondsTillTime(1600) >= 0
then compoundValue(1, tVol[1] + v, v)
else tVol[1];
plot pVolHisto = if !isNaN(close) then RelVol else double.nan;
pVolHisto.SetPaintingStrategy(PaintingStrategy.Histogram);
pVolHisto.AssignValueColor(if RelVol > tVol[1]
then createColor(20,125,20)
else createColor(150,150,150));
addlabel(1, "yesterdays volume at bar = " + RelVol +
" yesterdays volume = " + pVol +
" todays volume = " + tVol,
if tVol > pVol
then color.green
else color.red);
# End Code Previous Days Volume Comparison V02