指标功能：[B]国产软件[/B]
指标类型：简体中文
所需积分：0
推荐星级：
授权方式：共享版
公式大小：0 Bytes
更新时间：2017-09-10 22:00:00
公式简介:

提取大智慧F10主要数据——业绩预测，各期股东人数等数据显示，

F10摘要
｛--大智慧F10提取与显示｝
A1:=F10FIND('●',F10FIND('◆ 八面来风 ◆',1));
DRAWTEXTABS(5,0,'八面来风 '+F10TEXT(A1,0)),COLORGREEN;
B1:=F10FIND('●',F10FIND('◆ 公司公告 ◆',1));
DRAWTEXTABS(5,15,'公司公告 '+F10TEXT(B1,0)),COLORGREEN;
C1:=F10FIND('●',F10FIND('◆研报摘要◆',1));
C2:=F10FIND('◆同行业研报摘要◆',1);
C3:=IF(C1-C2<0,C1,C2-80);
DRAWTEXTABS(5,30,'研报摘要 '+F10TEXT(C3,0)),COLORGREEN;
D1:=F10FIND('●',F10FIND('◆ 行业新闻 ◆',1));
DRAWTEXTABS(5,45,'行业新闻 '+F10TEXT(D1,0)),COLORGREEN;
E1:=F10FIND(STKLABEL,F10FIND('净资产收 排名',F10FIND('◆ 行业地位 ◆',1)));
E2:=F10FIND('截止日期:',F10FIND('◆ 行业地位 ◆',1));
E3:=F10FIND('证监会行业',F10FIND('◆ 行业地位 ◆',1));
E4:=F10FIND('共',F10FIND('证监会行业',F10FIND('◆ 行业地位 ◆',1)));
DRAWTEXTABS(5,60,'行业地位 ●'+F10TEXT(E2+9,0)+' 净资产收益率-排名 '+STRRIGHT(F10TEXT(E1,0),4)+' '+F10TEXT(E4,E2-E4-1)+' '+F10TEXT(E3,E4-E3)),COLORGREEN;
F1:=F10FIND('预测PEG',F10FIND('◆ 盈利预测 ◆',1));
PEG1:=STRTONUM(F10TEXT(F1+63,4));
F2:=F10FIND('净利润环比增长(%)',F10FIND('◆ 季度财务状况 ◆',1));
F3:=STRTONUM(STRMID(F10TEXT(F2,0),28,8));{净利润环比};
F4:=F10FIND('两年复合增长率',F10FIND('◆ 盈利预测 ◆',1));
F5:=STRTONUM(F10TEXT(F4+60,7));{两年复合增长率}
G1:=F10FIND('【',F10FIND(' 【重大事项】',1));
DRAWTEXTABS(5,90,'重大事项 '+F10TEXT(G1,0)),COLORGREEN;
I1:=F10FIND(' 【',F10FIND('【业绩预告】',1));

J1:=F10FIND('【',F10FIND('【重大事项】',1));
DRAWTEXTABS(10,165,'重大事项 '+F10TEXT(J1,0)),COLORGREEN;
K1:=F10FIND('【',F10FIND(' 【增发配股】',1));
DRAWTEXTABS(10,180,'增发配股 '+F10TEXT(K1,0)),COLORGREEN;
L1:=F10FIND('【',F10FIND(' 【增持&减持】',1));
DRAWTEXTABS(10,195,'增持&减持 '+F10TEXT(L1,0)),COLORGREEN;
M1:=F10FIND('【',F10FIND(' 【投资项目】',1));
DRAWTEXTABS(10,210,'投资项目 '+F10TEXT(M1,0)),COLORGREEN;
N1:=F10FIND('【',F10FIND(' 【股权激励】',1));
DRAWTEXTABS(10,225,'股权激励 '+F10TEXT(N1,0)),COLORGREEN;

一四业绩:SELFDATA('2014业绩预测' ),LINETHICK0;
一五业绩:SELFDATA('2015业绩预测' ),LINETHICK0;
一六业绩:SELFDATA('2016业绩预测' ),LINETHICK0;
一七业绩:SELFDATA('2017业绩预测' ),LINETHICK0;
一八业绩:SELFDATA('2018业绩预测' ),LINETHICK0;
一五市盈率:C/SELFDATA('2015业绩预测' ),LINETHICK0;
一六市盈率:C/SELFDATA('2016业绩预测' ),LINETHICK0;
一七市盈率:C/SELFDATA('2017业绩预测' ),LINETHICK0;
两年复合增长率:(SQRT((一七业绩/一六业绩)*(一六业绩/一五业绩) )-1)*100;

PEG:一七市盈率/两年复合增长率,LINETHICK0;


起始位置:=F10FIND('◆ 盈利预测(元) ◆',1);
终点位置1a:=F10FIND('16A',起始位置);
终点位置2a:=F10FIND('每股收益',起始位置);
终点位置3a:=F10FIND('净利润同比(%)',起始位置);
终点位置:=F10FIND('◆投资评级◆',起始位置);
DRAWTEXTabs(210,105,F10TEXT(终点位置1a,终点位置1a+35)),coloryellow;
DRAWTEXTabs(10,120,F10TEXT(终点位置2a,终点位置-起始位置-25)),coloryellow;
DRAWTEXTabs(10,135,F10TEXT(终点位置3a,终点位置-起始位置-25)),coloryellow;


起始位置1:=F10FIND('◆控盘情况◆',1);
终点位置4a:=F10FIND('2017-08-31',起始位置1);
终点位置5a:=F10FIND('股东人数 (户)',起始位置1);
终点位置6a:=F10FIND('人均持流通股(股)',起始位置1);
终点位置:=F10FIND('◆概念题材◆',起始位置1);

DRAWTEXTabs(150,255,F10TEXT(终点位置4a,终点位置4a+35)),coloryellow;
DRAWTEXTabs(10,270,F10TEXT(终点位置5a,终点位置-起始位置1-25)),coloryellow;
DRAWTEXTabs(10,295,F10TEXT(终点位置6a,终点位置-起始位置1-25)),coloryellow;

一七二季股东数:SELFDATA('2017二季股东人数' ),LINETHICK0,coloryellow;
一七一季股东数:SELFDATA('2017一季股东人数' ),LINETHICK0,colorcyan;
二季股东增减率:(一七二季股东数-一七一季股东数)/一七一季股东数*100,LINETHICK0;
一七八月底股东:SELFDATA('2017八月三十一股东人数' ),LINETHICK0,colorcyan;
八月底变动率:(一七八月底股东-一七二季股东数)/一七二季股东数*100,LINETHICK0;

DRAWTEXTABS(640,170,'■17二季股东人数:'+一七二季股东数+'人'),ColorAAEEEE,LINETHICK4;
DRAWTEXTABS(960,170,'■17二季股东增减率:'+二季股东增减率+'%'),ColorAAEEEE,LINETHICK4;
DRAWTEXTABS(960,200,'■17八月底股东增减率:'+八月底变动率+'%'),ColorAAEEEE,LINETHICK4;
DRAWTEXTABS(640,200,'■17八月底股东人数:'+一七八月底股东+'人'),ColorAAEEEE,LINETHICK4;

 

[url=http://www.goodgupiao.com/gupiaogongshi/46185.html][B]提取大智慧F10主要数据股东人数等数据副图公式[/B][/url]