大智慧不需要扩展的分时买卖金额,源码
-
相关简介:大智慧不需要扩展的分时买卖金额,源码 不需要扩展的分时买卖金额。 本来想直接引用大额分笔,试了一试,刷新速度慢,便另编写了一个, 先建引用公式,我命名为分笔0,源码 {股海网提供: www.guhai.com.cn } C/C++ www.zegu.cn 择股网提供 Code 复制内容到剪贴板 a:=BUYVOL*c/100; bz:=sum(a,0); b:=c*SELLVOL/100; sz:=sum(b,0); z:=bz+sz; cz:=bz-sz; xb5:
-
文章来源:择股网作者:股海网发布时间:2011-02-25浏览次数:
大智慧不需要扩展的分时买卖金额,源码
不需要扩展的分时买卖金额。
本来想直接引用大额分笔,试了一试,刷新速度慢,便另编写了一个,
先建引用公式,我命名为分笔0,源码
{股海网提供:www.guhai.com.cn}
C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
- a:=BUYVOL*c/100;
- bz:=sum(a,0);
- b:=c*SELLVOL/100;
- sz:=sum(b,0);
- z:=bz+sz;
- cz:=bz-sz;
- xb5:=if(a<=5 ,a,0);小买:sum(xb5,0),LINETHICK1,COLORred;
- xs5:=if(b<=5 ,b,0);小卖:sum(xs5,0),LINETHICK1,COLORgreen;
- xb20:=if(a<=20 and a>=5 ,a,0);中买:sum(xb20,0),LINETHICK3,COLORred;
- xs20:=if(b<=20 and b>=5 ,b,0);中卖:sum(xs20,0),LINETHICK3,COLORgreen;
- xb100:=if(a<=100 and a>=20,a,0);大买:sum(xb100,0),LINETHICK5,COLORred;
- xs100:=if(b<=100 and b>=20,b,0);大卖:sum(xs100,0),LINETHICK5,COLORgreen;
- xb150:=if(a>=100 ,a,0);特买:sum(xb150,0),LINETHICK7,COLORred;
- xs150:=if(b>=100 ,b,0);特卖:sum(xs150,0),LINETHICK7,COLORgreen;
2.建公式我命名为资金分时,源码
C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
- 特买:"分笔0.特买#tick",LINETHICK7,COLORred;
- 特卖:"分笔0.特卖#tick",LINETHICK7,COLORgreen;
- 大买:"分笔0.大买#tick",LINETHICK5,COLORred;
- 大卖:"分笔0.大卖#tick",LINETHICK5,COLORgreen;
- 中买:"分笔0.中买#tick",LINETHICK3,COLORred;
- 中卖:"分笔0.中卖#tick",LINETHICK3,COLORgreen;
- 小买:"分笔0.小买#tick",LINETHICK1,COLORred;
- 小卖:"分笔0.小卖#tick",LINETHICK1,COLORgreen;
- 小净:小买-小卖,LINETHICK0;
- 中净:中买-中卖,LINETHICK0;
- 大净:大买-大卖,LINETHICK0;
- 特净:特买-特卖,LINETHICK0;
- 买:=特买+大买+中买+小买;
- 卖:=特卖+大卖+中卖+小卖;
- 总:=买+卖;
- 净:买-卖,LINETHICK0;
- 实际:=DYNAINFO(10)/10000;
- 实际差:=总-实际;
- DRAWTEXTABS(90 ,5 ,'买 '+买),colorred;
- DRAWTEXTABS(90 ,20 ,'卖 '+卖),colorgreen;
- DRAWTEXTABS(90 ,35 ,'净 '+净),coloryellow;
- DRAWTEXTABS(5 ,5 ,'小净 '+小净),coloryellow;
- DRAWTEXTABS(5 ,20 ,'中净 '+中净),coloryellow;
- DRAWTEXTABS(5 ,35 ,'大净 '+大净),coloryellow;
- DRAWTEXTABS(5 ,50 ,'特净 '+特净),coloryellow;
- DRAWTEXTABS(180 ,5 ,'总 '+总),colorred;
- DRAWTEXTABS(180,20,'实际'+实际),colorgreen;
- DRAWTEXTABS(180,35,'实际差'+实际差),LINETHICK2,coloryellow;
附上公式,方便引入