通达信自用集成CCI指标

说明：
1、按照本人对CCI指标的理解，将CCI指标图表化；
2、集成了主力建仓、底部判断指标；
3、集成低买指标；
4、集成时间窗指标；
5、低买及起涨点提示
6、n(1,100,20)，即n的取值为20
N:=20;
ZD1:=BACKSET(ISLASTBAR,150);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=IF((TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14))<-100,-100,(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14))),COLORRED,LINETHICK1;
J1:IF(CCI<-100,-100,MA(CCI,1)),COLORGREEN,LINETHICK1;
IF(J1>=REF(J1,1),J1,DRAWNULL),COLORRED,LINETHICK2;

STICKLINE(CCI>=0 AND CCI>=100,CCI,0,2,0),COLORFF00FF;
STICKLINE(CCI>=0 AND CCI<100,CCI,0,2,0),COLORYELLOW;
STICKLINE(CCI>0 AND REF(CCI,1)<=0 AND CCI<100,CCI,0,2,0),COLORRED;

100,COLORFF00FF,LINETHICK1,DOTLINE;
{CCI起涨点}
J20下行:=BARSLAST(CROSS(MA(C,20),MA(C,5)))>=20;
起涨点:=EVERY(REF(CCI,1)<100,20) AND CROSS(CCI,100) AND J20下行;
STICKLINE(起涨点,CCI,0,2,1),,COLORYELLOW;
DRAWTEXT(起涨点,J1*1.02,'★←起涨'),COLORGREEN;

{时间窗-高点}
AA:=H=HHV(H,N);
高点日期:=IF(ZD1=1,BARSLAST(AA),DRAWNULL),COLORYELLOW;
DRAWTEXT(高点日期=2,-13,'3'),COLORYELLOW;
DRAWTEXT(高点日期=4,-13,'5'),COLORYELLOW;
DRAWTEXT(高点日期=7,-13,'8'),COLORYELLOW;
DRAWTEXT(高点日期=12,-13,'13'),COLORYELLOW;
DRAWTEXT(高点日期=20,-13,'21'),COLORYELLOW;
DRAWTEXT(高点日期=33,-13,'34'),COLORYELLOW;
DRAWTEXT(高点日期=54,-13,'55'),COLORYELLOW;
DRAWTEXT(高点日期=88,-13,'89'),COLORYELLOW;
DRAWTEXT(高点日期=143,-13,'144'),COLORYELLOW;
DRAWTEXT(高点日期=232,-13,'233'),COLORYELLOW;
DRAWTEXT(高点日期=376,-13,'377'),COLORYELLOW;

{主力建仓}
VAR1:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200;
VAR2:=SMA(VAR1,3,1);
VAR3:=SMA(VAR2,3,1);
VAR4:=3*VAR2-2*VAR3;
VAR5:=LLV(LOW,5);
VAR6:=HHV(HIGH,5);
VAR7:=EMA((CLOSE-VAR5)/(VAR6-VAR5)*100,4)*2;
VAR8:=EMA(0.667*REF(VAR7,1)+0.333*VAR7,2);
VAR9:=3*VAR7-2*VAR8;
VARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VARB:=POW(MA(LOW,5),2)+MA(LOW,5);
VARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VARD:=(VARA-LLV(VARB,64))/(HHV(VARC,64)-LLV(VARB,64))*150+65-10;
VARE:=SMA(VARD,3,1)*1.5-100;
VARF:=SMA(VARE,3,1);
VAR10:=3*VARE-2*VARF;
VAR11:=(HIGH+LOW+CLOSE*2)/4;
VAR12:=EMA(VAR11,13);
VAR13:=STD(VAR11,13);
VAR14:=(VAR11-VAR12)*100/VAR13;
VAR15:=EMA(VAR14,5);
VAR16:=EMA(VAR15,13);
VAR17:=EMA(VAR15,13)+200-100;
VAR18:=EMA(VAR17,10);
VAR19:=3*VAR17-2*VAR18;
VAR1A:=VAR2+VAR7+VARE+VAR17;
VAR1B:=VAR3+VAR8+VARF+VAR18;
VAR1C:=VAR4+VAR9+VAR10+VAR19;
VAR1D:=(HIGH+LOW+CLOSE)/3;
VAR1E:=AMOUNT/VOL/100;
VAR1F:=SUM(AMOUNT,5)/SUM(VOL,5)/100;
VAR20:=(VAR1D-MA(VAR1D,34))/(0.015*AVEDEV(VAR1D,34));
VAR21:=DMA(AMOUNT/VOL/100,VOL);
VAR22:=(HIGH+LOW+CLOSE+VAR1D)/4;
VAR23:=EMA(VAR22,24);
VAR24:=STD(VAR22,24);
VAR25:=(VAR22-VAR23)/VAR24*100;
VAR26:=(VAR1D-MA(VAR1D,24))/(0.015*AVEDEV(VAR1D,24));
VAR27:=EMA(VAR25,5);
VAR28:=(VAR1E-MA(VAR1E,21))/(0.015*AVEDEV(VAR1E,21));
VAR29:=(VAR1F-MA(VAR1F,90))/(0.015*AVEDEV(VAR1F,9