// Downloaded From https://www.WiseStockTrader.com
r1 = PDI(14);
r2 = MDI (14);


Period = Param("Period",20,1,100,1);
Hull = WMA( 2*WMA((r1-r2),int(Period/2))- WMA((r1-r2),Period),int(sqrt(Period)));



for( i = 1 ; i < BarCount-2; i++ ) 
{
if (hull[i] <hull[i-1] && hull[i] <hull[i+1])
 Lpml[i]=1; 
else
Lpml[i] =0;

if (hull[i] >hull[i-1] && hull[i] >hull[i+1])
 Lpmh[i]=1;
else
Lpmh[i] =0;
}

GR =ExRem(LpmH,Lpmh);
RD =ExRem(Lpml,Lpml);

Plot( Hull, _DEFAULT_NAME(), ParamColor( "Color", colorBlue ), ParamStyle("Style") );