分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：通达信十大股东副图指标 贴图

软件名称：[B]通达信十大股东副图指标 贴图[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：7.00 KB
官方主页：Home Page
更新时间：2017-01-27 02:46:27
软件简介:

{个股DDX}
DRAWRECTREL(0,0,998,998,RGB(0,0,10));
DRAWRECTREL(92,0,907,998,RGB(0,0,10));
DRAWRECTREL(182,0,816,998,RGB(0,0,10));
DRAWRECTREL(272,0,725,998,RGB(0,0,10));
DRAWRECTREL(362,0,634,998,RGB(0,0,10));
DRAWRECTREL(452,0,543,998,RGB(0,0,10));

DRAWRECTREL(0,200,998,200,RGB(255,255,0));
DRAWRECTREL(0,400,998,400,RGB(255,255,0));
DRAWRECTREL(0,600,998,600,RGB(255,255,0));
DRAWRECTREL(0,800,998,800,RGB(255,255,0));

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.03,0.03,0,'项 目'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.02,0.27,0,'持股数'),COLORGREEN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.02,0.46,0,'占流通股比'),COLORGREEN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.02,0.65,0,'股东性质'),COLORGREEN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.02,0.84,0,'增减情况'),COLORGREEN;

{DRAWGBK(C>0, RGB(0,0,10),RGB(0,0,10),0,'',0)};

SH:=FINANCE(1)/10000,NODRAW;
SH102:=SIGNALS_USER(102,1),COLORMAGENTA,NODRAW;
SH103:=SIGNALS_USER(103,1),COLORMAGENTA,NODRAW;
SH112:=SIGNALS_USER(112,1);
SH113:=SIGNALS_USER(113,1);
SH122:=SIGNALS_USER(122,1);
SH123:=SIGNALS_USER(123,1);{十大股东持股数量}
SH132:=SIGNALS_USER(132,1);
SH133:=SIGNALS_USER(133,1);{机构持仓持股数量}
SH142:=SIGNALS_USER(142,1);
SH143:=SIGNALS_USER(143,1);
SH152:=SIGNALS_USER(152,1);
SH153:=SIGNALS_USER(153,1);
SH162:=SIGNALS_USER(162,1);
SH163:=SIGNALS_USER(163,1);{前十大流通股东持股数量}
SH172:=SIGNALS_USER(172,1);
SH173:=SIGNALS_USER(173,1);{十大股东持股数量}
SH182:=SIGNALS_USER(182,1);
SH183:=SIGNALS_USER(183,1);{机构持仓持股数量}
SH192:=SIGNALS_USER(192,1);
SH193:=SIGNALS_USER(193,1);{十大股东持股数量}
CURR:=CURRBARSCOUNT;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.105,0.03,0,'★第一股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.105,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH102/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.105,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH103,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.105,0.65,0,EXTERNSTR(0,104)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.105,0.84,0,EXTERNSTR(0,105)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.197,0.03,0,'★第二股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.197,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH112/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.197,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH113,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.197,0.65,0,EXTERNSTR(0,114)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.197,0.84,0,EXTERNSTR(0,115)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.287,0.03,0,'★第三股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.287,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH122/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.287,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH123,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.287,0.65,0,EXTERNSTR(0,124)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.287,0.84,0,EXTERNSTR(0,125)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.377,0.03,0,'★第四股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.377,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH132/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.377,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH133,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.377,0.65,0,EXTERNSTR(0,134)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.377,0.84,0,EXTERNSTR(0,135)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.467,0.03,0,'★第五股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.467,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH142/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.467,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH143,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.467,0.65,0,EXTERNSTR(0,144)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.467,0.84,0,EXTERNSTR(0,145)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.56,0.03,0,'★第六股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.56,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH152/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.56,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH153,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.56,0.65,0,EXTERNSTR(0,154)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.56,0.84,0,EXTERNSTR(0,155)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.645,0.03,0,'★第七股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.645,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH162/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.645,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH163,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.645,0.65,0,EXTERNSTR(0,164)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.645,0.84,0,EXTERNSTR(0,165)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.738,0.03,0,'★第八股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.738,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH172/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.738,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH173,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.738,0.65,0,EXTERNSTR(0,174)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.738,0.84,0,EXTERNSTR(0,175)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.83,0.03,0,'★第九股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.83,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH182/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.83,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH183,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.83,0.65,0,EXTERNSTR(0,184)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.83,0.84,0,EXTERNSTR(0,185)),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.923,0.03,0,'★第十股东★'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.923,0.27,0,STRCAT(STRCAT(' ',CON2STR(SH192/10000000,1)),'（万手）')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.923,0.46,0,STRCAT(STRCAT(' ',CON2STR(SH193,1)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.923,0.65,0,EXTERNSTR(0,194)),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.923,0.84,0,EXTERNSTR(0,195)),COLORMAGENTA;

{参数设置}
AS:=SH103+SH113+SH123+SH133+SH143+SH153+SH163+SH173+SH183+SH193;
起点:=75;
均分:=起点/140;
{画柱状线}
{DRAWRECTREL(948,30,968,955,RGB(150,10,250));
DRAWRECTREL(918,115,938,955,RGB(150,10,250));
DRAWRECTREL(918,CONST(SH103/100*(955-0)),938,955,RGB(0,100,0));
DRAWRECTREL(948,CONST((AS-SH103)/100*(955-0)),968,955,RGB(0,100,0));
DRAWRECTREL(948,CONST((955-115)-SH102/100),968,955,RGB(0,100,0));
DRAWRECTREL(918,CONST((955-115)-SH112/FINANCE(1)),938,955,RGB(0,100,0));
DRAWRECTREL(888,CONST((955-115)-SH132/FINANCE(1)),908,955,RGB(0,100,0))};

{STICKLINE(CURR=起点-ROUND(92*均分),10.5,SH143+11,18,0),COLORFFFFFF;
STICKLINE(CURR=起点-ROUND(103*均分),10.5,SH133+11,18,0),COLORLIMAGENTA;
STICKLINE(CURR=起点-ROUND(114*均分),10.5,SH123+11,18,0),COLORLIMAGENTA;
STICKLINE(CURR=起点-ROUND(125*均分),10.5,SH113+11,18,0),COLOR18A4FF;
STICKLINE(CURR=起点-ROUND(136*均分),10.5,SH103+11,18,0),COLORFFFFFF;
STICKLINE(CURR=起点-ROUND(92*均分),10.5,SH193+11,18,0),COLOR00FF00;
STICKLINE(CURR=起点-ROUND(103*均分),10.5,SH183+11,18,0),COLOR00FF00;
STICKLINE(CURR=起点-ROUND(114*均分),10.5,SH173+11,18,0),COLOR00FF00;
STICKLINE(CURR=起点-ROUND(125*均分),10.5,SH163+11,18,0),COLOR00FF00;
STICKLINE(CURR=起点-ROUND(136*均分),10.5,SH153+11,18,0),COLOR880088};
{数字}
{DRAWNUMBER(CURR=起点-ROUND(61*均分),SH193+15,SH193),COLORRED;
DRAWNUMBER(CURR=起点-ROUND(70*均分),SH183+15,SH183),COLORRED;
DRAWNUMBER(CURR=起点-ROUND(78*均分),SH173+15,SH173),COLOR9732F6;
DRAWNUMBER(CURR=起点-ROUND(86*均分),SH163+15,SH163),COLORYELLOW;
DRAWNUMBER(CURR=起点-ROUND(84*均分),SH153+15,SH153),COLO
[url=http://www.70822.com/soft/sort013/sort05/down-107766.html]通达信十大股东副图指标 贴图[/url]

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