// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); 
_SECTION_END();

Bal_Days	=	Param("Days for Balance Point", 3, 2, 10, 1);
Period_High =	HHV(H, Bal_Days);
Period_Low	=	LLV(L, Bal_Days);
Balance_Point=	Period_High - (Period_High - Period_Low)/Bal_Days;
Current_BP	=	Ref(Balance_Point, -1);
Plot(Current_BP, "",  colorRed,styleStaircase);

//Visit Mar ketlogy.com for strategy and unique AFL codes.