N:=9;
M:=14;
N1:=6;
{RSI-CCI-KD}
{INPUT:N(9,2,100),M(14,1,100),N1(6,2,100)};
TYP := (HIGH + LOW + CLOSE)/3;
CC1:(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF;
C1:=SMA(CC1,3,1);
C2:=SMA(C1,3,1);
C3:=3*C1-2*C2;
CB1:=EMA(C3,5);
CB2:=REF(CB1,1);
STICKLINE(CC1>100,CC1,100,2,0),COLORGREEN;
STICKLINE(CC1<-100,CC1,-100,2,0),COLORRED;
STICKLINE(CC1<>100,100,-100,2,0),COLOR000000;
CC2:(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF;
GG:DRAWTEXT(CURRBARSCOUNT=120,300,''),COLORRED;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
RSI:(RSI1-50)*5.3,LINETHICK2,COLORFFFFFF;
R1:=SMA(RSI,3,1);
D1:=SMA(R1,3,1);
J1:=3*R1-2*D1;
RR1:=EMA(J1,5);
RR2:=REF(RR1,1);
RR:=RR1>RR2;
RSV1:=(CLOSE-LLV(LOW*GG,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,COLORRED;
RSV2:=(CLOSE-LLV(LOW*GG,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,COLORRED;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,COLORRED;
K:=SMA(RSV,3,1);
K1:(K-50)*5,COLORFFFF00;
K2:=SMA(K1,3,1);
D2:=SMA(K2,3,1);
J2:=3*K2-2*D2;
BB1:=EMA(J2,5);
BB2:=REF(BB1,1);
买入:RR AND NOT(REF(RR,1)) AND (RR1<-100 AND BB1<-100) AND CB1<-100,LINETHICK0;
买入1:RR AND NOT(REF(RR,1))*GG AND (RR1<-100 AND BB1<-100) AND CB1<-100,LINETHICK0,COLORRED;
买入2:RR AND NOT(REF(RR,1)) AND (RR1<-100 AND BB1<-100)*GG AND CB1<-100,LINETHICK0,COLORRED;
DRAWICON(买入,-200,4);
卖出:REF(RR,1)=1 AND NOT(RR) AND CB1>100,LINETHICK0;
DRAWICON(卖出,200,5);
爱 查股网 www. aichagu.com