股票之声

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 20875|回复: 5

当天资金流向(副图) 通达信

[复制链接]
发表于 2016-10-3 09:05 | 显示全部楼层 |阅读模式
本帖最后由 舜江侯 于 2016-10-4 09:15 编辑

现手买:=BUYVOL*DYNAINFO(7)*100/10000;
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;
合:=ABS(现手买)+ABS(现手卖);
差:=ABS(现手买)-ABS(现手卖);
XM1:=ABS(现手买)/合*100;
XM2:=ABS(现手卖)/合*100;

DRAWRECTREL(520,900,970,550,RGB(255,255,255));   {图表底色-白}
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}

DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
DRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT('  ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
DRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;

流通盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流通盘【亿】/1000000;
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力参与}
N:=SUMBARS(N0,100),NODRAW;  {充分换手机构运作周期}
充分换手【天】:=N,NODRAW,COLORCYAN;
成交额:=AMOUNT/10000,NODRAW;{万元}
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为基本控盘,下同}
A3:=SUM(IF(CLOSE<REF(CLOSE,1),成交额*0.25,0),N);
A6:=(A2+A3);
AA1:=STRCAT(STRCAT('  机构买',CON2STR((100*A2)/A6,0)),'%');
AA2:=STRCAT(STRCAT('  机构卖',CON2STR((100*A3)/A6,0)),'%');
AA3:=STRCAT(STRCAT('  机构流',CON2STR((100*(A2-A3))/A6,0)),'%');
DRAWTEXT_FIX(DYNAINFO(4)>1,0,0.5,0,AA1),COLORRED;
DRAWTEXT_FIX(DYNAINFO(4)>1,0,0.8,0,AA2),COLORGREEN;
DRAWTEXT_FIX(DYNAINFO(4)>1,0,0.11,0,AA3),COLORYELLOW;
当天:=成交额*(差/合)*0.25;
DRAWTEXT_FIX(DYNAINFO(4)>0,0.11,0.11,0,'  今日大宗资金')COLORCYAN;
DRAWTEXT_FIX(DYNAINFO(4)>1 AND 当天>0,0.11,0.5,0,STRCAT(STRCAT('大宗流向 ',CON2STR(当天,1)),'万元')),COLORRED;
DRAWTEXT_FIX(DYNAINFO(4)>1 AND 当天<0,0.11,0.5,0,STRCAT(STRCAT('大宗流向 ',CON2STR(当天,1)),'万元')),COLORGREEN;

V5:=MA(VOL,5); V10:=MA(VOL,10);
虚量:=IF(ISLASTBAR AND FROMOPEN<240,FROMOPEN*VOL/240,VOL);
即时:=550+换手*700/100;
X1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);
DRAWRECTREL(290,900,320,200,RGB(255,255,255));   {图表底色-白};
DRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));


DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW;



本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
发表于 2016-10-3 14:01 | 显示全部楼层
版主 怎么用   是您自己写的吗
 楼主| 发表于 2016-10-3 14:48 | 显示全部楼层
指标是根据通达信现有变量写就,其间也借鉴了部分他人经验。 仅供分析参考!
发表于 2016-10-6 20:33 来自手机 | 显示全部楼层
舜江侯 发表于 2016-10-3 14:48
指标是根据通达信现有变量写就,其间也借鉴了部分他人经验。 仅供分析参考!

能说说如何使用吗?谢谢
发表于 2016-12-15 17:03 | 显示全部楼层
这个厉害了,楼主辛苦了
回复 支持 反对

使用道具 举报

发表于 2019-7-21 13:22 | 显示全部楼层
实用 感谢分享
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|股票之声 ( 京ICP备09051785号 )

GMT+8, 2024-3-29 05:52 , Processed in 0.047638 second(s), 5 queries , MemCache On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表