// Downloaded From https://www.WiseStockTrader.com
GfxSetOverlayMode(1);
GfxSetCoordsMode(1);
GraphXSpace = 4;

_SECTION_BEGIN("PRICE + VOLUME CIRCLED");
bi = BarIndex();
start = FirstVisibleValue(bi);
end   = LastVisibleValue(bi);
HVol  = HighestVisibleValue(V);

for (i=start; i<=end; i++)
{
	Color = IIf(C[i] > O[i], colorseaGreen,colorOrange);
	GfxSelectPen(Color);
	GfxSelectSolidBrush(Color);

	dot = (H[i] + L[i])/2;
	bodyup = Max(O[i], C[i]);
	bodydn = Min(O[i], C[i]);
	GfxCircle(i, LastValue(Close), Max((10 * V[i]/HVol), 1));
} 

ChColor = IIf( C>O, colorGreen, colorRed);
SetBarFillColor(ChColor); 

Plot(C, "", colordefault, styleCandle|styleThick|styleNoLabel);
Plot(LastValue(Close), "Close", lastvalue(ChColor), styleLine, Null, Null, 14);
_SECTION_END();


_SECTION_BEGIN("SCALED VOLUME TREND COLORED");
Upgreen  = C >  Ref( C, -1 ) AND C > O;
DownRed  = C <= Ref( C, -1 ) AND C < O;
UpPurple = C  > Ref( C, -1 ) AND C < O;
DownBlue = C <= Ref( C, -1 ) AND C > O;

VColor  = IIf(UpGreen, colorGreen, IIf(DownRed, colorRed, IIf(UpPurple, colorPlum, colorBlue)));
VStyle  = styleHistogram|styleOwnScale|styleThick;
VHeight = Param("Volume Scale Factor", 8, 1, 20, 1);
Plot(V, "Volume", VColor, VStyle, VHeight);
_SECTION_END();