取自正版的大智慧TRT顺势交易(公式、源码)[大智慧公式]

相关标签:

取自正版的大智慧TRT顺势交易源码

大智慧新一代的TRT顺势交易源码，从其他地方找来的，和原版对过信号，应该是相同的，你们也对下。也可以引入附件中的公式，一样的
源码如下：

原理解析：
输出VARIABLE:P1=0 C1赋值:成本均线(5)*100*0.96的整数部分/100 P2赋值:1日前的成本均线(5)*100的整数部分/100 P3赋值:1日前的成本均线(5)*0.96*100的整数部分/100 VV赋值:当前流通股本(手)*0.05和1日前的成交量(手)的34日简单移动平均的较小值/100的整数部分 P40赋值:MAXCYC*100的整数部分/100 P41赋值:1日前的MAXCYC*100的整数部分/100 P4赋值:P1=0 AND 收盘价>P2 OR (1日前的成交量(手)/100<VV AND 收盘价>P2*0.98*100的整数部分/100 AND 成交量(手)>当前流通股本(手)*0.05和1日前的成交量(手)的34日简单移动平均的较小值) P5赋值:P1=1 AND 收盘价<P3和P41的较小值 P1赋值:如果P4=1,返回1,否则返回如果P5=1,返回0,否则返回1日前的P1 当满足条件P1=1ANDC<开盘价时,在收盘价和开盘价位置之间画柱状线,宽度为8,1不为0则画空心柱.,COLOR5454FF,LAYER0 当满足条件P1=1ANDC<开盘价时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFFFF54 当满足条件P1=1ANDC<开盘价时,在收盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR5454FF 当满足条件P1=1ANDC<开盘价时,在最高价和开盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR5454FF 当满足条件P1=0ANDC>开盘价时,在收盘价和开盘价位置之间画柱状线,宽度为8,1不为0则画空心柱.,COLORFFFF54 当满足条件P1=0ANDC>开盘价时,在收盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFF54 当满足条件P1=0ANDC>开盘价时,在最低价和开盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFF54 当满足条件P1上穿0时,在最低价*0.9位置书写文字,画黄色,线宽为3 当满足条件1上穿P1时,在最高价*1.05位置书写文字,画绿色,线宽为3 DRAWFLAGTEXT(P1=0 AND (C1*0.98-收盘价)/收盘价>0.1,收盘价,'持币') DRAWFLAGTEXT(P1=0 AND (C1*0.98-收盘价)/收盘价<=0.1 AND 1日前的成交量(手)/100<VV,收盘价,'明日收盘价超过'+STR(C1)+' 或收盘价超过'+STR(C1*0.98*100的整数部分/100)+'且成交量大于'+STR(VV)+'买入') DRAWFLAGTEXT(P1=0 AND (C1*0.98-收盘价)/收盘价<=0.1 AND 1日前的成交量(手)/100>=VV,收盘价,'明日收盘价超过'+STR(C1)+'买入') DRAWFLAGTEXT(P1=1 AND (收盘价-C1和P40的较小值)/C1和P40的较小值>0.1 ,收盘价,'持股') DRAWFLAGTEXT(P1=1 AND (收盘价-C1和P40的较小值)/C1和P40的较小值<=0.1 ,收盘价,'明日收盘价跌破'+STR(C1和P40的较小值)+'卖出') 输出选股的VARIABLE:P1=0 C1赋值:成本均线(5)*100*0.96的整数部分/100 P2赋值:1日前的成本均线(5)*100的整数部分/100 P3赋值:1日前的成本均线(5)*0.96*100的整数部分/100 VV赋值:当前流通股本(手)*0.05和1日前的成交量(手)的34日简单移动平均的较小值/100的整数部分 P41赋值:1日前的MAXCYC*100的整数部分/100 P4赋值:P1=0 AND 收盘价>P2 OR (1日前的成交量(手)/100<VV AND 收盘价>P2*0.98*100的整数部分/100 AND 成交量(手)>当前流通股本(手)*0.05和1日前的成交量(手)的34日简单移动平均的较小值) P5赋值:P1=1 AND 收盘价<P3和P41的较小值 P1赋值:如果P4=1,返回1,否则返回如果P5=1,返回0,否则返回1日前的P1 输出XG:P1上穿0=1

 来源:程序化99（ WWW.CXH99.COM ）

源码：

{顺势交易}
variable:p1=0;
c1:=INTPART(cyc(5)*100*0.96)/100;
p2:=intpart(ref(cyc(5),1)*100)/100;
p3:=intpart(ref(cyc(5),1)*0.96*100)/100;
vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100);
p40:=intpart(maxcyc*100)/100;
p41:=intpart(ref(MAXCYC,1)*100)/100;
p4:=p1=0 and c>p2 or (ref(vol/100,1)<vv and c>intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1)));
p5:=p1=1 and c<min(p3,p41);
p1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));
STICKLINE(p1=1 and c<o,c,o,8,1),color5454ff,layer0;
STICKLINE(p1=1 and c<o,c,o,6,0),colorffff54;
STICKLINE(p1=1 and c<o,c,l,0.5,0),color5454ff;
STICKLINE(p1=1 and c<o,h,o,0.5,0),color5454ff;
STICKLINE(p1=0 and c>o,c,o,8,1),colorffff54;
STICKLINE(p1=0 and c>o,c,h,0.5,0),colorffff54;
STICKLINE(p1=0 and c>o,l,o,0.5,0),colorffff54;
DRAWTEXT(cross(p1,0),l*0.9,'B'),coloryellow,LINETHICK3;
DRAWTEXT(cross(1,p1),h*1.05,'S'),COLORgreen,LINETHICK3;
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c>0.1,c,'持币');
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)<vv,c,'明日收盘价超过'+str(c1)+';或收盘价超过'+str(intpart(c1*0.98*100)/100)+'且成交量大于'+str(vv)+'买入');
DRAWFLAGTEXT(p1=0 and (c1*0.98-c)/c<=0.1 and ref(vol/100,1)>=vv,c,'明日收盘价超过'+str(c1)+'买入');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)>0.1 ,c,'持股');
DRAWFLAGTEXT(p1=1 and (c-min(c1,p40))/min(c1,p40)<=0.1 ,c,'明日收盘价跌破'+str(min(c1,p40))+'卖出');


选股的
{顺势选股}
variable:p1=0;
c1:=INTPART(cyc(5)*100*0.96)/100;
p2:=intpart(ref(cyc(5),1)*100)/100;
p3:=intpart(ref(cyc(5),1)*0.96*100)/100;
vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100);
p41:=intpart(ref(MAXCYC,1)*100)/100;
p4:=p1=0 and c>p2 or (ref(vol/100,1)<vv and c>intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1)));
p5:=p1=1 and c<min(p3,p41);
p1:=if(p4=1,1,if(p5=1,0,ref(p1,1)));
xg:cross(p1,0)=1;

{程序化交易 www.cxh99.com }

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】