// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("modified MFI");
HaClose =EMA((O+H+L+C)/4,3);

HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );

HaHigh = Max( H, Max( HaClose, HaOpen ) );

HaLow = Min( L, Min( HaClose, HaOpen ) );

Periods=Param( "Periods",14, 2, 222, 1);

tp=(HaClose +HaHigh +HaLow )/3 ;

newMFI=100 -(100 /(1 + Sum(IIf(Tp>Ref(Tp,-1),V*Tp,0),Periods) /
Sum(IIf(Tp<Ref(Tp,-1),V * Tp,0),Periods) ) );

Plot(newMFI, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") ); 
_SECTION_END();