通达信风险控制未加密选股指标公式源码

源码正文：

N:=3{XG51};
HS300:="399300$C"{XG51};
HS3H:="399300$H"{XG51};
HS3L:="399300$L"{XG51};
HS3O:="399300$O"{XG51};
HSJJ:=(2*HS300+HS3H+HS3L+HS3O)/5{XG51};
趋势:=zig(HS300,3){XG51};
G:=BArslAst(趋势<REF(趋势,1))-BARSLAST(趋势>REF(趋势,1)){XG51};
A:=ema(HS300,12){XG51};
B:=Ema(HS300,50){XG51};
C0:=(HS3H+HS3L)/2{XG51};
A0:=(HS300-LLV(HS3L,N))/(HHV(HS3H,N)-LLV(HS3L,N)){XG51};
A1:=SMA(A0,2,1){XG51};
A2:=SMA(A1,2,1){XG51};
A3:=3*A1-2*A2 {XG51};
A4:=2*A3-0.5{XG51};
SD:=(HS300+HS3H+HS3L)/3*(1-(A4-A2)/15){XG51};
T1:=IF(BETWEEN(HS300,A,B) AND G>0,25,0){XG51};
T2:=IF(HS300>=MAX(A,B),75,0){XG51};
T3:=IF(G>0,15,0){XG51};
T4:=IF(HS300>SD,10,0){XG51};
大盘安全系数%:(T1+T2+T3+T4),COLORWHITE,NODRAW{XG51};
JJ:=(2*C+H+L+O)/5{XG51};
G趋势:=ZIG(C,3){XG51};
GG:=BARSLAST(G趋势<REF(G趋势,1))-BARSLAST(G趋势>REF(G趋势,1)){XG51};
GA:=expma(C,12){XG51};
GB:=EXPMA(C,50){XG51};
GA0:=(C-LLV(L,N))/(HHV(H,N)-LLV(L,N)){XG51};
GA1:=SMA(GA0,2,1){XG51};
GA2:=SMA(GA1,2,1){XG51};
GA3:=3*GA1-2*GA2 {XG51};
GA4:=2*GA3-0.5{XG51};
GSD:=(H+L+C)/3*(1-(GA4-GA2)/15){XG51};
T10:=IF(BETWEEN(JJ,GA,GB) AND GG>0,25,0){XG51};
T20:=IF(JJ>=MAX(GA,GB),75,0){XG51};
T30:=IF(GG>0,15,0){XG51};
T40:=IF(C>GSD,10,0){XG51};
个股安全系数%:(T10+T20+T30+T40),COLORBLUE,NODRAW{XG51};
U1:=JJ>=MAX(GA,GB){XG51};
U2:=JJ<MIN(GA,GB){XG51};
U3:=BETWEEN(JJ,GA,GB) AND GA>=GB{XG51};
U4:=BETWEEN(JJ,GA,GB) AND GA<GB{XG51};
加仓:crOSS(U1,0.5),COLORWHITE{XG51};
清仓:CROSS(U2,0.5),COLORCYAN{XG51};
减仓:CROSS(U3,0.5),COLORBLUE{XG51};
建仓:CROSS(U4,0.5),COLORLIMAGENTA{XG51};
DRAWBAND(10,RGB(255,51,205),0,RGB(0,0,0)){XG51};
DRAWBAND(20,RGB(108,38,255),10,RGB(0,0,0)){XG51};
DRAWBAND(30,RGB(0,84,176),20,RGB(0,0,0)){XG51};
DRAWBAND(40,RGB(0,153,248),30,RGB(0,0,0)){XG51};
DRAWBAND(50,RGB(0,225,0),40,RGB(0,0,0)){XG51};
DRAWBAND(60,RGB(255,255,0),50,RGB(0,0,0)){XG51};
DRAWBAND(70,RGB(253,190,0),60,RGB(0,0,0)){XG51};
DRAWBAND(80,RGB(255,119,53),70,RGB(0,0,0)){XG51};
DRAWBAND(90,RGB(255,0,0),80,RGB(0,0,0)){XG51};
DRAWBAND(100,RGB(206,0,0),90,RGB(0,0,0)){XG51};
CW:=IF(HSJJ>MAX(A,B),(2*个股安全系数%+大盘安全系数%)/3,个股安全系数%){XG51};
DRAWBAND(100,RGB(0,0,0),CW,RGB(255,255,255)){XG51};
仓位控制:CW,COLORRED,LINETHICK2{XG51};
TV:=IF(ISLASTBAR AND PERIOD=5,(V*240/FROMOPEN+V)/2,V){XG51};
Q:=IF(Abs(C-O)>0,(C-O)/(H-L)*50+50,50){XG51};
DT:=TV*Q/100{XG51};
KT:=TV-DT{XG51};
多头量能:=MA(DT,3){XG51};
空头量能:=MA(KT,3){XG51};
强度:((多头量能/(多头量能+空头量能)*100-50)*2),COLORBLUE,NODRAW{XG51};
选股:IF(建仓 OR 加仓,强度,0),NODRAW,COLORRED{XG51};
STICKLINE(HSJJ>=MAX(A,B),120,111,3,0),COLORWHITE{XG51};
STICKLINE(HSJJ<B,120,111,3,0),COLORCYAN{XG51};
STICKLINE(BETWEEN(HSJJ,A,B) AND A>B,120,111,3,0),COLORBLUE{XG51};
DRAWTEXT(FILTER(BacKSET(ISLASTBAR,8),8) AND CONST(HSJJ<B),105,'★绿市场★ ●选热点●快进出●轻仓做●'),COLORCYAN{XG51};
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(HSJJ>=MAX(A,B)),105,'★红市场★ ●选龙头●中长线●可重仓●'),COLORWHITE{XG51};
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(BETWEEN(HSJJ,A,B) AND A>B),105,'★黄市场★ ●多观望●看大势●寻方向●'),COLORBLUE{XG51};
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(加仓),100,'★操作信号:加仓'),COLORWHITE{XG51};
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(清仓),100,'★操作信号:清仓'),COLORCYAN{XG51};
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(减仓),100,'★操作信号:减仓'),COLORBLUE{XG51};
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(建仓),100,'★操作信号:建仓'),COLORLIMAGENTA{X-G.5-1-C-N-{};

源码正文：

bias:(CLOSE-ma(CLOSE,12))/MA(CLOSE,12)*100{XG51};
obv:=BIAS;
P:=5{XG51};
A1:=REF(OBV,P)=HHV(OBV,2*P+1){XG51};
B1:=FILTER(A1,P){XG51};
C1:=BacKSET(B1,P+1){XG51};
D1:=FILTER(C1,P){XG51};
A2:=REF(OBV,P)=LLV(OBV,2*P+1){XG51};
B2:=FILTER(A2,P){XG51};
C2:=BACKSET(B2,P+1){XG51};
D2:=FILTER(C2,P){XG51};
上:REF(OBV,BArslAst(D1)),COLORFF00FF,NODRAW{XG51};
下:REF(OBV,BARSLAST(D2)),COLOR00FF00,NODRAW{XG51};
向上:crOSS(OBV,上*1.01),NODRAW{XG51};
相对能量:=(OBV-下)/(上-下)*100,COLORBLUE{XG51};
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
S11:=R11>REF(R11,1){XG51};
压力:DRAWLINE(D1,OBV,S11,OBV,1),COLORBLUE{XG51};
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1){XG51};
U11:=T11>REF(T11,1){XG51};
支撑:DRAWLINE(D2,OBV,U11,OBV,1),COLORCYAN{XG51};
下轨:STICKLINE(C>0,下,下,1,0),COLORCYAN{XG51};
上轨:STICKLINE(C>0,上,上,1,0),COLORLIMAGENTA{XG51};
DRAWTEXT(CROSS(OBV,上*1.01),上,'上'),COLORBLUE{XG51};
DRAWTEXT(CROSS(下*0.99,OBV),下,'下'),COLORBLUE{XG51};
DRAWICON(D1,OBV,1){XG51};
DRAWICON(D2,OBV,2){X.G_5?1.C.N.{};