// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("5Line");
DaysPar = Param("Days to Calculate Average Line",3);
VarSet("MaxHighVal",0);
VarSet("MinLowVal",0);

for(i = 1; i < DaysPar + 1; i++)
{
	MaxHighVal = MaxHighVal + TimeFrameGetPrice( "H", inDaily, -i )-TimeFrameGetPrice( "C", inDaily, -i );
	MinLowVal = MinLowVal + TimeFrameGetPrice( "C", inDaily, -i )-TimeFrameGetPrice( "L", inDaily, -i );
}
MaxHighY = TimeFrameGetPrice( "O", inDaily, 0 ) + (MaxHighVal/DaysPar);
MinLowY = TimeFrameGetPrice( "O", inDaily, 0 ) - (MinLowVal/DaysPar);
AvgLine1 = (MaxHighY + MinLowY)/2;
AvgLine2 = (MaxHighY + AvgLine1)/2;
AvgLine3 = (MinLowY + AvgLine1)/2;
TimeFrameSet( inDaily );
ArrayForLine1 = LineArray(0,LastValue(MaxHighY),160,LastValue(MaxHighY),3);
TimeFrameSet( inDaily );
ArrayForLine2 = LineArray(0, LastValue(AvgLine2) , 160, LastValue(AvgLine2), 3);
TimeFrameSet( inDaily );
ArrayForLine3 = LineArray(0, LastValue(AvgLine1), 160, LastValue(AvgLine1), 3);
TimeFrameSet( inDaily );
ArrayForLine4 = LineArray(0, LastValue(AvgLine3), 160, LastValue(AvgLine3), 3);
TimeFrameSet( inDaily );
ArrayForLine5 = LineArray(0, LastValue(MinLowY), 160, LastValue(MinLowY), 3);

Plot(ArrayForLine1, "", colorBlack, styleThick|styleDots|styleNoLabel,0,0,20);
Plot(ArrayForLine2, "", colorOrange, styleThick|styleDots|styleNoLabel,0,0,5);
Plot(ArrayForLine3, "", colorBlue, styleLine|styleNoTitle|styleNoLabel,0,0,5);
Plot(ArrayForLine4, "", colorOrange, styleThick|styleDots|styleNoLabel,0,0,5);
Plot(ArrayForLine5, "", colorBlack, styleThick|styleDots|styleNoLabel,0,0,20);
TimeFrameRestore();

_SECTION_END();



_SECTION_BEGIN("Price Chart");
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();