Advanced Multi-level CCI for Amibroker (AFL)

Advanced Multi-level CCI for Amibroker (AFL)

_SECTION_BEGIN("Multilevel CCI");
SetChartOptions(0,0,chartGrid100|chartGridDiv100);
Period = Param("CCI Period",14,1,100,1);
CCILineColor = ParamColor("CCI Line Color",colorDarkGreen);
CCIOverboughtColor = ParamColor("CCI Overbought Color", colordarkGreen);
CCIOversoldColor = ParamColor("CCI Oversold Color", colorBrown);
CCIAboveZeroColor = ParamColor("CCI Above Zero Color", colorBrightGreen);
CCIBelowZeroColor = ParamColor("CCI Below Zero Color", colorRed);
 
z = CCI(Period);
Plot(z,"CCI",IIf(z<-100,CCIOversoldColor,IIf(z>100,CCIOverboughtColor,CCILineColor)),styleNoLabel);
 
Plot(200,"200",CCILineColor,styleNoTitle|styleNoLabel);
Plot(100,"100",CCILineColor,styleNoTitle|styleNoLabel);
Plot(0,"0",CCILineColor,styleNoTitle|styleNoLabel);
Plot(-100,"-100",CCILineColor,styleNoTitle|styleNoLabel);
Plot(-200,"-200",CCILineColor,styleNoTitle|styleNoLabel);
 
PlotOHLC(z,z,45,z,"",IIf(z>45,CCIOverboughtColor,CCIOversoldcolor),styleCloud|styleClipMinMax|styleNoLabel,-100,100);
PlotOHLC(z,z,0,z,"",IIf(z>=0,CCIAboveZeroColor,CCIBelowZeroColor),styleCloud|styleNoLabel);
_SECTION_END();