通达信{风险控制}源码

HS300:="399300$C";
HS3H:="399300$H";
HS3L:="399300$L";
HS3O:="399300$O";
HSJJ:=(2*HS300+HS3H+HS3L+HS3O)/5;
趋势:=ZIG(HS300,3);
G:=BARSLAST(趋势REF(趋势,1));
A:=EMA(HS300,12);
B:=EMA(HS300,50);
C0:=(HS3H+HS3L)/2;
A0:=(HS300-LLV(HS3L,N))/(HHV(HS3H,N)-LLV(HS3L,N));
A1:=SMA(A0,2,1);
A2:=SMA(A1,2,1);
A3:=3*A1-2*A2 ;
A4:=2*A3-0.5;
SD:=(HS300+HS3H+HS3L)/3*(1-(A4-A2)/15);
T1:=IF(BETWEEN(HS300,A,B) AND G>0,25,0);
T2:=IF(HS300>=MAX(A,B),75,0);
T3:=IF(G>0,15,0);
T4:=IF(HS300>SD,10,0);
大盘安全系数%:(T1+T2+T3+T4),COLORRED,NODRAW;
{---------------------------------------------}
JJ:=(2*C+H+L+O)/5;
G趋势:=ZIG(C,3);
GG:=BARSLAST(G趋势REF(G趋势,1));
GA:=EXPMA(C,12);
GB:=EXPMA(C,50);
GA0:=(C-LLV(L,N))/(HHV(H,N)-LLV(L,N));
GA1:=SMA(GA0,2,1);
GA2:=SMA(GA1,2,1);
GA3:=3*GA1-2*GA2 ;
GA4:=2*GA3-0.5;
GSD:=(H+L+C)/3*(1-(GA4-GA2)/15);
T10:=IF(BETWEEN(JJ,GA,GB) AND GG>0,25,0);
T20:=IF(JJ>=MAX(GA,GB),75,0);
T30:=IF(GG>0,15,0);
T40:=IF(C>GSD,10,0);
个股安全系数%:(T10+T20+T30+T40),COLORYELLOW,NODRAW;
{---------------------------------------------}

U1:=JJ>=MAX(GA,GB);
U2:=JJ U3:=BETWEEN(JJ,GA,GB) AND GA>=GB;
U4:=BETWEEN(JJ,GA,GB) AND GA
加仓:CROSS(U1,0.5),COLORRED;
清仓:CROSS(U2,0.5),COLORGREEN;
减仓:CROSS(U3,0.5),COLORYELLOW;
建仓:CROSS(U4,0.5),COLORMAGENTA;
{---------------------------------------------}
DRAWBAND(10,RGB(255,51,205),0,RGB(0,0,0));
DRAWBAND(20,RGB(108,38,255),10,RGB(0,0,0));
DRAWBAND(30,RGB(0,84,176),20,RGB(0,0,0));
DRAWBAND(40,RGB(0,153,248),30,RGB(0,0,0));
DRAWBAND(50,RGB(0,225,0),40,RGB(0,0,0));
DRAWBAND(60,RGB(255,255,0),50,RGB(0,0,0));
DRAWBAND(70,RGB(253,190,0),60,RGB(0,0,0));
DRAWBAND(80,RGB(255,119,53),70,RGB(0,0,0));
DRAWBAND(90,RGB(255,0,0),80,RGB(0,0,0));
DRAWBAND(100,RGB(206,0,0),90,RGB(0,0,0));
CW:=IF(HSJJ>MAX(A,B),(2*个股安全系数%+大盘安全系数%)/3,个股安全系数%);
DRAWBAND(100,RGB(0,0,0),CW,RGB(255,255,255));
仓位控制:CW,COLORWHITE,LINETHICK2;

{---------------------------------------------}
TV:=IF(ISLASTBAR AND PERIOD=5,(V*240/FROMOPEN+V)/2,V);
Q:=IF(ABS(C-O)>0,(C-O)/(H-L)*50+50,50);
DT:=TV*Q/100;
KT:=TV-DT;
多头量能:=MA(DT,3);
空头量能:=MA(KT,3);
强度:((多头量能/(多头量能+空头量能)*100-50)*2),COLORYELLOW,NODRAW;
选股:IF(建仓 OR 加仓,强度,0),NODRAW,COLORWHITE;

STICKLINE(HSJJ>=MAX(A,B),120,111,3,0),COLORRED;
STICKLINE(HSJJ STICKLINE(BETWEEN(HSJJ,A,B) AND A>B,120,111,3,0),COLORYELLOW;

DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(HSJJ DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(HSJJ>=MAX(A,B)),105,'★红市场★ ●选龙头●中长线●可重仓●'),COLORRED;
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(BETWEEN(HSJJ,A,B) AND A>B),105,'★黄市场★ ●多观望●看大势●寻方向●'),COLORYELLOW;
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(加仓),100,'★操作信号:加仓'),COLORRED;
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(清仓),100,'★操作信号:清仓'),COLORGREEN;
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(减仓),100,'★操作信号:减仓'),COLORYELLOW;
DRAWTEXT(FILTER(BACKSET(ISLASTBAR,8),8) AND CONST(建仓),100,'★操作信号:建仓'),COLORMAGENTA;