历年股东数—适用于港澳资讯F10公式下载 飞狐历年股东指标 源码

指标公式详细说明

{历年股东数—适用于港澳资讯f10}
流通盘:capital/100,linethick;
//确定f10种类
f10:=if(f10find('万国测评制作',1)>0,1,if(f10find('wind资讯就是',1)>0,2,if(f10find('聚源数据',1)>0,3,if(f10find('◇ 港澳资讯',1)>0,4,if(f10find('维赛特',1)>0,5,0))))),linethick;
if not(f10=4) then begin
drawtext(sysparam(2)+20=barpos,15,'本公式不适合该种f10资料。'),coloreeff;
exit;
end;
//f10数据查找
qsw:=f10find('【2.股东户数',f10find('【2.股东户数',100)+30);
dhw:=f10find('【3.机构持股明细】',qsw+200);//尾部位置
gdstar:=f10find('股东户数',qsw);{从qsw开始，查找字符串"股东户数"}
if gdstar<0 then exit;
hk:=72;//表格行宽
hs:=36;//设定最大计算行数
ls:=16;
variable:dh[hs]=0,dd[hs]=0,hh[hs]=0;
{取对应的数据资料的字符串，并转换字符串为数值}
for i=1 to hs do begin
dh[i]:=f10find('-',if(i=1,gdstar,dh[i-1]+hk))-4;
if dh[i]>dhw then break;
dd[i]:=strtonum(strright(f10text(dh[i],10),8)-'-');
dd[i]:=dd[i]+if(dd[i]<900000,1000000,0);
hh[i]:=strtonum(ltrim(f10text(dh[i]+ls,12)));
if hh[i]>0 then wt:=min(hh[i],hh[i-1]);
end;
股东户数:if(date>=dd[1],hh[1],if(date<dd[1] and date>=dd[2],hh[2],if(date<dd[2] and date>=dd[3],hh[3],
if(date<dd[3] and date>=dd[4],hh[4],if(date<dd[4] and date>=dd[5],hh[5],if(date<dd[5] and date>=dd[6],hh[6],
if(date<dd[6] and date>=dd[7] and hh[7]>0,hh[7],if(date<dd[7] and date>=dd[8] and hh[8]>0,hh[8],if(date<dd[8] and date>=dd[9] and hh[9]>0,hh[9],
if(date<dd[9] and date>=dd[10] and hh[10]>0,hh[10],if(date<dd[10] and date>=dd[11] and hh[11]>0,hh[11],if(date<dd[11] and date>=dd[12] and hh[12]>0,hh[12],
if(date<dd[12] and date>=dd[13] and hh[13]>0,hh[13],if(date<dd[13] and date>=dd[14] and hh[14]>0,hh[14],if(date<dd[14] and date>=dd[15] and hh[15]>0,hh[15],
if(date<dd[15] and date>=dd[16] and hh[16]>0,hh[16],if(date<dd[16] and date>=dd[17] and hh[17]>0,hh[17],if(date<dd[17] and date>=dd[18] and hh[18]>0,hh[18],
if(date<dd[18] and date>=dd[19] and hh[19]>0,hh[19],if(date<dd[19] and date>=dd[20] and hh[20]>0,hh[20],if(date<dd[20] and date>=dd[21] and hh[21]>0,hh[21],
if(date<dd[21] and date>=dd[22] and hh[22]>0,hh[22],if(date<dd[22] and date>=dd[23] and hh[23]>0,hh[23],if(date<dd[23] and date>=dd[24] and hh[24]>0,hh[24],
if(date<dd[24] and date>=dd[25] and hh[25]>0,hh[25],if(date<dd[25] and date>=dd[26] and hh[26]>0,hh[26],if(date<dd[26] and date>=dd[27] and hh[27]>0,hh[27],
if(date<dd[27] and date>=dd[28] and hh[28]>0,hh[28],if(date<dd[28] and date>=dd[29] and hh[29]>0,hh[29],if(date<dd[29] and date>=dd[30] and hh[30]>0,hh[30],
if(date<dd[30] and date>=dd[31] and hh[31]>0,hh[31],if(date<dd[31] and date>=dd[32] and hh[32]>0,hh[32],if(date<dd[32] and date>=dd[33] and hh[33]>0,hh[33],
if(date<dd[33] and date>=dd[34] and hh[34]>0,hh[34],if(date<dd[34] and date>=dd[35] and hh[35]>0,hh[35],if(date<dd[35] and date>=dd[36] and hh[36]>0,hh[36],
wt)))))))))))))))))))))))))))))))))))),colorffddaa;
股东±%:(hh[1]/hh[2]-1)*100,linethick;
drawnumber(cross(date,dd[1]) and dh[1]<dhw,hh[1],hh[1],0),colorffff;
drawnumber(cross(date,dd[2]) and dh[2]<dhw,hh[2],hh[2],0),colorff00;
drawnumber(cross(date,dd[3]) and dh[3]<dhw,hh[3],hh[3],0),colorffff;
drawnumber(cross(date,dd[4]) and dh[4]<dhw,hh[4],hh[4],0),colorff00;
drawnumber(cross(date,dd[5]) and dh[5]<dhw,hh[5],hh[5],0),colorffff;
drawnumber(cross(date,dd[6]) and dh[6]<dhw,hh[6],hh[6],0),colorff00;
drawnumber(cross(date,dd[7]) and dh[7]>0,hh[7],hh[7],0),colorffff;
drawnumber(cross(date,dd[8]) and dh[8]>0,hh[8],hh[8],0),colorff00;
drawnumber(cross(date,dd[9]) and dh[9]>0,hh[9],hh[9],0),colorffff;
drawnumber(cross(date,dd[10]) and dh[10]>0,hh[10],hh[10],0),colorff00;
drawnumber(cross(date,dd[11]) and dh[11]>0,hh[11],hh[11],0),colorffff;
drawnumber(cross(date,dd[12]) and dh[12]>0,hh[12],hh[12],0),colorff00;
drawnumber(cross(date,dd[13]) and dh[13]>0,hh[13],hh[13],0),colorffff;
drawnumber(cross(date,dd[14]) and dh[14]>0,hh[14],hh[14],0),colorff00;
drawnumber(cross(date,dd[15]) and dh[15]>0,hh[15],hh[15],0),colorffff;
drawnumber(cross(date,dd[16]) and dh[16]>0,hh[16],hh[16],0),colorff00;
drawnumber(cross(date,dd[17]) and dh[17]>0,hh[17],hh[17],0),colorffff;
drawnumber(cross(date,dd[18]) and dh[18]>0,hh[18],hh[18],0),colorff00;
drawnumber(cross(date,dd[19]) and dh[19]>0,hh[19],hh[19],0),colorffff;
drawnumber(cross(date,dd[20]) and dh[20]>0,hh[20],hh[20],0),colorff00;
drawnumber(cross(date,dd[21]) and dh[21]>0,hh[21],hh[21],0),colorffff;
drawnumber(cross(date,dd[22]) and dh[22]>0,hh[22],hh[22],0),colorff00;
drawnumber(cross(date,dd[23]) and dh[23]>0,hh[23],hh[23],0),colorffff;
drawnumber(cross(date,dd[24]) and dh[24]>0,hh[24],hh[24],0),colorff00;
drawnumber(cross(date,dd[25]) and dh[25]>0,hh[25],hh[25],0),colorffff;
drawnumber(cross(date,dd[26]) and dh[26]>0,hh[26],hh[26],0),colorff00;
drawnumber(cross(date,dd[27]) and dh[27]>0,hh[27],hh[27],0),colorffff;
drawnumber(cross(date,dd[28]) and dh[28]>0,hh[28],hh[28],0),colorff00;
drawnumber(cross(date,dd[29]) and dh[29]>0,hh[29],hh[29],0),colorffff;
drawnumber(cross(date,dd[30]) and dh[30]>0,hh[30],hh[30],0),colorff00;
drawnumber(cross(date,dd[31]) and dh[31]>0,hh[31],hh[31],0),colorffff;
drawnumber(cross(date,dd[32]) and dh[32]>0,hh[32],hh[32],0),colorff00;
drawnumber(cross(date,dd[33]) and dh[33]>0,hh[33],hh[33],0),colorffff;
drawnumber(cross(date,dd[34]) and dh[34]>0,hh[34],hh[34],0),colorff00;
drawnumber(cross(date,dd[35]) and dh[35]>0,hh[35],hh[35],0),colorffff;
drawnumber(cross(date,dd[36]) and dh[36]>0,hh[36],hh[36],0),colorff00;
//

指标公式下载地址

上一指标公式：趋势画线主图公式下载 飞狐趋势画线指标 源码

下一指标公式：龙头排序公式下载 飞狐龙头指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文历年股东数—适用于港澳资讯F10公式下载 飞狐历年股东指标 源码仅供学习研究。