_SECTION_BEGIN("Price");
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 )) ));
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_BEGIN("EMA 5 MIN");
TimeFrameSet(in5Minute);
m5= EMA(Close,20) ;
Plot(TimeFrameExpand(m5, in5Minute), "", ParamColor( "5 Min Color", colorBlue ), ParamStyle("Style", styleDashed));
TimeFrameRestore();
_SECTION_END();
_SECTION_BEGIN("EMA 15 MIN");
TimeFrameSet(in15Minute);
m15= EMA(Close,20) ;
Plot(TimeFrameExpand(m15, in15Minute), "", ParamColor( "15 Min Color", colorGrey50 ), ParamStyle("Style", styleDashed));
TimeFrameRestore();
_SECTION_END();
_SECTION_BEGIN("EMA 60 MIN");
TimeFrameSet(60*in1Minute);
m60= EMA(Close,20) ;
Plot(TimeFrameExpand(m60, 60*in1Minute), "", ParamColor( "60 Min Color", colorLightGrey ), ParamStyle("Style", styleDashed));
TimeFrameRestore();
_SECTION_END();
_SECTION_BEGIN("Bar Count");
iBars = ParamToggle("BarCount","No|Yes",1);
if (iBars)
iBars = BarsSince( Day() != Ref( Day(), -1 ) );
for ( i = BarCount - ( LastValue( iBars ) + 0 ); i < BarCount; i=i+3 )
{
j[i] = abs( ( LastValue( BarCount ) - 2 * i - ( LastValue( iBars - i ) ) - 2 ) );
PlotText( NumToStr( j[i], 1 ), i, L[i] - L[i]*0.003, colorBlack );
}