// Downloaded From https://www.WiseStockTrader.com

_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);nbar = Param("nbar",4,2,6,1); 
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
PHigh = H > Ref(HHV(H,nbar),-1) AND Ref(HHV(H,nbar),nbar) < H; PHighPrice0 = ValueWhen(PHigh,H);PHighPrice1 = IIf(PHighPrice0 AND BarsSince(PHigh) > nbar,PHighPrice0,Null);
PHighPrice2 = IIf(PHighPrice0 AND BarsSince(PHigh) <= nbar,PHighPrice0,Null);PLow = L < Ref(LLV(L,nbar),-1) AND Ref(LLV(L,nbar),nbar) > L;PLowPrice0 = ValueWhen(PLow,L);
PLowPrice1 = IIf(PLowPrice0 AND BarsSince(Plow) > nbar,PLowPrice0,Null); PLowPrice2 = IIf(PLowPrice0 AND BarsSince(Plow) <= nbar,PLowPrice0,Null);
Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );;
_SECTION_END();




Plot(PLowPrice2,"",colorGreen|styleLine,styleDots , styleNoLine,Null,Null,-1,6);
Plot(PHighPrice2,"",colorRed |styleStaircase,styleDots,styleNoLine,Null,Null,-1,6);