把金昌九老师的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,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,-60,-100); Var12:=(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100; 能量线:SMA(Var12,3,1)*(-1)+100,colorRED,linethick0; KNX:=SMA(Var12,3,1); MK:=MA(KNX,18); XG买:IF(KNX>45 AND CROSS(MK , KNX),-50,-100),COLOR0077ff,LINETHICK1; DRAWRECTABS(3,2 ,170 ,70 , rgb(0,20,20)),color00FF00,LINETHICK1,LAYER2; DRAWTEXTABS(10,5,'('+STKLABEL+') '+ STKNAME+''),Color00FFFF,LINETHICK2; DRAWTEXTABS(5,20,'总股本: '+NUMTOSTRn(FINANCE2(35)/10000,1)+'亿股'),Color0088ff,LINETHICK2; DRAWTEXTABS(5,35,'流通A股: '+NUMTOSTRn(FINANCE2(37)/10000,1)+'亿股'),Color00ff00,LINETHICK2; DRAWTEXTABS(5,50,'市盈率: '+NUMTOSTRn(DYNAINFO(39),1)+'倍'),Color8800ff,LINETHICK2;(

解答：

?{DDI-J}

STICKLINE(50,100,-100,15,0),COLOR650000;