_SECTION_BEGIN("Hook Reversals");

slow =  LLV(Low, 6);
shigh = HHV(High, 6);

BFStp = Ref(Low,-1) == LLV(Low, 21); // Full Stop Buy
SFStp = Ref(High,-1) == HHV(High, 21); // Full Stop Sell

Buy3=HRbuy=BFStp AND O<(L+0.2*(H-L)) AND C>(H-0.2*(H-L)) AND H<Ref(H,-1) AND L>Ref(L,-1);
Short3=HRsell=SFStp AND O>(L+0.8*(H-L)) AND C<(H-0.8*(H-L)) AND H<Ref(H,-1) AND L>Ref(L,-1);

Sell3=C<O;
Cover3=C>O;

Buy3=ExRem(Buy3,Sell3);
Short3=ExRem(Short3,Cover3);
Sell3=ExRem(Sell3,Buy3);
Cover3=ExRem(Cover3,Short3);

PlotShapes(Buy3*shapeSquare, colorBlue, 0, L,Offset=-40);
PlotShapes(Buy3*shapeSquare,colorBlue, 0,L, Offset=-50); 
PlotShapes(Buy3* shapeUpArrow,colorWhite, 0,L, Offset=-45); 
PlotShapes(Short3* shapeSquare,colorRed, 0, H, Offset=40);
PlotShapes(Short3* shapeSquare,colorRed, 0,H, Offset=50); 
PlotShapes(Short3* shapeDownArrow,colorWhite, 0,H, Offset=-45);

PlotShapes(Sell3*shapeHollowDownArrow,colorPink,0,L,-45);
PlotShapes(Cover3*shapeHollowUpArrow,colorSkyblue,0,H,-45);

 
_SECTION_END();

_SECTION_BEGIN( "Price" );
SetChartOptions( 0, chartShowDates | chartShowArrows | chartLogarithmic | chartWrapTitle );
_N( Title = StrFormat( "{{NAME}} - " + SectorID( 1 ) + " - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " + WriteVal( V, 1.0 ) + " {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ) );
Plot( C, "Close", colorRose, styleCandle | styleNoTitle | ParamStyle( "Style" ) | GetPriceStyle() );
_SECTION_END();