_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();
_SECTION_BEGIN("Prior Day OHLC");
PDH = TimeFrameGetPrice( "H", inDaily, -1 );
PPDH = TimeFrameGetPrice( "H", inDaily, -2 );
PDL = TimeFrameGetPrice( "L", inDaily, -1 );
PPDL = TimeFrameGetPrice( "L", inDaily, -2 );
PWH=TimeFrameGetPrice( "H", inWeekly, -1 );
PWL=TimeFrameGetPrice( "L", inWeekly, -1 );
PDH_index = ValueWhen(PDH!=Ref(PDH,-1),BarIndex());
PDH_Style = ParamStyle("PDH Style", styleThick);
PDH_Color = ParamColor("PDH Color", colorgreen);
PPDH_index = ValueWhen(PDH!=Ref(PDH,-1),BarIndex());
PPDH_Style = ParamStyle("PPDH Style", styleThick);
PPDH_Color = ParamColor("PPDH Color", colorblue);
PDL_index = ValueWhen(PDL!=Ref(PDL,-1),BarIndex());
PDL_Style = ParamStyle("PDL Style", styleThick);
PDL_Color = ParamColor("PDL Color", colorRed);
PPDL_index = ValueWhen(PDL!=Ref(PDL,-1),BarIndex());
PPDL_Color = ParamColor("PPDL Color", colororange);
PPDL_Style = ParamStyle("PPDL Style", styleThick);
PWH_index = ValueWhen(PWH!=Ref(PWH,-1),BarIndex());
PWH_Style = ParamStyle("PWH Style", styleThick);
PWH_Color = ParamColor("PWH Color", colorred);
PWL_index = ValueWhen(PWL!=Ref(PWL,-1),BarIndex());
PWL_Color = ParamColor("PWL Color", colororange);
PWL_Style = ParamStyle("PWL Style", styleThick);
Plot(PDH,"PDH",PDH_Color,PDH_Style);
Plot(PPDH,"PPDH",PPDH_Color,PPDH_Style);
Plot(PDL,"PDL",PDL_Color,PDL_Style);
Plot(PPDL,"PPDL",PPDL_Color,PPDL_Style);
Plot(PWH,"PWH",PWH_Color,PWH_Style);
Plot(PWL,"PWL",PWL_Color,PWL_Style);
PlotText("Previous Day High",LastValue(PDH_index)-6,LastValue(TimeFrameGetPrice( "H", inDaily, -1 ),True)*1.0001,PDH_Color);
PlotText("2 Previous Day High",LastValue(PPDH_index)-6,LastValue(TimeFrameGetPrice( "H", inDaily, -2 ),True)*1.0001,PPDH_Color);
PlotText("Previous Day Low",LastValue(PDL_index)-6,LastValue(TimeFrameGetPrice( "L", inDaily, -1 ),True)*1.0001,PDL_Color);
PlotText("2 Previous Day Low",LastValue(PPDL_index)-6,LastValue(TimeFrameGetPrice( "L", inDaily, -2 ),True)*1.0001,PPDL_Color);
PlotText("Previous Week High",LastValue(PWH_index)-6,LastValue(TimeFrameGetPrice( "H", inWeekly, -1 ),True)*1.0001,PWH_Color);
PlotText("Previous Week Low",LastValue(PWL_index)-6,LastValue(TimeFrameGetPrice( "L", inWeekly, -1 ),True)*1.0001,PWL_Color);