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,90));
 VAR2A:=((VAR29+VAR28+VAR27+VAR26+VAR20)/5+165)/4;
 VAR2B:=(EMA(EMA(EMA(VAR2A,15),10),5)-25)*2+VAR21;
 VAR2C:=(VAR1A+VAR1B+VAR1C*30)/32/5-15;
 VAR2E:=(VAR2A+VAR2C)/2/1.1;
 (VAR2E<5 AND VAR2E>REF(VAR2E,1) AND REF(VAR2E,1)<0)*100,VOLSTICK;

VAR31:=(CLOSE-LLV(LOW,3