分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
当前位置：分析家公式网 → 软件中心 → 股票公式 → 通达信公式
筹码分布（通达信公式和谐源码分享 K线图）
  • 软件大小：23.0 KB
  • 推荐星级：
  • 更新时间：2019-05-09 01:42:32
  • 软件类别： 国产软件 / 通达信公式
  • 软件语言：简体中文
  • 授权方式： 免费版
  • 联系方式：暂无联系方式
  • 官方主页： Home Page
  • 点击大图：  【一键转帖到论坛】
  • 插件情况：
  • 运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
  • 相关Tags：筹码分布  
  • (0)0%
    (0)0%

软件介绍

 {公式名称: AA1118

公式描述: 筹码分布
无参数
公式类型: 技术指标公式-图表型
画线方法: 主图叠加
公式版本: 0
显示小数: 缺省位数
坐标线位置: 自动
额外Y轴分界: 无
 
参数精灵:无
用法注释:无
公式源码:}
 
VAR1:=400;
VAR2:=90;
VAR3:=79;
VAR4:=IF(VAR2>10,10,VAR3);
VAR5:=CURRBARSCOUNT;
VAR6:=REF(HIGH,VAR2)=HHV(HIGH,2*VAR2+1);
VAR7:=BACKSET(VAR6,VAR2+1);
VAR8:=FILTER(VAR7,VAR2) AND HIGH=HHV(HIGH,VAR2+1);
VAR9:=BARSLAST(VAR8);
VAR10:=IF(VAR8,VAR5,0);
VAR11:=IF(VAR9,REF(HIGH,VAR9),HIGH);
VAR12:=IF(VAR9,REF(VAR10,VAR9),VAR10);
VAR13:=REF(VAR11,VAR9+1);
VAR14:=CONST(VAR12);
VAR15:=REF(VAR12,VAR9+1);
VAR16:=CONST(VAR15);
VAR17:=REF(LOW,VAR2)=LLV(LOW,2*VAR2+1);
VAR18:=BACKSET(VAR17,VAR2+1);
VAR19:=FILTER(VAR18,VAR2) AND LOW=LLV(LOW,VAR2+1);
VAR20:=BARSLAST(VAR19);
VAR21:=IF(VAR19,VAR5,0);
VAR22:=IF(VAR20,REF(VAR21,VAR20),VAR21);
VAR23:=CONST(VAR22);
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,1),COLOR00CC00;
VAR24:=BARSLAST(LOW=LLV(LOW,180));
VAR25:=REF(LOW,VAR24);
VAR26:=BARSLAST(HIGH=HHV(HIGH,VAR24));
VAR27:=REF(HIGH,VAR26);
VAR28:=BARSLAST(LOW=LLV(LOW,VAR26));
VAR29:=REF(LOW,VAR28);
VAR30:=INTPART((VAR26+1)/2);
VAR31:=REFDATE(VAR27,DATE);
VAR32:=REFDATE(CLOSE,DATE);
VAR33:=REFDATE(VAR29,DATE);
C线:DRAWLINE(CURRBARSCOUNT=CONST(VAR26+1),VAR33,CURRBARSCOUNT=CONST(VAR30),VAR32,0),COLORBLACK;
D线:DRAWLINE(CURRBARSCOUNT=CONST(VAR30),VAR32,CURRBARSCOUNT=CONST(1),VAR33,0),COLORBLACK;
FFG1:DRAWBAND(C线,RGB(255,0,0),VAR33,RGB(255,0,0));
FFG2:DRAWBAND(D线,RGB(50,205,50),VAR33,RGB(50,205,50));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,1),COLOR00CC00;
VAR34:=CONST(VAR28+VAR28);
VAR35:=CONST(CLOSE+0.01);
VAR36:=REFDATE(VAR35,DATE);
VAR37:=REF(VAR22,VAR20+1);
VAR38:=CONST(VAR37);
VAR39:=REF(HIGH,VAR4)=HHV(HIGH,2*VAR4+1);
VAR40:=CONST((VAR31+VAR33)/2);
VAR41:=CONST((VAR31+VAR40)/2);
VAR42:=CONST((VAR40+VAR33)/2);
NOTEXTC区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,VAR41,VAR41)),DRAWNULL),COLORCYAN;
NOTEXTB区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,VAR40,VAR40)),DRAWNULL),COLORCYAN;
NOTEXTA区界线:IF(CURRBARSCOUNT<=CONST(3),CONST(IF(1,VAR42,VAR42)),DRAWNULL),COLORCYAN;
VAR43:=IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR35+VAR35*0.2,VAR35+VAR35*0.2)),DRAWNULL);
VAR44:=IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR35+VAR35*0.1,VAR35+VAR35*0.1)),DRAWNULL);
VAR45:=IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR35,VAR35)),DRAWNULL);
NOTEXT高:IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR31,VAR31)),DRAWNULL),COLORMAGENTA;
NOTEXT低:IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR29,VAR29)),DRAWNULL),COLORGREEN;
新势力A:IF(CURRBARSCOUNT<=CONST(VAR28+1),MA(CLOSE,VAR28),DRAWNULL),COLORRED;
新势力V:IF(CURRBARSCOUNT<=CONST(VAR28+1),IF(新势力A<REF(新势力A,1),新势力A,DRAWNULL),DRAWNULL),COLORGREEN;
VAR46:=BACKSET(VAR39,VAR4+1);
VAR47:=FILTER(VAR46,VAR4) AND HIGH=HHV(HIGH,VAR4+1);
VAR48:=BARSLAST(VAR47);
VAR49:=IF(VAR47,VAR5,0);
VAR50:=IF(VAR48,REF(HIGH,VAR48),HIGH);
VAR51:=IF(VAR48,REF(VAR49,VAR48),VAR49);
VAR52:=REF(VAR50,VAR48+1);
VAR53:=CONST(VAR51);
VAR54:=REF(VAR51,VAR48+1);
VAR55:=CONST(VAR54);
VAR56:=REF(LOW,VAR4)=LLV(LOW,2*VAR4+1);
VAR57:=BACKSET(VAR56,VAR4+1);
VAR58:=FILTER(VAR57,VAR4) AND LOW=LLV(LOW,VAR4+1);
VAR59:=BARSLAST(VAR58);
VAR60:=CONST(VAR41);
VAR61:=CONST(VAR40);
VAR62:=CONST(VAR42);
VAR63:=IF(CLOSE>=VAR60,AMOUNT,DRAWNULL);
VAR64:=IF(CLOSE>=VAR60,VOL,DRAWNULL);
VAR65:=0.01*SUM(VAR63,VAR26)/SUM(VAR64,VAR26);
VAR66:=REFDATE(VAR65,DATE);
NOTEXTD区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,VAR65,VAR65)),DRAWNULL),DOTLINE,COLORLIGRAY;
VAR67:=IF(CLOSE<=VAR60 AND CLOSE>=VAR61,AMOUNT,DRAWNULL);
VAR68:=IF(CLOSE<=VAR60 AND CLOSE>=VAR61,VOL,DRAWNULL);
VAR69:=0.01*SUM(VAR67,VAR26)/SUM(VAR68,VAR26);
VAR70:=REFDATE(VAR69,DATE);
NOTEXTC区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,VAR69,VAR69)),DRAWNULL),DOTLINE,COLORLIGRAY;
VAR71:=IF(CLOSE<=VAR61 AND CLOSE>=VAR62,AMOUNT,DRAWNULL);
VAR72:=IF(CLOSE<=VAR61 AND CLOSE>=VAR62,VOL,DRAWNULL);
VAR73:=0.01*SUM(VAR71,VAR26)/SUM(VAR72,VAR26);
VAR74:=REFDATE(VAR73,DATE);{www.fxjgsw.com}
NOTEXTB区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,VAR73,VAR73)),DRAWNULL),DOTLINE,COLORLIGRAY;
VAR75:=IF(CLOSE<=VAR62,AMOUNT,DRAWNULL);
VAR76:=IF(CLOSE<=VAR62,VOL,DRAWNULL);
VAR77:=0.01*SUM(VAR75,VAR26)/SUM(VAR76,VAR26);
VAR78:=REFDATE(VAR77,DATE);
NOTEXTA区成本:IF(CURRBARSCOUNT<=CONST(13),CONST(IF(1,VAR77,VAR77)),DRAWNULL),DOTLINE,COLORLIGRAY;
VAR79:=IF(CLOSE>=VAR36,AMOUNT,DRAWNULL);
VAR80:=IF(CLOSE>=VAR36,VOL,DRAWNULL);
VAR81:=0.01*SUM(VAR79,VAR26)/SUM(VAR80,VAR26);
VAR82:=REFDATE(VAR81,DATE);
VAR83:=IF(VAR58,VAR5,0);
VAR84:=IF(VAR59,REF(VAR83,VAR59),VAR83);
VAR85:=CONST(VAR84);
VAR86:=REF(VAR84,VAR59+1);
VAR87:=CONST(VAR86);
VAR88:=REF(HIGH,VAR3)=HHV(HIGH,2*VAR3+1);
VAR89:=BACKSET(VAR88,VAR3+1);
VAR90:=FILTER(VAR89,VAR3) AND HIGH=HHV(HIGH,VAR3+1);
VAR91:=BARSLAST(VAR90);{www.fxjgsw.com}
NOTEXT上区成本:IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR81,VAR81)),DRAWNULL),DOTLINE,COLORRED;
VAR92:=IF(CLOSE<=VAR36,AMOUNT,DRAWNULL);
VAR93:=IF(CLOSE<=VAR36,VOL,DRAWNULL);
VAR94:=0.01*SUM(VAR92,VAR26)/SUM(VAR93,VAR26);
VAR95:=REFDATE(VAR94,DATE);
NOTEXT下区成本:IF(CURRBARSCOUNT<=CONST(VAR26+1),CONST(IF(1,VAR94,VAR94)),DRAWNULL),DOTLINE,COLORYELLOW;
VAR96:=100*VOL/(FINANCE(7)/100);
VAR97:=IF(CLOSE>=VAR60,VAR96,DRAWNULL);
VAR98:=CONST(INTPART(SUM(VAR97,VAR26)));
VB143:DRAWTEXT(CURRBARSCOUNT=CONST(13),VAR66,1),COLORLIGRAY;
VB144:DRAWNUMBER(CURRBARSCOUNT=CONST(6),VAR66*1.007,VAR98),COLORYELLOW;
VAR99:=IF(CLOSE<=VAR60 AND CLOSE>=VAR61,VAR96,DRAWNULL);
VAR100:=CONST(INTPART(SUM(VAR99,VAR26)));
VB148:DRAWTEXT(CURRBARSCOUNT=CONST(13),VAR70,2),COLORRED;
VB149:DRAWNUMBER(CURRBARSCOUNT=CONST(6),VAR70*1.007,VAR100),COLORYELLOW;
VAR101:=IF(CLOSE<=VAR61 AND CLOSE>=VAR62,VAR96,DRAWNULL);
VAR102:=CONST(INTPART(SUM(VAR101,VAR26)));
VB153:DRAWTEXT(CURRBARSCOUNT=CONST(13),VAR74,3),COLORMAGENTA;
VAR103:=IF(VAR90,VAR5,0);
VAR104:=IF(VAR91,REF(HIGH,VAR91),HIGH);
VAR105:=IF(VAR91,REF(VAR103,VAR91),VAR103);
VAR106:=REF(VAR104,VAR91+1);
VAR107:=CONST(VAR105);
VAR108:=REF(VAR105,VAR91+1);
VAR109:=CONST(VAR108);
VAR110:=REF(VAR106,VAR91+1);
VB154:DRAWNUMBER(CURRBARSCOUNT=CONST(6),VAR74*1.

地址


·上一软件：阿宾操盘V1 －－- 缠论画线机构操盘顶底分形版，和谐源码分享
·下一软件：牛B选股（通达信公式和谐源码分享 K线图）

软件评论评论内容只代表网友观点，与本站立场无关！

   评论摘要(共 0 条，得分 0 分，平均 0 分) 查看完整评论

说明

* 使用方法：点击上面蓝色块，打开新页面按照提示进行

* 本网站提供的各种股票软件，例如大智慧软件，通达信软件，同花顺软件，东方财富通等等，和各种股票公式指标，例如大智慧公式，通达信公式，同花顺公式，文华公式，博易大师公式，股票价格计算公式等等公式指标等，都来源网上公开来源收集

本网提供的公式文件说明：
* alg格式飞狐股票公式，可以用飞狐交易师或者交易师软件导入；
* fnc格式大智慧新一代公式指标，可以用大智慧股票软件使用，少部分可以用分析家股票软件引入使用；
* exp格式大智慧经典版股票公式，仅可以用大智慧经典版股票软件引入使用；
* tni和tnc格式通达信股票公式，仅可以用通达信新引入使用，例如可以用通达信股票软件引入使用；
* tne，tn6格式通达信公式，可以用通达信公式编辑器5.0版导入，推荐通达信金融终端版本；
* hxf格式同花顺股票公式，仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式，交易师公式或者飞狐公式的时候，发现公式名称栏是空白的，这时候调整电脑时间到1997年，又能出现公式名称，并且能正常显示，可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式，通达信公式，同花顺公式,操盘手公式,飞狐公式，博易大师公式，金字塔公式，文华公式和交易师公式等等公式的密码，本网可帮恢复源码，有.偿.服.务无意勿扰，点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码，一般都可以编辑成公式，如果不明白公式的编辑，在本页右侧教程录像可参考，或者找公式教程资料学习，请搜索：教程

* 如果您发现软件内容或者链接错误，请点击报告错误谢谢！
* 站内提供的所有软件包含源码均是由网上搜集，若侵犯了你的版权利益，请联系通知我们!

~

栏目导航

本类热门

相关软件

如何导入公式

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明：本站所有股票公式软件资料均网上公开收集，如侵权请联系删帖。站内所有广告，均与本站无关！
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间：1,500.00000 毫秒