通达信CCI优化未加密选股指标公式源码

通达信CCI优化未加密选股指标公式源码

源码正文：

stICKLINE(C,320,-320,5,0),COLOR80A16F{XG51};
M:=14;Q:=6;N:=20{XG51};
MM:=IF(PERIOD=1,M,IF(PERIOD=2,M,IF(PERIOD=3,M,IF(PERIOD=4,M,IF(PERIOD=5,M,IF(PERIOD=6,Q,IF(PERIOD=7,Q,IF(PERIOD=8,Q,0)))))))){XG51};
AVG:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(AVG-ma(AVG,MM))/(0.015*AVEDEV(AVG,MM)){XG51};
dif:CCI-REF(CCI,1),LINETHICK0,COLOR00FF00{XG51};
前差值:Abs(REF(CCI,1)-REF(CCI,2)),NODRAW{XG51};
差值20:IF(DIF>15 AND DIF<120,DIF,0),NODRAW,COLOR0000FF{XG51};
PI:=ATAN(1)*4{XG51};
PERIODS:=30{XG51};
HIGHHIGH:=HHV(HIGH,PERIODS){XG51};
LOWLOW:=LLV(LOW,PERIODS){XG51};
RANGEV:=25/(HIGHHIGH-LOWLOW)*LOWLOW{XG51};
ema34:=EMA(CLOSE,34){XG51};
X1_EMA34:=0{XG51};
X2_EMA34:=1{XG51};
Y1_EMA34:=0{XG51};
Y2_EMA34:=(REF(EMA34,1)-EMA34)/AVG*RANGEV{XG51};
C_EMA34:=SQRT((X2_EMA34-X1_EMA34)*(X2_EMA34-X1_EMA34)+(Y2_EMA34-Y1_EMA34)*(Y2_EMA34-Y1_EMA34)){XG51};
ANGLE_EMA34V:=ROUND(ABS(180*acOS((X2_EMA34-X1_EMA34)/C_EMA34)/PI)){XG51};
ANGLE_EMA34:=IF(Y2_EMA34>0,-ANGLE_EMA34V,ANGLE_EMA34V){XG51};
LSMA25:=FORCAST(CLOSE,25){XG51};
X1_LSMA25:=0{XG51};
X2_LSMA25:=1{XG51};
Y1_LSMA25:=0{XG51};
Y2_LSMA25:=(REF(LSMA25,1)-LSMA25)/AVG*RANGEV{XG51};
C_LSMA25:=SQRT((X2_LSMA25-X1_LSMA25)*(X2_LSMA25-X1_LSMA25)+(Y2_LSMA25-Y1_LSMA25)*(Y2_LSMA25-Y1_LSMA25)){XG51};
ANGLE_LSMA25V:=ROUND(ABS(180*ACOS((X2_LSMA25-X1_LSMA25)/C_LSMA25)/PI)){XG51};
ANGLE_LSMA25:=IF(Y2_LSMA25>0,-ANGLE_LSMA25V,ANGLE_LSMA25V){XG51};
ARRAY:=CCI{XG51};
HIGHBARS:=BArslAST(NOT(ARRAY>0)){XG51};
LOWBARS:=BARSLAST(NOT(ARRAY<0)){XG51};
UPCONDITION:=BARSLAST(HIGHBARS>=6 AND SUM(ARRAY>100,5)>0){XG51};
DNCONDITION:=BARSLAST(LOWBARS>=6 AND SUM(ARRAY<-100,5)>0){XG51};
UPTREND:=ARRAY>0 AND UPCONDITION<DNCONDITION{XG51};
DNTREND:=ARRAY<0 AND UPCONDITION>DNCONDITION{XG51};
TRTREND:=HIGHBARS>=5 AND NOT(UPTREND) OR LOWBARS>=5 AND NOT(DNTREND){XG51};
STICKLINE(UPTREND,0,CCI,1,0),COLORFF0000{XG51};
STICKLINE(DNTREND,0,CCI,1,0),COLOR0000FF{XG51};
STICKLINE(TRTREND,0,CCI,1,0),COLOR00FFFF{XG51};
STICKLINE(NOT(UPTREND OR DNTREND OR TRTREND),0,CCI,1,0),COLOR808080{XG51};
WCCI:CCI,LINETHICK2,COLORLIGRAY{XG51};
TCCI:(AVG-MA(AVG,N))/(0.015*AVEDEV(AVG,N)),COLOR7A56B7,LINETHICK1{XG51};
STICKLINE(ANGLE_EMA34>=5,-301,-321,2,0),COLORD0E040{XG51};
STICKLINE(ANGLE_EMA34<5 AND ANGLE_EMA34>=3.57,-301,-321,2,0),COLOR006400{XG51};
STICKLINE(ANGLE_EMA34<3.57 AND ANGLE_EMA34>=2.14,-301,-321,2,0),COLOR98FB98{XG51};
STICKLINE(ANGLE_EMA34<2.14 AND ANGLE_EMA34>=0.71,-301,-321,2,0),COLOR00FF00{XG51};
STICKLINE(ANGLE_EMA34<0.71 AND ANGLE_EMA34>-0.71,-301,-321,2,0),COLOR00FFFF{XG51};
STICKLINE(ANGLE_EMA34<=-0.71 AND ANGLE_EMA34>-2.14,-301,-321,2,0),COLORE0FFFF{XG51};
STICKLINE(ANGLE_EMA34<=-2.14 AND ANGLE_EMA34>-3.57,-301,-321,2,0),COLOR00A5FF{XG51};
STICKLINE(ANGLE_EMA34<=-3.57 AND ANGLE_EMA34>-5,-301,-321,2,0),COLOR0000FF{XG51};
STICKLINE(ANGLE_EMA34<=-5,-301,-321,2,0),COLOR00008B{XG51};
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)){XG51};
STICKLINE(ABS(SW)=2,301,321,2,0),COLOR00FF00{XG51};
STICKLINE(ABS(SW)=1,301,321,2,0),COLOR00FFFF{XG51};
STICKLINE(ABS(SW)=0,301,321,2,0),COLOR0000FF{XG51};
IF(CLOSE>LSMA25,0,DRAWNULL),LINETHICK3,COLOR00FF00{XG51};
IF(CLOSE<LSMA25,0,DRAWNULL),LINETHICK3,COLOR0000FF{XG51};
IF(CLOSE=LSMA25,0,DRAWNULL),LINETHICK3,COLOR00FFFF{XG51};
DRAWICON(ABS(CCI)>=200,CCI,12){XG51};
STICKLINE(C,200,200,1.5,0),COLORFFFF00{XG51};
STICKLINE(C,-200,-200,1.5,0),COLORFFFF00{XG51};
STICKLINE(C,100,100,1.5,0),COLORFFFF00{XG51};
STICKLINE(C,-100,-100,1.5,0),COLORFFFF00{X*G_5*1*C*N*{};

通达信K线回顾主图未加密选股指标公式源码

源码正文：

N:=2{XG51};
OK:=ema(O,60){XG51};
CG:=Ema(C,60){XG51};
PDU:=IF(OK>REF(OK,1) AND CG>REF(CG,1),1,0){XG51};
Z1:=MA(C,13){XG51};
ZX:=REF(Z1,13/2+1){XG51};
LIFE:=(EMA(C,60)+EMA(C,90))/2{XG51};
VAR1:=(2*C+H+L)/4{XG51};
SNOOK:=EMA(VAR1,99)*0.91{XG51};
A1:=(C-REF(C,1))/REF(C,1)*100{XG51};
MA5:=BArslAst(A1>3){XG51};
MA20:=IF(MA5>0,1,0){XG51};
STICKLINE(C>ZX AND C>=LIFE,O,C,3,0),COLOR0000FF{XG51};
STICKLINE(C>ZX AND C<=SNOOK,O,C,3,0),COLOR00FF00{XG51};
STICKLINE(C>ZX AND C>SNOOK AND C<LIFE,O,C,3,0),COLORFF0000{XG51};
STICKLINE(C>ZX AND MA20=0,O,C,3,0),COLOR00FFFF{XG51};
STICKLINE(C>ZX,O,C,1,0),COLORFFFFFF{XG51};
DRAWICON(crOSS(C,ZX),L*0.99,1){XG51};
DRAWICON(CROSS(ZX,C),H*1.01,5){XG51};
BY20:=MA(C,5){XG51};
招财猫:=MA(C,20),LINETHICK2,COLOR00FFFF{XG51};
鼠变异:=IF(BY20>招财猫,招财猫,BY20),LINETHICK2,COLOR808080{XG51};
选股:=CROSS(C,ZX) AND C>ZX AND MA20=0 ,LINETHICK0{XG51};
RB:=BARSCOUNT(C)=ISLASTBAR{XG51};
RD:=BARSLAST(RB){XG51};
K2:=HHV(H,50){XG51};
K1:=LLV(L,50){XG51};
T1:=C>ZX AND C>=LIFE{XG51};
T2:=C>ZX AND C>SNOOK AND C<LIFE{XG51};
T3:=C>ZX AND C<=SNOOK{XG51};
T4:=C<=ZX{XG51};
T5:=鼠变异>REF(鼠变异,1) AND 鼠变异!=招财猫 {XG51};
T6:=鼠变异>REF(鼠变异,1) AND 鼠变异=招财猫 AND PDU!=1{XG51};
T7:=鼠变异>REF(鼠变异,1) AND 鼠变异=招财猫 AND PDU=1{XG51};
T8:=C>ZX AND MA20=0 {XG51};
EEE:=T1+T2+T3+T4+T5+T6+T7+T8 {XG51};
E:=(K2-K1)/(EEE+8) {XG51};
DRAWTEXT(C>0 AND T1>0 AND ISLASTBAR,K2-E,'出洞了逮住它！'),COLOR0000FF{XG51};
DRAWTEXT(C>0 AND T2>0 AND ISLASTBAR,K2-E,'鼠玩猫守着它！，'),COLORFF7700{XG51};
DRAWTEXT(C>0 AND T3>0 AND ISLASTBAR,K2-E,'露尾巴动作快！，'),COLOR00FF00{XG51};
DRAWTEXT(C>0 AND T4>0 AND ISLASTBAR,K2-E,'没有了打个盹！，'),COLOR808080{XG51};
DRAWTEXT(C>0 AND T5>0 AND ISLASTBAR,K2-E*2,'发现鼠迹！'),COLOR00FF00{XG51};
DRAWTEXT(C>0 AND T6>0 AND ISLASTBAR,K2-E*2,'瞬间鼠影！'),COLORFF66FF{XG51};
DRAWTEXT(C>0 AND T7>0 AND ISLASTBAR,K2-E*2,'恶鼠难遁！'),COLOR0000FF{XG51};
开:REF(OPEN,N-1)NODRAW{XG51};
收:REF(CLOSE,N-1)NODRAW,COLORBLUE{XG51};
高:REF(HIGH,N-1)NODRAW,COLORRED{XG51};
低:REF(LOW,N-1)NODRAW,COLORBLUE{XG51};
DRAWKLINE(高,开,低,收){X~G-5-1~C~N~{};