通达信大资金-大趋势指标公式

安装后如下图，友情提示（指标只是辅助，不作建议） 所有程序均为免费分享。

不会安装点击 安装指南 步骤操作。

流通:FINANCE(7)/10000,NODRAW;
TS:=BARSCOUNT(CLOSE);J0:=(HIGH+LOW)/2;QJ:=EMA(J0,3);
J1:=IF(CLOSE>QJ,VOL,0);J2:=IF(CLOSE<QJ,VOL,0);
SE:=SUM(J1-J2,5);
SZ:=SUM(J1-J2,10);
长资金:IF(CAPITAL<1,600*EMA(SZ,55),50*MA(SZ,5)),COLOR0000FF,NODRAW;
长趋势:IF(CAPITAL<1,WMA(长资金,360),WMA(长资金,14)),COLOR00CC00,NODRAW;
DRAWBAND(长资金,RGB(255,0,0),长趋势,RGB(0,255,0));
资金:IF(CAPITAL<1,1000,100)*SMA(SE,3,1),COLORFFFFFF;趋势:SMA(资金,3,1),COLOR00FFFF;
短选股:FILTER(CROSS(资金,趋势),5) AND "MACD.DEA"<0,NODRAW;
长选股:短选股 AND 长资金>长趋势,NODRAW;
BB:=FILTER(CROSS(趋势,资金),5) AND "KDJ.D">60;
DRAWICON(短选股,REF(趋势,1),4);DRAWICON(BB,REF(资金,1),5);
DRAWICON(短选股 AND 长资金>长趋势,REF(趋势,1),10);
DRAWICON(BB AND 长资金<长趋势,REF(趋势,1),12);
DRAWICON(CROSS(长资金,长趋势),长资金,1);
DRAWICON(CROSS(长趋势,长资金) AND 长资金>0,长资金,2);
DA:=YEAR AND MONTH AND DAY;
AAA:=STRCAT(CON2STR(YEAR,0),'年');
AAB:=STRCAT(CON2STR(MONTH,0),'月');
AA33:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'星期一',IF(WEEKDAY=2,'星期二',IF(WEEKDAY=3,'星期三',IF(WEEKDAY=4,'星期四',IF(WEEKDAY=5,'星期五',IF(WEEKDAY=6,'六','日'))))))); 
AA:=STRCAT(STRCAT(STRCAT(AAA,AAB),STRCAT(AA33,AA4)),'】'); 
DRAWTEXT_FIX(DA,0.4,0,0,AA),COLORGREEN;