Momentum Price for AFL
_SECTION_BEGIN("Momentum Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
bb = MA(Close - Ref(Close,-7),1);
x = MA(Close - Ref(Close,-7),1);
y = MA(bb,5);
Buy = Cross(x,y);
PlotShapes( shapeUpArrow*Buy, colorGreen,0,L, -20);
Sell = Cross(y,x);
PlotShapes( shapeDownArrow*Sell, colorRed,0,H, -10);