筹码分布 variable:pv[100]=0,pc[100]=0; hh:=hhv(high,0); ll:=llv(low,0); fv:=vol/CAPITAL*100; fh:=high; fl:=low; p:=sysparam(1); dd:=(hh[p]-ll[p])/99; for i=p downto 1 do begin sh:=(fh-ll[p])/dd+1; sl:=(fl-ll[p])/dd+1; dj:=fv/(sh-sl+1); for j=sl to sh do pv[j]:=pv[j]+dj; end; s:=0; for i=1 to 100 do if s <pv then s:=pv; bl:=s/(sysparam(3)-sysparam(2))*2; drawsl(barpos=sysparam(3),sysparam(5),0,pv[1]/bl+1,1),COLORcyan; drawsl(barpos=sysparam(3),sysparam(5)+dd,0,pv[2]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*02,0,pv[03]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*03,0,pv[04]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*04,0,pv[05]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*05,0,pv[06]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*06,0,pv[07]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*07,0,pv[08]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*08,0,pv[09]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*09,0,pv[10]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*10,0,pv[11]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*11,0,pv[12]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*12,0,pv[13]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*13,0,pv[14]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*14,0,pv[15]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*15,0,pv[16]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*16,0,pv[17]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*17,0,pv[18]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*18,0,pv[19]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*19,0,pv[20]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*20,0,pv[21]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*21,0,pv[22]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*22,0,pv[23]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*23,0,pv[24]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*24,0,pv[25]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*25,0,pv[26]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*26,0,pv[27]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*27,0,pv[28]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*28,0,pv[29]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*29,0,pv[30]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*30,0,pv[31]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*31,0,pv[32]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*32,0,pv[33]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*33,0,pv[34]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*34,0,pv[35]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*35,0,pv[36]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*36,0,pv[37]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*37,0,pv[38]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*38,0,pv[39]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*39,0,pv[40]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*40,0,pv[41]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*41,0,pv[42]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*42,0,pv[43]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*43,0,pv[44]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*44,0,pv[45]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*45,0,pv[46]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*46,0,pv[47]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*47,0,pv[48]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*48,0,pv[49]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*49,0,pv[50]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*50,0,pv[51]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*51,0,pv[52]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*52,0,pv[53]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*53,0,pv[54]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*54,0,pv[55]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*55,0,pv[56]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*56,0,pv[57]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*57,0,pv[58]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*58,0,pv[59]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*59,0,pv[60]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*60,0,pv[61]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*61,0,pv[62]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*62,0,pv[63]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*63,0,pv[64]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*64,0,pv[65]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*65,0,pv[66]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*66,0,pv[67]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*67,0,pv[68]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*68,0,pv[69]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*69,0,pv[70]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*70,0,pv[71]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*71,0,pv[72]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*72,0,pv[73]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*73,0,pv[74]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*74,0,pv[75]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*75,0,pv[76]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*76,0,pv[77]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*77,0,pv[78]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*78,0,pv[79]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*79,0,pv[80]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*80,0,pv[81]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*81,0,pv[82]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*82,0,pv[83]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*83,0,pv[84]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*84,0,pv[85]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*85,0,pv[86]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*86,0,pv[87]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*87,0,pv[88]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*88,0,pv[89]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*89,0,pv[90]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*90,0,pv[91]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*91,0,pv[92]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*92,0,pv[93]/bl+1,1),COLORCYAN; drawsl(barpos=sysparam(3),sysparam(5)+dd*93,0,pv[94]/bl+1,1),COLORCYAN; drawsl(barpos=sys |
- 软件大小:0 Bytes
- 推荐星级:
- 更新时间:2009-07-02 19:42:32
- 软件类别: 国产软件 / 指南针指标
- 软件语言:简体中文
- 授权方式: 解密版
- 联系方式:暂无联系方式
- 官方主页: Home Page
- 点击大图: 【一键转帖到论坛】
- 插件情况:
- 运行环境:Win9X/Win2000/WinXP/Win2003/
- 相关Tags:指标公式 股票软件,公式源码
-
(5)56%(4)44%
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!