历年持股公式 飞狐历年源码指标 源码

指标公式详细说明

公式如下：
流通盘: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)))));
drawtext(sysparam(2)+20=barpos and f10=0,15,'本公式不适合该种f10资料。'),coloreeff;
if f10=0 then exit;
qsw:=if(f10=2,f10find('【1:主力运作】',100),if(f10=3,f10find('控盘情况:',1),if(f10=4,f10find('（三）历年人均持股情况',1),if(f10=5,f10find('【1.机构持股汇总】 ',1000),f10find('◆ 控盘情况 ◆',100)))));
qsw:=if(f10=5,f10find('【2.股东户数',qsw),qsw);

gdstar:=f10find(if(not(f10=4),'户均持股','人均持股'),qsw);{从qsw开始，查找字符串"a股人均持"}
if gdstar<0 then exit;
ls:=if(f10=2,28,if(f10=5,30,41));
variable:dh[35]=0,dd[35]=0,hh[35]=0;
dh[1]:=f10find('-',gdstar)-4;{从gdstar+100字节开始，查找字符串"200"}
dd[1]:=strtonum(strright(f10text(dh[1],10),8)-'-')+1000000;hh[1]:=strtonum(ltrim(f10text(dh[1]+ls,10))),linethick;
dhw:=f10find(if(not(f10=4),'└','┴'),dh[1]+500);//尾部位置

{取对应的数据资料的字符串，并转换字符串为数值}
ls:=if(f10=5,26,ls);
for i=2 to 35 do begin
dh:=f10find(if(f10=2,'│','-'),dh[i-1]+74);
if dh>dhw then break;
dd:=strtonum(strright(f10text(dh+if(f10=2,2,-4),10),8)-'-');
dd:=dd+if(dd<900000,1000000,0);
hh:=strtonum(ltrim(f10text(dh+ls,10)));
if hh>0 then wt:=min(hh,hh[i-1]);
end;

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;

户均持股: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],wt)))))))))))))))))))))))))))))))))),colorff00ff;

//if(date<dd[27] and date>=dd[28] and hh[28]>0,hh[28],wt)))))))))))))))))))))))))))),colorff00ff;

指标公式下载地址

上一指标公式：买股步骤公式 飞狐步骤指标 源码

下一指标公式：北斗七星超盘软件天玑星天枢星天璇星玉衡星天权星开阳星摇光星公式 飞狐北斗天玑指标 源码

相关飞狐公式推荐

指标公式下载注意

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

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

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

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

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

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

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

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

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

☉ 本文历年持股公式 飞狐历年源码指标 源码仅供学习研究。