当前位置:→ 股海网通达信公式 → 正文
  • 通达信看资金变化决定你是否进场源码附图

  • 相关简介:据资金进出,副图给予相应提示,请看图: 以下源码: {资金进出-通达信版} N:=3; K1:=IF(CLOSE=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW); K2:=IF(CLOSE=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE); DT:=VOL*K1/(K1+K2); KT:=(VOL-DT

  • 文章来源:股海网作者:股海网发布时间:2016-02-18浏览次数:下载次数:0

据资金进出,副图给予相应提示,请看图:

通达信看资金变化决定你是否进场源码附图

 以下源码:

{资金进出-通达信版}
N:=3;
 K1:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW);
 K2:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE);
 DT:=VOL*K1/(K1+K2);
 KT:=(VOL-DT);
买量:SUM(DT,N),COLOR0000FF;
卖量:-SUM(KT,N),COLORFFFF00;
 DRAWBAND(买量,RGB(0,120,0),0,DRAWNULL);
 DRAWBAND(0,RGB(0,80,0),卖量,DRAWNULL);
进出量:买量+卖量,POINTDOT,COLOR00FFFF;
净量换手:100*进出量/CAPITAL,POINTDOT,COLOR00FF33;
 STICKLINE(进出量>=0,0,进出量,3,1),COLOR0000FF;
 STICKLINE(进出量<0,0,进出量,3,1),COLORFFFF00;
 D3:=100*SUM(DT,3)/CAPITAL;
 K3:=100*SUM(KT,3)/CAPITAL;
 J3:=D3-K3;
 D6:=100*SUM(DT,6)/CAPITAL;
 K6:=100*SUM(KT,6)/CAPITAL;
 J6:=D6-K6;
 D9:=100*SUM(DT,9)/CAPITAL;
 K9:=100*SUM(KT,9)/CAPITAL;
 J9:=D9-K9;
画:=CONST(FINDLOW(卖量,0,90,1));
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,66,44),ABS(画),DRAWNULL),RGB(50,50,50),画,DRAWNULL);
 BL3:=ABS(画)/CONST(FINDHIGH(MAX(D3,K3),0,65,1));
 BL6:=ABS(画)/CONST(FINDHIGH(MAX(D6,K6),0,65,1));
 BL9:=ABS(画)/CONST(FINDHIGH(MAX(D9,K9),0,65,1));
 D3B:=(D3*BL3);
 K3B:=(K3*BL3);
 J3B:=(ABS(J3)*BL3);
 D6B:=(D6*BL6);
 K6B:=(K6*BL6);
 J6B:=(ABS(J6)*BL6);
 D9B:=(D9*BL9);
 K9B:=(K9*BL9);
 J9B:=(ABS(J9)*BL9);
 {画直方图}
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,63,62),CONST(D3B),DRAWNULL),RGB(150,0,0),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,62,61),CONST(K3B),DRAWNULL),RGB(0,150,150),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,61,60),CONST(J3B),DRAWNULL),RGB(150,150,0),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,56,55),CONST(D6B),DRAWNULL),RGB(150,0,0),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,55,54),CONST(K6B),DRAWNULL),RGB(0,150,150),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,54,53),CONST(J6B),DRAWNULL),RGB(150,150,0),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,49,48),CONST(D9B),DRAWNULL),RGB(150,0,0),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,48,47),CONST(K9B),DRAWNULL),RGB(0,150,150),0,DRAWNULL);
 DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,47,46),CONST(J9B),DRAWNULL),RGB(150,150,0),0,DRAWNULL);

DRAWTEXT(CURRBARSCOUNT=60,0,'买量'), COLORDDFFFF;
 DRAWTEXT(CURRBARSCOUNT=55,0,'卖量'), COLORDDFFFF;
 DRAWTEXT(CURRBARSCOUNT=50,0,'进出量'), COLORDDFFFF;
 DRAWTEXT(CURRBARSCOUNT=65,画*0.2,'今日'), COLOR33FFFF;
 DRAWNUMBER(CURRBARSCOUNT=60,画*0.2,CONST(100*DT/CAPITAL)), COLOR33FFFF;
 DRAWNUMBER(CURRBARSCOUNT=55,画*0.2,CONST(100*KT/CAPITAL)), COLOR33FFFF;
 DRAWNUMBER(CURRBARSCOUNT=50,画*0.2,CONST(100*DT/CAPITAL-100*KT/CAPITAL)), COLOR33FFFF;
 DRAWTEXT(CURRBARSCOUNT=65,画*0.4,'3日'), COLORDDFFFF;
 DRAWNUMBER(CURRBARSCOUNT=60,画*0.4,CONST(D3)), COLORDDFFFF;
 DRAWNUMBER(CURRBARSCOUNT=55,画*0.4,CONST(K3)), COLORDDFFFF;
 DRAWNUMBER(CURRBARSCOUNT=50,画*0.4,CONST(J3)), COLORDDFFFF;
 DRAWTEXT(CURRBARSCOUNT=65,画*0.6,'6日'), COLOR33FFFF;
 DRAWNUMBER(CURRBARSCOUNT=60,画*0.6,CONST(D6)), COLOR33FFFF;
 DRAWNUMBER(CURRBARSCOUNT=55,画*0.6,CONST(K6)), COLOR33FFFF;
 DRAWNUMBER(CURRBARSCOUNT=50,画*0.6,CONST(J6)), COLOR33FFFF;
 DRAWTEXT(CURRBARSCOUNT=65,画*0.8,'9日'), COLORDDFFFF;
 DRAWNUMBER(CURRBARSCOUNT=60,画*0.8,CONST(D9)), COLORDDFFFF;
 DRAWNUMBER(CURRBARSCOUNT=55,画*0.8,CONST(K9)), COLORDDFFFF;
 DRAWNUMBER(CURRBARSCOUNT=50,画*0.8,CONST(J9)), COLORDDFFFF;
 DRAWTEXT(CURRBARSCOUNT=65,ABS(画)*0.6,'3'), COLORBBFFFF;
 DRAWTEXT(CURRBARSCOUNT=58,ABS(画)*0.6,'6'), COLORBBFFFF;
 DRAWTEXT(CURRBARSCOUNT=51,ABS(画)*0.6,'9'), COLORBBFFFF;
 DRAWTEXT(CURRBARSCOUNT=65 OR CURRBARSCOUNT=58 OR CURRBARSCOUNT=51,ABS(画)*0.4,'日'), COLORBBFFFF;

 

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

通达信看资金变化决定你是否进场源码附图

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

上传会员: 
股海网
文件大小: 
Bytes
上传时间: 
2016-02-18
下载积分: 
-
免责声明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,股海网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用,不得用于商业或者非法用途,如有侵犯您的版权, 请参看 《股海网侵权处理流程》《股海网免责声明条款》
点击下载无反应时,更换主流浏览器重新登录操作,如360浏览器、Edge浏览器、谷歌浏览器,个别浏览器有不兼容现象。
勾选以下表示您已经阅读并同意以上声明才能下载本文件,扣除积分无法退还!
我已阅读所有条款规定, 请点我同意 所有条款内容!我自愿下载!
提示:如下载失败,请点关闭刷新此页面或提交问题反馈给管理员→
关闭

关于我们 - 联系我们 - 隐私政策 - 免责声明 - 下载帮助 - 广告合作 - SiteMap - TOP
增值电信业务经营ICP许可证:湘B2-20210269 湘ICP备09016573号-10 湘公网安备43108102000040号
Copyright © 2021 铭网科技,All Rights Reserved.