【通达信】MACD KDJ RSI底背离指标

BU:=BARSLAST(CLOSE=HHV(CLOSE,60));

SE:=BARSLAST(CLOSE=LLV(CLOSE,60));

KK1:=SE;

KK2:=BU;

LM1:=SE;

LM2:=BU;

OK:=KK1>KK2 AND LM1>LM2;

OK1:=KK1>KK2 AND LM1<LM2;

NOK:=KK2>KK1 AND LM2>LM1;

NOK1:=KK2>KK1 AND LM2<LM1;

DRAWICON(CROSS(KK1,KK2),OPEN*1,100);

DRAWTEXT(CROSS(KK1,KK2),OPEN*0.985,"抓"),COLOR3CB371;

T:=BARSCOUNT(C);

均价:=DYNAINFO(11);

总量:=SUM(VOL,T);

总额:=SUM(AMOUNT,T);

均价X:=总额/(总量*100);

次数:=COUNT(CLOSE>均价X,T);

占比:=次数/T*100;

分时强势:DRAWICON(CROSS(CLOSE,均价X) AND CLOSE>均价X AND 占比>80 AND T>5,CLOSE*0.99,7);

DRAWTEXT(CROSS(CLOSE,均价X) AND CLOSE>均价X AND 占比>80 AND T>5,CLOSE*0.98,"涨价"),COLORFFFF00;

VAR1:=AMOUNT/VOL/100;

VAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;

VAR3:=SUM(AMOUNT,5)/VAR1/100;

VAR4:=SUM(AMOUNT,13)/VAR1/100;

VAR5:=SUM(AMOUNT,34)/VAR1/100;

CYC5:=DMA(VAR2,VOL/VAR3);

CYC13:=DMA(VAR2,VOL/VAR4);

CYC34:=DMA(VAR2,VOL/VAR5);

CYC∞:=DMA(VAR2,VOL/CAPITAL);

一剑封喉:=CROSS(CLOSE,MA(CLOSE,13)) AND CROSS(CLOSE,MA(CLOSE,34)) AND CROSS(CLOSE,MA(CLOSE,55));

A1:=(CLOSE-LLV(LOW,22))/(HHV(HIGH,22)-LLV(LOW,22))*100;

A2:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;

A:=3*SMA(A1,5,1)-2*SMA(SMA(A2,5,1),3,1);

YNGS:=一剑封喉 AND A<30;

DRAWICON(一剑封喉 AND A<30,LOW*0.985,10);

DRAWTEXT(一剑封喉 AND A<30,LOW*0.98,"停"),COLORFF0000;

{明关键价位}

C1:=REF(C,1);

C2:=HHV(C1,2);

C3:=LLV(C1,1);

ET:=HHV(C1,2);

ET1:=REF(ET,1);

XB:=LLV(C1,1);

XB1:=REF(XB,1);

M:=BARSLAST(C<XB AND C1>=XB1);

M11:=REF(M,1);

N9:=BARSLAST(C>ET AND C1<=ET1);

N1:=REF(N9,1);

M21:=BARSLAST(M-N9>0 AND M11<=N1)+1;

N2:=BARSLAST(N9-M>0 AND N1<=M11)+1;

ET2:=HHV(ET,M21);

XB2:=LLV(XB,N2);

AX:=IF(M-N9>0 AND M11<=N1,1,IF(N9-M>0 AND N1<=M11,0,2));

H1:=IF(M-N9>0,C,ET2);

H2:=IF(AX=1,C,C2);

H3:=IF(M-N9<0,C,XB2);

H4:=IF(AX=1,C,XB2);

H5:=IF(M-N9>0 OR AX=1,C,H3);

明关键价位:REF(H5,100);

MA1:=MA(CLOSE,2);

VAR1X:=MA(C, 1);

VAR2X:=MA(C, 5);

VAR3X:=MA(C, 10);

VAR4X:=MA(C, 20);

VAR5X:=MA(C, 30);

VAR6:=(VAR1X+VAR2X+VAR3X+VAR4X+VAR5X)/5;

VAR7:=(VAR6-REF(VAR6, 15))/REF(VAR6,15)*100;

VAR8:=(VAR6-REF(VAR6, 15))/REF(VAR6, 15)*100;

VAR9:=EMA(VAR7, 8);

