RSI of a Volume weighted moving average for Amibroker (AFL)

_SECTION_BEGIN("RSI of a Volume weighted moving average");

SetChartBkGradientFill( ParamColor("BgTop", colorBlack),
ParamColor("BgBottom", colorBlack),ParamColor("titleblock",colorBlack ));
periods=Param("VWMA periods ",5,2,200,1);
smoothing=Param("exp. smoothing of VWMA",3,2,200,1);
rsiperiods=Param("rsi periods",14,2,200,1);
Vwma = Sum((Volume*Close),periods)/Sum (Volume,periods);
svwma=EMA(Vwma,smoothing);
Plot(RSIa(SVwma,rsiperiods),"RSI of  VWMA ",colorCustom14,styleThick,styleLine);
Plot(70,"",colorGreen,styleDots,styleLine);
Plot(30,"",colorRed,styleDots,styleLine);

_SECTION_END();