Here is the required AFL:
Praveen.
Code:
_SECTION_BEGIN("BarChart");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) ));
UpColor = ParamColor("UpColor", colorBrightGreen);
DownColor = ParamColor("DownColor", colorRed);
MyColour = IIf(C >= O, UpColor, DownColor);
PlotOHLC(O,H,L,C,"Price", MyColour, styleBar);
Plot( Volume, _DEFAULT_NAME(), IIf(C>O, ParamColor("UpVolume", colorBlue), ParamColor("DownVolume", colorViolet)), ParamStyle( "Style", styleHistogram | styleOwnScale | styleThick, maskHistogram ), 2 );
_SECTION_END();