Colored ADX histogram Bars

Colored ADX histogram Bars

//Coded by Rajandran R - Founder Marketcalls
//www.marketcalls.in - July 2019
//Email ID : rajandran@marketcalls.in

_SECTION_BEGIN("Colored ADX histogram Bars");

Plot(20,"",colorBlue, styleDashed | styleThick | styleNoLabel);
range = Param("Periods", 10, 2, 200, 1 );
iadx = HMA(ADX(range),10);
inc = iadx > Ref(iadx,-1);
dec = iadx < Ref(iadx,-1);
SetChartBkColor(ColorBlend(colorGrey40,colorBlack));

color = IIf(inc AND iadx >40, colorBlue, IIf(inc AND iadx > 30, colorGreen, IIf(inc AND iadx > 20,colorbrightGreen, IIf(inc, colorPaleGreen,
		 IIf(dec AND iadx >40, colorBrown, IIf(dec AND iadx > 30 , colorDarkRed, IIf(dec AND iadx > 20 , colorRed, IIf(dec, colorLightOrange,colorGrey40))))))));

Plot( iadx, _DEFAULT_NAME(), color, styleHistogram | styleThick ) ;

_SECTION_END();