// Downloaded From https://www.WiseStockTrader.com
Mode = ParamToggle("Smoothing", "On|Off" ); 
MomPer = Param("Momentum Periods", 10, 1, 100, 1); 
SmaPer = Param("Moving Average Periods", 7, 1, 1000, 1); 
EmaPer = Param("Exponential Moving Average Periods", 7, 1, 1000, 1); 
BaseLine = 0; 

if( Mode == 1) 
{ 
Mom = 100 * ((Close / MA(Close, (2 * MomPer) + 1) ) - 1); 
} 
else 
{ 
Mom = 100 * ((EMA(Close, EmaPer) / MA(Close, (2 * MomPer) + 1) ) - 1); 
} 

Plot( Mom, "Anchored Momentum", ParamColor( "Color", colorBlue ), 1 ); 
Plot( BaseLine, "BaseLine", colorRed, styleNoTitle, 1 );