自用双CCI指示

 

{ 自用双CCI}

STICKLINE(C,250,250,8,0.5),LINETHICK2,COLOR008000;

STICKLINE(C,200,200,2,0.5),LINETHICK2,COLOR008000;

STICKLINE(C,-150,-150,2,0.5),LINETHICK2,COLOR008000;

STICKLINE(C,-200,-200,8,0.5),LINETHICK2,COLOR008000;

STICKLINE(C,-100,-100,8,0),LINETHICK2,COLOR008000;

STICKLINE(C,100,100,8,0),LINETHICK2,COLOR008000;

STICKLINE(C,0,0,8,8),LINETHICK2,COLOR008000;

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),COLOR00A600,LINETHICK0;

明日均线:REF(C,2)*2-REF(C,5),LINETHICK0,COLOR550055,NODRAW;

今日保护价:(REF(C,1)+REF(C,2)+O)/3,COLORC87800,NODRAW;

MACD2:=CCI;

STICKLINE((MACD2>=0),0,MACD2,1.5,1),COLOR0000AA;

STICKLINE(((MACD2>=0) AND (MACD2 < REF(MACD2,1))),0,MACD2,1.5,1),COLOR00AAFF;

STICKLINE((MACD2<0),0,MACD2,1.5,1),COLORFF7700;

STICKLINE(((MACD2<0) AND (MACD2 > REF(MACD2,1))),0,MACD2,1.5,1),COLORAA00BB;

 

CCI84:(TYP-MA(TYP,89))/(0.015*AVEDEV(TYP,89)),{COLOR00A600}COLORGREEN,LINETHICK1;

VAR3:=CCI84; 

IF(VAR3>=REF(VAR3,1) AND VAR3>=0,VAR3,DRAWNULL),COLORRED,LINETHICK4,POINTDOT;

IF(VAR3<REF(VAR3,1),VAR3,DRAWNULL),COLORYELLOW,LINETHICK4,POINTDOT;

IF(VAR3>=REF(VAR3,1) AND VAR3<0,VAR3,DRAWNULL),COLORGREEN,LINETHICK4,POINTDOT;