// Downloaded From https://www.WiseStockTrader.com
function LWMA( P, per )
{
s=0;
pa=0;

for( i = 0; i < per; i++ ) 
{
s=s+(Ref(P,-i)*(per-i));
pa=pa+(per-i);
}
return (s/pa);
}

P = ParamField("Price field");
Periods = Param("Periods", 15, 2, 300, 1, 10 );

Plot(LWMA( P, Periods ), "LWMA("+Periods +")", ParamColor( "LWMA Color", colorCycle ), ParamStyle("LWMA Style") );