// Downloaded From https://www.WiseStockTrader.com
periods=Param("Periods",15,1,200,1);
Kusmooth=Param("%Kuavg",3,1,200,1);
Dusmooth=Param("%Duavg",3,1,200,1);
HH=HHV(Ref(H,-1),Periods);
LL=LLV(Ref(L,-1),Periods);
Raw=Nz(100*(C-LL)/(HH-LL),null);
SlowKu=MA(Raw,Kusmooth);
SlowDu=MA(SlowKu,Dusmooth);
Plot(SlowKu,_DEFAULT_NAME(),ParamColor("KuColor",colorCycle),ParamStyle("KuStyle"));
Plot(SlowDu,_DEFAULT_NAME(),ParamColor("DuColor",colorCycle),ParamStyle("DuStyle"));
PlotGrid(80,colorRed);
PlotGrid(50,colorLightGrey);
PlotGrid(20,colorLightGrey);