同花顺WDCCI源码附图 EA

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

r

CCI:=(AVG-MA(AVG,14))/(0.015*AVEDEV(AVG,14));

r

DIF:CCI-REF(CCI,1),COLORFF00FF;

r

前差值:ABS(REF(CCI,1)-REF(CCI,2));

r

差值20:IF(DIF>15 AND DIF<120,DIF,0);

r

200,colorred;

r

-200,colorgreen;

r

100,COLOR0055FF;

r

-100,colorcyan ;

r

PI:=ATAN(1)*4;

r

RANGEV:=25/(HHV(HIGH,30)-LLV(LOW,30))*LLV(LOW,30);

r

EMA34:=EMA(CLOSE,34);

r

Y2_EMA34:=(REF(EMA34,1)-EMA34)/AVG*RANGEV;

r

C_EMA34:=SQRT((1)*(1)+(Y2_EMA34)*(Y2_EMA34));

r

ANGLE_EMA34V:=ROUND(ABS(180*ACOS((1)/C_EMA34)/PI));

r

ANGLE_EMA34:=IF(Y2_EMA34>0,-ANGLE_EMA34V,ANGLE_EMA34V);

r

LSMA25:=FORCAST(CLOSE,25);

r

Y2_LSMA25:=(REF(LSMA25,1)-LSMA25)/AVG*RANGEV;

r

C_LSMA25:=SQRT(1+(Y2_LSMA25)*(Y2_LSMA25));

r

ANGLE_LSMA25V:=ROUND(ABS(180*ACOS((1)/C_LSMA25)/PI));

r

ANGLE_LSMA25:=IF(Y2_LSMA25>0,-ANGLE_LSMA25V,ANGLE_LSMA25V);

r

HIGHBARS:=BARSLAST(NOT(CCI>0));

r

LOWBARS:=BARSLAST(NOT(CCI<0));

r

UPCONDITION:=BARSLAST(HIGHBARS>=6 AND SUM(CCI>100,5)>0);

r

DNCONDITION:=BARSLAST(LOWBARS>=6 AND SUM(CCI<-100,5)>0);

r

UPTREND:=CCI>0 AND UPCONDITION<DNCONDITION;

r

DNTREND:=CCI<0 AND UPCONDITION>DNCONDITION;

r

TRTREND:=HIGHBARS>=5 AND NOT(UPTREND) OR LOWBARS>=5 AND NOT(DNTREND);

r

STICKLINE(UPTREND,0,CCI,3,0),COLOR0055FF;

r

STICKLINE(DNTREND,0,CCI,3,0),colorblue;

r

STICKLINE(TRTREND,0,CCI,3,0),COLORFF0099;

r

STICKLINE(NOT(UPTREND OR DNTREND OR TRTREND),0,CCI,3,0),COLOR808080;

r

WCCI:CCI;

r

TCCI:(AVG-MA(AVG,5))/(0.015*AVEDEV(AVG,5));

r

STICKLINE(ANGLE_EMA34>=5,-301,-321,8,0),coloryellow;

r

STICKLINE(ANGLE_EMA34<5 AND ANGLE_EMA34>=3.57,-301,-321,8,0),coloryellow;

r

STICKLINE(ANGLE_EMA34<3.57 AND ANGLE_EMA34>=2.14,-301,-321,8,0),COLOR98FB98;

r

STICKLINE(ANGLE_EMA34<2.14 AND ANGLE_EMA34>=0.71,-301,-321,8,0),colorgreen;

r

STICKLINE(ANGLE_EMA34<0.71 AND ANGLE_EMA34>-0.71,-301,-321,8,0),colorgreen;

r

STICKLINE(ANGLE_EMA34<=-0.71 AND ANGLE_EMA34>-2.14,-301,-321,8,0),colorgreen;

r

STICKLINE(ANGLE_EMA34<=-2.14 AND ANGLE_EMA34>-3.57,-301,-321,8,0),colorgreen;

r

STICKLINE(ANGLE_EMA34<=-3.57 AND ANGLE_EMA34>-5,-301,-321,8,0),colorgreen;

r

STICKLINE(ANGLE_EMA34<=-5,-301,-321,8,0),colorgreen;

r

SW:=IF(ABS(ANGLE_EMA34)>=15 AND ABS(ANGLE_EMA34+ANGLE_LSMA25)>=50,IF(ANGLE_LSMA25>0,2,-2),IF(ABS(ANGLE_EMA34)>=0 AND (ANGLE_EMA34>=0 AND ANGLE_LSMA25>=0 OR ANGLE_EMA34<=0 AND ANGLE_LSMA25<=0) AND ABS(ANGLE_EMA34+ANGLE_LSMA25)>=5,IF(ANGLE_LSMA25>0,1,-1),0));

r

STICKLINE(ABS(SW)=2,301,321,8,0),colorred;

r

STICKLINE(ABS(SW)=1,301,321,8,0),COLOR00FFFF;

r

STICKLINE(ABS(SW)=0,301,321,8,0),colorgreen;
r