通达信自然日和交易日的玄机主图未加密选股指标公式源码

通达信自然日和交易日的玄机主图未加密选股指标公式源码

源码正文：

N:=1131204{XG51};
TJ0:=DATE=N{XG51};
TJ0T:=BArslAst(TJ0){XG51};
SJ:=MOD(TJ0T,4){XG51};
SJT:=BARSLAST(SJ){XG51};
TJ0A:=IF(SJT=1,DATE,0){XG51};
TJ01:=DATETODAY(N){XG51};
TJ02:=DATETODAY(TJ0A)-TJ01{XG51};
A1:=BARSCOUNT(C){XG51};
A2:=CONST(REF(N,A1)){XG51};
A3:=DATETODAY(A2){XG51};
A4:=DATETODAY(DATE){XG51};
TJT:=BARSLAST(DATE=N){XG51};
A2T:=BacKSET(DATE=N,BARSCOUNT(C)){XG51};
ZL:=A3-A4{XG51};
ZT:=A2T*BARSCOUNT(C)-1{XG51};
ZTT:=CONST(REF(A1,TJT))-A1-CONST(ZT)-1{XG51};
TJA:=MOD(ZTT,4){XG51};
TJAT:=BARSLAST(TJA){XG51};
DRAWNUMBER(SJT=1,L,TJ02)COLORBLUE{XG51};
DRAWNUMBER(SJT=1,H*1.02,TJ0T){XG51};
DRAWNUMBER(ZTT>0 AND TJAT=1,H*1.02,ZTT){XG51};
DRAWNUMBER(ZTT>0 AND TJAT=1,L,ZL)COLORBLUE{X~G_5-1~C~N~{};

通达信特色kdJ及未加密选股指标公式源码

源码正文：

N:=9{XG51};
M1:=3{XG51};
M2:=3{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,LINETHICK2{XG51};
K:SMA(RSV,M1,1),LINETHICK1{XG51};
D:Sma(K,M2,1),LINETHICK1{XG51};
J:3*K-2*D,COLORFF00FF,LINETHICK1;
IF(J<0,J,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(K>90,K,DRAWNULL),COLOR0000FF,LINETHICK2{XG51};
IF(D>85,D,DRAWNULL),COLORFFFF11,LINETHICK2{XG51};
DRAWICON(crOSS(J,1),J,1){XG51};
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,2){X.G?5_1.C.N.{};