要给CCI派上更好用场就需要加工(副图.源码.附图)

{DDI-J}
INPUT:N(18,2,100);
DRAWGBKlast(DATE>900101,strip(RGB(0,0,160),RGB(0,0,40),0));100,DOTLINE;-100,DOTLINE;
TYP := (OPEN+HIGH + LOW + 2*CLOSE)/5;
CCI:EMA(EMA(EMA((TYP-WMA(TYP,N))/(0.015*AVEDEV(TYP,N)),4),6),8),colorFF9900;
Xl:=slope(CCI,3)>0;
PARTLINE(CCI,Xl,rgb(255,0,0)),LINETHICK3,LAYER2;
FILLRGN(CCI,100,CCI>100,RGB(80,0,80)),LAYER4;
FILLRGN(CCI,-100,CCI<-100,RGB(60,150,0)),LAYER4;

{大盘CCI}
TYPD := (INDEXO+INDEXH + INDEXL + 2*INDEXC)/5;
大盘CCI:EMA(EMA(EMA((TYPD-WMA(TYPD,N))/(0.015*AVEDEV(TYPD,N)),4),6),8),color00FFFF,D