// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("EMA");
P = Volume;
Periods = Param("PeriodsEMA", 50, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), colorRed, styleLine|styleThick );
_SECTION_END();

Period = Param("Period", 20, 2, 300, 1, 10 );;
LowColor = colorLightGrey;
ClimaxColor = colorRed;
ChurnColor = colorGreen;
ClimaxChurnColor=colorBlue;
LowChurnColor= colorWhite;
MFM = ((C-L)-(H-C))/(H-L);

Value1 = V*C;
Value2 = (V*C)*(H-L);
Value3 = (V*C)/(H-L);

BarColor = 
IIf( (Value1 == LLV(Value1,Period)), LowColor,
IIf( (Value2 == HHV(Value2,Period)), ClimaxColor,
IIf( (Value3 == HHV(Value3,Period)), ChurnColor,
IIf( ((Value2 == HHV(Value2,Period) AND (Value3 == HHV(Value3,Period)))), ClimaxChurnColor,
IIf( (Value3 == LLV(Value3,Period)), LowChurnColor, colorBlueGrey)))));

_SECTION_BEGIN("Volume");
Plot( Volume, _DEFAULT_NAME(), BarColor, ParamStyle( "Style", styleHistogram|styleThick, maskHistogram ), 2 );
_SECTION_END();


_SECTION_BEGIN("AccDist");
Plot( AccDist(), _DEFAULT_NAME(), colorBlue, styleOwnScale|styleThick );
_SECTION_END();