st0:=f10find('★本栏包括【1.股本结构】【2.股本变化】【3.限售流通】【4.股改情况】',10);
drawtext(sysparam(2)+20=barpos and st0<=0,15,'本公式不适合该种f10资料。只适用于【港澳资讯】'),coloreeff;
if st0<=0 then exit;
bt1:=f10find('| 变更日期 ',st0),linethick;;
txend:=f10find('┘',bt1),linethick;;//
ttx:=f10text(bt1,txend-bt1);
bt2:=strfind(ttx,'流通a股',1);
bt3:=strfind(ttx,'实际流通a股',bt2);
t2:=bt2,linethick; t3:=bt3,linethick;
表头:=strmid(ttx,1,bt3+31)+'股本变动(%)'; sln:=strlen(ttx),linethick;
lns:=sln/(bt3+31);
variable:da[lns]:='',gb[lns]='';
nr:='';wzt:=1; ii:=0;
while wzt<sln-140 do begin
wzt:=strfind(ttx,'-',wzt+70);
ii:=ii+1;
tx:=strmid(ttx,wzt-6,72); ti:=strmid(ttx,wzt-4,10);
ltg:=strfind(tx,'.',t2); sjg:=strfind(tx,'.',t3);
da[ii]:=numtostr(strtonum(strmid(ti,1,4))-1900,0)+strmid(ti,6,2)+strmid(ti,9,2);
gb[ii]:=if(sjg>0,strmid(tx,sjg-8,11),strmid(tx,ltg-8,11));
nr:=nr+if(wzt<sln,tx+'('+numtostr(ii,0)+')'+'\n','');
end
drawtextex(barstatus=2,0,1,1,表头+'\n'+nr+'('+numtostr(ii,0)+')'),colorddfe;
ggb:=strtonum(gb[ii]);
for i=ii downto 1 do
ggb:=if(barpos>1 and ref(date,1)<strtonum(da) and date>=strtonum(da),strtonum(gb),ggb) ;
流通盘:hhv(ggb,0),color00ff00;
变动率:=(流通盘/ref(流通盘,1)-1)*100,linethick;
drawnumber(barpos>2 and 流通盘<>ref(流通盘,1),流通盘,变动率,1),pxup30,color00ff00,align2; //
股本转存:if(barpos=2 or 流通盘<>ref(流通盘,1),流通盘,0),linethick1;//让转存自定义数据清晰
{转存自定义数据公式名为: 实际流通股
读自定义数据公式
实际流通盘:hhv(selfdata('实际流通股'),0);{}
上一指标公式:江恩时间窗公式下载 飞狐江恩时间指标 源码
下一指标公式:顶底背离金叉公式下载 飞狐指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文实际流通股f10提取数据看看股本的变化和真实换手率过程副图公式下载 飞狐股本流通股指标 源码仅供学习研究。