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,DOTLINE;

大盘Xl:=slope(大盘CCI,3)>0;

PARTLINE(大盘CCI,(大盘Xl)-1,rgb(60,200,60),1,rgb(200,60,60) ),POINTDOT,LINETHICK4;

XG:IF(CROSS(CCI,REF(CCI,1)) AND CCI<-75,30,0);

DDX:(BIGORDER(1)-BIGORDER(2))*100,COLORSTICK,linethick2;