通达信TD九转未加密选股指标公式源码

源码正文：

A1:=C>=REF(C,4){XG51};
A:=C<REF(C,4){XG51};
AA:=C<REF(C,4) AND REF(A1,1){XG51};
T:=BArslAst(AA)NODRAW{XG51};
M:=(T=0 AND REFX(T=1 AND NOT(A),1)) OR (REFX(T=2 AND NOT(A),2)) OR (REFX(T=3 AND NOT(A),3)) OR (REFX(T=4 AND NOT(A),4)) OR (REFX(T=5 AND NOT(A),5))
OR (REFX(T=6 AND NOT(A),6)) OR (REFX(T=7 AND NOT(A),7)) OR (REFX(T=8 AND NOT(A),8)){XG51};
M1:=T=1 AND REFX(T=2 AND NOT(A),1) OR (REFX(T=3 AND NOT(A),2)) OR (REFX(T=4 AND NOT(A),3)) OR (REFX(T=5 AND NOT(A),4)) OR (REFX(T=6 AND NOT(A),5))
OR (REFX(T=7 AND NOT(A),6)) OR (REFX(T=8 AND NOT(A),7)){XG51};
M2:=T=2 AND REFX(T=3 AND NOT(A),1) OR (REFX(T=4 AND NOT(A),2)) OR (REFX(T=5 AND NOT(A),3)) OR (REFX(T=6 AND NOT(A),4)) OR (REFX(T=7 AND NOT(A),5)) OR (REFX(T=8 AND NOT(A),6)){XG51};
M3:=T=3 AND REFX(T=4 AND NOT(A),1)OR (REFX(T=5 AND NOT(A),2)) OR (REFX(T=6 AND NOT(A),3)) OR (REFX(T=7 AND NOT(A),4)) OR (REFX(T=8 AND NOT(A),5)){XG51};
M4:=T=4 AND REFX(T=5 AND NOT(A),1) OR (REFX(T=6 AND NOT(A),2)) OR (REFX(T=7 AND NOT(A),3)) OR (REFX(T=8 AND NOT(A),4)){XG51};
M5:=T=5 AND REFX(T=6 AND NOT(A),1) OR (REFX(T=7 AND NOT(A),2)) OR (REFX(T=8 AND NOT(A),3)){XG51};
M6:=T=6 AND REFX(T=7 AND NOT(A),1) OR (REFX(T=8 AND NOT(A),2)){XG51};
M7:=T=7 AND REFX(T=8 AND NOT(A),1){XG51};
N:=T=1 AND REF(T=0 AND AA,1) AND A{XG51};
N1:=T=2 AND REF(N,1) AND A{XG51};
N2:=T=3 AND REF(N1,1) AND A{XG51};
N3:=T=4 AND REF(N2,1) AND A{XG51};
N4:=T=5 AND REF(N3,1) AND A{XG51};
N5:=T=6 AND REF(N4,1) AND A{XG51};
N6:=T=7 AND REF(N5,1) AND A{XG51};
N7:=T=8 AND REF(N6,1) AND A{XG51};
DI:IF(N7,1,0),LINETHICK3,COLORWHITE{XG51};
B1:=C<=REF(C,4){XG51};
B:=C>REF(C,4){XG51};
BB:=C>REF(C,4) AND REF(B1,1){XG51};
T1:=BARSLAST(BB)NODRAW{XG51};
M111:=(T1=0 AND REFX(T1=1 AND NOT(B),1)) OR (REFX(T1=2 AND NOT(B),2)) OR (REFX(T1=3 AND NOT(B),3)) OR (REFX(T1=4 AND NOT(B),4)) OR (REFX(T1=5 AND NOT(B),5))
OR (REFX(T1=6 AND NOT(B),6)) OR (REFX(T1=7 AND NOT(B),7)) OR (REFX(T1=8 AND NOT(B),8)){XG51};
M11:=T1=1 AND REFX(T1=2 AND NOT(B),1) OR (REFX(T1=3 AND NOT(B),2)) OR (REFX(T1=4 AND NOT(B),3)) OR (REFX(T1=5 AND NOT(B),4)) OR (REFX(T1=6 AND NOT(B),5))
OR (REFX(T1=7 AND NOT(B),6)) OR (REFX(T1=8 AND NOT(B),7)){XG51};
M22:=T1=2 AND REFX(T1=3 AND NOT(B),1) OR (REFX(T1=4 AND NOT(B),2)) OR (REFX(T1=5 AND NOT(B),3)) OR (REFX(T1=6 AND NOT(B),4)) OR (REFX(T1=7 AND NOT(B),5)) OR (REFX(T1=8 AND NOT(B),6)){XG51};
M33:=T1=3 AND REFX(T1=4 AND NOT(B),1)OR (REFX(T1=5 AND NOT(B),2)) OR (REFX(T1=6 AND NOT(B),3)) OR (REFX(T1=7 AND NOT(B),4)) OR (REFX(T1=8 AND NOT(B),5)){XG51};
M44:=T1=4 AND REFX(T1=5 AND NOT(B),1) OR (REFX(T1=6 AND NOT(B),2)) OR (REFX(T1=7 AND NOT(B),7)) OR (REFX(T1=8 AND NOT(B),4)){XG51};
M55:=T1=5 AND REFX(T1=6 AND NOT(B),1) OR (REFX(T1=7 AND NOT(B),2)) OR (REFX(T1=8 AND NOT(B),3)){XG51};
M66:=T1=6 AND REFX(T1=7 AND NOT(B),1) OR (REFX(T1=8 AND NOT(B),2)){XG51};
M77:=T1=7 AND REFX(T1=8 AND NOT(B),1){XG51};
N111:=T1=1 AND REF(T1=0 AND BB,1) AND B{XG51};
N11:=T1=2 AND REF(N111,1) AND B{XG51};
N22:=T1=3 AND REF(N11,1) AND B{XG51};
N33:=T1=4 AND REF(N22,1) AND B{XG51};
N44:=T1=5 AND REF(N33,1) AND B{XG51};
N55:=T1=6 AND REF(N44,1) AND B{XG51};
N66:=T1=7 AND REF(N55,1) AND B{XG51};
N77:=T1=8 AND REF(N66,1) AND B{XG51};
Gao:IF(N77,1,0){X_G-5~1_C_N_{};

源码正文：

N:=3{XG51};
VAR1:=ma(HHV(HIGH,485),17){XG51};
VAR2:=MA(HHV(HIGH,222),17){XG51};
VAR3:=MA(HHV(HIGH,96),17){XG51};
VAR4:=MA(LLV(LOW,485),17){XG51};
VAR5:=MA(LLV(LOW,222),17){XG51};
VAR6:=MA(LLV(LOW,96),17){XG51};
VAR7:=MA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6,17){XG51};
VAR8:=MA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,17){XG51};
VAR9:=MA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,17){XG51};
VARA:=MA((VAR7*3+VAR8*2+VAR9)/6*1.738,17){XG51};
VARB:=IF(DATE<=1050531,VARA,VARA*DAY){XG51};
VARC:=LOW{XG51};
VARD:=REF(LOW,1){XG51};
VARE:=SMA(Abs(VARC-VARD),3,1)/SMA(MAX(VARC-VARD,0),N,1)*100{XG51};
VARF:=MA(IF(CLOSE*1.35<=VARB,VARE*10,VARE/10),N){XG51};
VAR10:=LLV(LOW,30){XG51};
VAR11:=HHV(VARF,30){XG51};
VAR12:=1990831{XG51};
绝佳买点:=IF(DATE<=VAR12,MA(IF(LOW<=VAR10,(VARF+VAR11*2)/2,0),N),100000000){XG51};
I:=IF(CLOSE<REF(CLOSE,1),vol/CAPITAL*10053,0){XG51};
骤雨初晴:= ABS(ema(I,13.3)-18)/WINNER(CLOSE)*IF((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)<-0.04,1,0){XG51};
短线买:IF(绝佳买点>500 AND 绝佳买点>2500,1,0),COLORBLUE,LINETHICK1{XG51};
中线买:IF(绝佳买点>10000 AND 绝佳买点>20000,2,0),COLORFF00FF,LINETHICK2{XG51};
倾家荡产买:IF(绝佳买点>30000 AND 绝佳买点>30000,3,0),COLORWHITE,LINETHICK3{X_G~5-1_C_N_{};