通达信新顶底关系未加密选股指标公式源码

源码正文：

0,COLORWHITE,LINETHICK2{XG51};
20,COLORLImaGENTA{XG51};
50,COLORRED{XG51};
80,COLORYELLOW{XG51};
100,COLORCYAN,LINETHICK2{XG51};
DRAWTEXT(ISLAstBAR,0,'高安全区'),COLORRED{XG51};
DRAWTEXT(ISLASTBAR,20,'安 全 区'),COLORBLUE,DOTLINE{XG51};
DRAWTEXT(ISLASTBAR,80,'风 险 区'),COLORYELLOW,DOTLINE{XG51};
DRAWTEXT(ISLASTBAR,100,'高风险区'),COLORCYAN{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,3,1),COLOR9FA1A1,LINETHICK2{XG51};
D:SMA(K,3,1),COLOR00A13C,LINETHICK2{XG51};
J:3*K-2*D,COLOR0089FF,LINETHICK2{XG51};
J1:="macd.dif"(12,26,9);J2:="MacD.DEA"(12,26,9){XG51};
J3:="kdj.K"(15,6,3);J4:="kdj.D"(15,6,3){XG51};
J5:="rsi.RSI1"(6,12,24);J6:="RSI.RSI2"(6,12,24){XG51};
A1:=BArslAST(REF(crOSS(J1,J2),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(J1,A1+1)<J1 AND CROSS(J1,J2){XG51};
A2:=BARSLAST(REF(CROSS(J3,J4),1)){XG51};
B2:=REF(C,A2+1)>C AND REF(J3,A2+1)<J3{XG51};
A3:=BARSLAST(REF(CROSS(J5,J6),1)){XG51};
B3:=REF(C,A3+1)>C AND REF(J5,A3+1)<J5 AND CROSS(J5,J6){XG51};
C1:=BARSLAST(REF(CROSS(J2,J1),1)){XG51};
D1:=REF(C,C1+1)<C AND REF(J1,C1+1)>J1 AND CROSS(J2,J1){XG51};
C2:=BARSLAST(REF(CROSS(J4,J3),1)){XG51};
D2:=REF(C,C2+1)<C AND REF(J3,C2+1)>J3 AND CROSS(J4,J3){XG51};
C3:=BARSLAST(REF(CROSS(J6,J5),1)){XG51};
D3:=REF(C,C3+1)<C AND REF(J5,C3+1)>J5 AND CROSS(J6,J5){XG51};
MACD底背离:=FILTER(B1>0,5){XG51};
KDJ底背离:=FILTER(B2>0,5){XG51};
DRAWTEXT(KDJ底背离,REF(J1,A1+2),'.K底'),COLORRED{XG51};
RSI底背离:=FILTER(B3>0,5){XG51};
KDJ顶背离:=FILTER(D2>0,5){XG51};
DRAWTEXT(KDJ顶背离,REF(J1,D1+2),'.K顶'),COLOR0000FF{XG51};
A01:=BARSLAST(REF(CROSS(J,K),1)){XG51};
底背:=REF(CLOSE,A01+1)>CLOSE AND J>REF(J,A01+1) AND CROSS(J,K){XG51};
底:DRAWLINE(A01=0,D,底背,D,0),COLORWHITE,POINTDOT{XG51};
DRAWTEXT(底背,D,'底B'),COLORWHITE{XG51};
A02:=BARSLAST(REF(CROSS(K,J),1)){XG51};
顶背:=REF(CLOSE,A02+1)<CLOSE AND REF(J,A02+1)>J AND CROSS(K,J){XG51};
顶:DRAWLINE(A02=0,D,顶背,D,0),COLORCYAN,POINTDOT{XG51};
DRAWTEXT(顶背,D,'顶B'),COLORCYAN{XG51};
AB2:=BARSLAST(REF(CROSS(K,D),1)){XG51};
BB2:=REF(C,AB2+1)>LLV( L,3 ) AND REF(K,AB2+1)<K AND CROSS(K,D) AND K<33{XG51};
DRAWTEXT(BB2,J,'K底背离'),COLORFF00FF{XG51};
BY2:=REF(C,A2+1)>REF(C,A2) AND REF(J3,A2+1)<REF(J3,A2) AND J<11{XG51};
DRAWTEXT(BY2,J,'底'),COLORLIGREEN{XG51};
BY1:=REF(C,A2+1)>REF(C,A2) AND REF(J3,A2+1)<REF(J3,A2) AND J<1{XG51};
DRAWTEXT(BY1,J,'底背离'),COLORYELLOW{XG51};
HY0:=(C/REF(C,1)>=1.099) OR (naMELIKE('S') OR NAMELIKE('*')) AND ((C-REF(C,1))/REF(C,1)*100)>=4.945 AND C=H,COLORFF00FF{XG51};
HY1:=COUNT(HY0,13)>=1{XG51};
HY2:=HY1=1 AND J<15{XG51};
DRAWICON(HY2,J,23){X+G.5_1+C+N+{};

源码正文：

A1:=(C+L+H)/3{XG51};
A2:=ATAN(ema(A1,13)-REF(Ema(A1,13),1))*3.1416*10{XG51};
A3:=EMA(C,8){XG51};
A5:=FILTER(A2>1 AND EMA(A1,13)>REF(EMA(A1,8),1),10){XG51};
A6:=SUM(A5,2){XG51};
A7:=REF(CLOSE,1){XG51};
A8:=((SMA(MAX((CLOSE - A7),0),3,1) / SMA(Abs((CLOSE - A7)),3,1)) * 100){XG51};
A9:=EMA(CLOSE,3){XG51};
A10:=EMA(CLOSE,21){XG51};
A11:=crOSS(A9,A10){XG51};
A12:=SUM(A11,2){XG51};
A13:A6 AND A12{XG51};
FIRE:( A13),stICK,COLOR996633,LINETHICK2{XG51};
DRAWICON(A13,1.4,12),LINETHICK1{XG51};
DRAWICON(A13,0.3,9),LINETHICK1{XG51};
DRAWTEXT(A13,0.8,' FIRE！！！'),COLOR0000FF,LINETHICK3{X*G=5~1*C*N*{};