天机论坛

 找回密码
 欢迎注册

QQ登录

只需一步,快速开始

天机股票网 争做最牛的股票资讯集散地 注册 - 常见问题 - 联系方式

你有好料 就来分享 你可以将手中的好料分享赚取金币。 如何获得金币 - 金币回购计划

天天来访问 天天有收获 高端信息区区几个金币就可查看 立即注册 - QQ快速登陆

查看: 1146|回复: 0
打印 上一主题 下一主题

[大智慧] 改进优化区间成本--大智慧版(源码、主图、贴图)

[复制链接]
跳转到指定楼层
楼主
发表于 2012-3-4 16:29:09 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
input:N(1,1,9999),M(1,1,9999);
A1:=BARSTATUS=2 ;
C1:=BACKSET(a1,n);
D1:=FILTER(C1,n-1);
VERTLINE( d1,1 );
A2:=BARSTATUS=2 ;
C2:=BACKSET(a2,m);
D2:=FILTER(C2,m-1);
VERTLINE( d2,1 );
周期:abs(n-m) + 1,linethick0;
结束点:=if(n>m,d2,d1);
成交额:=if(结束点,sum(amount,周期),0);
成交量:=if(结束点,sum(vol,周期),0);
区间均价:=if(CATEGORY=1,  成交额/成交量/100,ref(ma(c,abs(n-m)+1),min(m,n)-1));
区间换手和:=成交量/CAPITAL*100;
N1:=IF(DATATYPE=10,1.05,IF(DATATYPE=9,1.02,1.01));
N2:=IF(DATATYPE=10,0.95,IF(DATATYPE=9,0.98,0.99));
区间换手:REF(区间换手和,BARSLAST(结束点)),linethick0;
区间成本:REF(区间均价,BARSLAST(结束点));
上界:REF(区间均价*n1,BARSLAST(结束点)),DOTLINE;
下界:REF(区间均价*n2,BARSLAST(结束点)),DOTLINE;
DRAWTEXTABS(588,20,'成本区间:'+NUMTOSTRN(下界,2)+' - ' +NUMTOSTRN(区间成本,2)
+' - ' + NUMTOSTRN(上界,2)),LAYER0,ColorFFC000;
DRAWTEXTABS(588,40,'区间换手:'+NUMTOSTRN(区间换手,2)),LAYER0,ColorFFC000;


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 有用有用 没用没用
回复

使用道具 举报

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

本版积分规则