Simple Coding Help - No Promise.

_SECTION_BEGIN("Bar Count");
// Author: Pratap Balakrishnan
// Copyright: All rights reserved. Not to be circulated or shared or posted on websites without the author's written permission.
// email id: [email protected]
//
// mode Text - show the barcount as a number above/below the price bars
//             every n bars as set
// mode Histogram- shows the barcount as an histogam. Best used on a different pane
//

showhisto = ParamToggle("Mode", "Text|Histogram", 0) ;
everyn = Param("Show Text Every N bars", 5, 1, 10000, 1) ;
showabove = ParamToggle("Show Pos", "Below|Above", 0) ;
Clrtext = ParamColor("Text Color", colorBlack) ;

nd = Day()!=Ref(Day(),-1) ;

nbar = 1+BarsSince(nd) ;

if (showhisto)
	Plot(nbar, "Day Bar Count", colorBlue, styleHistogram) ;
else
{
	bi = BarIndex() ;

	showtextbar = ((nbar -1) % everyn) == 0 ;
	if (showabove)
	{
		pos = H ;
		Offset = 3 ;
	}
	else
	{
		pos = L ;
		Offset = -3;
	}

	Visfirst = FirstVisibleValue(bi) ;
	Vislast = LastVisibleValue(bi) ;

	for (i = Visfirst; i <= Vislast ; i++)
	{
		if (showtextbar[i])
		{
			str = NumToStr(nbar[i], 1.0) ;
			PlotText(str, i, pos[i]+Offset, Clrtext) ;
		}
	}
//	PlotShapes(showtextbar*shapeSmallCircle, colorBlue, 0, H, 12) ;

}
_SECTION_END();

SetBarsRequired(sbrAll,sbrAll);
 
// BUYING VOLUME AND SELLING VOLUME //
 
BV = IIf( (H==L), 0, V*(C-L)/(H-L) );
SV = IIf( (H==L), 0, V*(H-C)/(H-L) );
 
PlotOHLC(SV,SV,0,0,"SellVolume",colorRed,styleCandle|styleNoTitle|styleNoLabel );
PlotOHLC(SV,BV+SV,SV,BV+SV,"BuyVolume",colorbrightgreen ,styleCandle|styleNoTitle|styleNoLabel );
 
Va = MA(V,30);
 
PlotOHLC( Va, Va, 0, 0, "", ColorBlend( colorWhite , GetChartBkColor(), 0.4 ), styleNoLabel | styleCloud | styleNoRescale, Null, Null, Null, -1 );
Plot(Va,"Average Volume",colorRose,styleNoLine|styleNoLabel );
 
VI = V/Va;
 
Title = "SellVolume:"+WriteVal(SV,5.0)+"   "+"BuyVolume:"+WriteVal(BV,5.0)+"   "+"VolumeIndex:"+WriteVal(VI,1.2)+"   "+
"BuyVolume:"+WriteVal(100*BV/(BV+SV),2.0)+"%"+"   "+"SellVolume:"+WriteVal(100*SV/(BV+SV),2.0)+"%";