平均价:=(H+4*L+C+O)/7;

均价差:= EMA(平均价,13) - EMA(平均价,34);

移动均价:= EMA(均价差,5);

差:=(均价差-移动均价)*5;

AS:=IF(差>=1000 ,1000 ,IF(差<=平均价,平均价,差) );

分水岭:=FORCAST(FORCAST(A,31),100);

涨↑:IF(AS>分水岭,AS,分水岭),LINETHICK2,COLORRED;

跌↓:IF(AS<分水岭,AS,分水岭),LINETHICK2,COLORGREEN;

MA6:=MA(C,6);

MA18:=MA(C,18);

MA55:=MA(C,55);

MA125:=MA(C,125);

MA250:=MA(C,250);

TY:=C;

A1S:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1S,10);

C1S:=REF(B1,10+1); HD:=FILTER(C1S,10);

A2S:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2S,10); C2S:=REF(B2,10+1); LD:=REF(C2S,10);

AA:=REF(C,BARSLAST(HD)); B:=REF(C,BARSLAST(LD));

T11:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;

T21:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

波峰:IF(T11,AA,AA),COLORFF00FF,POINTDOT;

STICKLINE(T11,AA,AA,9,0),COLORFF00FF;

波谷:IF(T21,B,B),COLOR80FF00,POINTDOT;

STICKLINE(T21,B,B,9,0),COLOR80FF00;

买进价:=((C-REF(MA6,1))/6+MA6)*1.004;

买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);

黄点状线:IF(买进条件,H,L),COLORYELLOW,LINETHICK1,POINTDOT;

DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA:=EMA(DIFF,8);

A1Q:=BARSLAST(REF(CROSS(DIFF,DEA),1));

B1Q:=REF(C,A1Q+1)>C AND REF(DIFF,A1Q+1)<DIFF AND CROSS(DIFF,DEA);

DRAWTEXT(IF(B1Q>0,1,0),L-0.1,"MACD底背"),COLORGREEN;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

A2Q:=BARSLAST(REF(CROSS(K,D),1));

B2Q:=REF(C,A2Q+1)>C AND REF(K,A2Q+1)<K AND CROSS(K,D);

DRAWTEXT(IF(B2Q>0,1,0),L-0.25,"KDJ底背"),COLORYELLOW;

LC:=REF(CLOSE,1);

RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;

RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));

B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);

DRAWTEXT(IF(B3>0,1,0),L-0.4,"RSI底背"),COLORCYAN;

C1Q:=BARSLAST(REF(CROSS(DEA,DIFF),1));

D1:=REF(C,C1Q+1)<C AND REF(DIFF,C1Q+1)>DIFF AND CROSS(DEA,DIFF);

DRAWTEXT(IF(D1>0,1,0),H*1.01,"MACD顶背"),COLORWHITE;

C2Q:=BARSLAST(REF(CROSS(D,K),1));

D2:=REF(C,C2Q+1)<C AND REF(K,C2Q+1)>K AND CROSS(D,K);

DRAWTEXT(IF(D2>0,1,0),H+0.15,"KDJ顶背"),COLORWHITE;

C3Q:=BARSLAST(REF(CROSS(RSI2,RSI1),1));

D3:=REF(C,C3Q+1)<C AND REF(RSI1,C3Q+1)>RSI1 AND CROSS(RSI2,RSI1);

DRAWTEXT(IF(D3>0,1,0),H+0.1,"RSI顶背"),COLORMAGENTA;

REF(H,C1Q),COLORB48246,POINTDOT;

KK:=DATE<1341231;

PK:=VOL*(OPEN+CLOSE+HIGH+LOW)/4;

PK1:=IF(VOL>0,PK/VOL,(OPEN+CLOSE+HIGH+LOW)/4);

C11:=PK1;

A01:=(C11-LLV(C11,75))/(HHV(C11,75)-LLV(C11,75));

A11:=SMA(A01,13,1);

A21:=SMA(A11,13,1);

A31:=3*A11-2*A21;

A41:=2*A31-0.5;

ZS:=DYNAINFO(3)*0.95;

选1:=IF(KK,C11*(1-(A41-A21)/40),0);

选2:=CROSS(C11,选1) AND CLOSE/REF(CLOSE,1)<1.03;

DRAWICON(选2,L-0.25,25);