行业板块情况公式下载 飞狐情况行业指标 源码

指标公式详细说明

行业板块情况

调整参数可改变板块内横向比较的指标，更换对比的所属板块情况

主公式
{行业板块情况}
input:x(1,1,3),指定(2,1,15);
tt:=stktype=0 or stktype=13;
drawtext(barpos=sysparam(2)+5 and tt,c,'本公式不在指数中使用，请在个股中应用'),coloreeff,align4;
if tt then exit;
rq:=date;//取日期
{显示指定板块}
vb:=blkname;{所属板块提取}
vl:=strlen(vb);
if vl<4 then exit;
fs:=ceiling(vl/5),linethick;
m:=if(指定>fs,fs,指定);
n:=1;
variable:dt[fs]=0;
for i=1 to fs do begin
dt[i]:=strfind(vb,',',n);
n:=dt[i]+1;
end;
hy:=rtrim(ltrim(if(m=1,strleft(vb,dt[m]-1),strmid(vb,dt[m-1]+1,dt[m]-dt[m-1]-1))));
if fs>15 then bkt:=strleft(vb,dt[15]-1); else bkt:=vb;
drawtext(sysparam(2)=barpos,-0.5,' \n'+bkt),pxdn15,coloraaaaa0;
//drawtext(sysparam(2)=barpos,0,' \n \n所属第'+numtostr(m,0)+'个板块： '+hy),align4,colorgreen;
hys:=stkcount(hy);//板块股数量
dyzb:=if(x=1,'hqsj.zdf',if(x=2,'hqsj.hsh','hqsj.cc'));//选择引用指标
das:=datacount;
d0:=rq[das];//取最后日期
variable:dm[hys]='',vcp[hys]=0,vci[hys]=0,tp=0;
for k=1 to hys do begin
ddd:=stkfromblk(hy,k);// 取得板块成员代码
dm[k]:=ddd;
tmp:=stkindi(ddd,dyzb,0,6);
tmpd:=stkindi(ddd,'hqsj.dd',0,6);
vcp[k]:=tmp[das];
vci[k]:=if(tmpd[das]=d0,tmp[das],-1000);//去除当天停牌股
tp:=tp+if(vci[k]=-1000,1,0);
end;
px1:=sortpos(vci,1,1,hys);//降序排列
//px2:=sortpos(vcp,1,1,hys);
khys:=hys-tp,linethick;//板块实际开盘股票
今开盘数:khys,linethick;
bkxs:='所属行业: '+hy+' 包含个股数：'+numtostr(hys,0);
zf:=if(x=3,' 元',' %');
lbs:=if(x=3,'收盘价',if(x=1,'涨跌幅','换手率'));
drawtext(sysparam(2)=barpos,8,bkxs),colorffff00;
wz:=' ';kg:=' ';//intpart((sysparam(3)-sysparam(2))/6);
wz2:=strleft(wz,16);
if khys<2 then exit;
-2,color;
explain(1,lbs+'领先股'),colorff00;
explain(1,' ①'+stknameex(dm[vci[1]])+' '+numtostr(vcp[vci[1]],2)+zf),coloryellow;
explain(1,' ②'+stknameex(dm[vci[2]])+' '+numtostr(vcp[vci[2]],2)+zf),coloryellow;
drawtext(barpos=sysparam(2),5,lbs+'领先股：'),colorff00;
drawtext(barpos=sysparam(2),5,wz2+' ①'+stknameex(dm[vci[1]])+' '+strright(' '+numtostr(vcp[vci[1]],2),6)+zf+kg+' ②'+stknameex(dm[vci[2]])+' '+strright(' '+numtostr(vcp[vci[2]],2),6)+zf),coloryellow;
if khys<3 then exit;
explain(1,' ③'+stknameex(dm[vci[3]])+' '+numtostr(vcp[vci[3]],2)+zf),coloryellow;
drawtext(barpos=sysparam(2),5,wz+wz+' ③'+stknameex(dm[vci[3]])+' '+strright(' '+numtostr(vcp[vci[3]],2),6)+zf),coloryellow;
if khys<4 then exit;
explain(1,' ④'+stknameex(dm[vci[4]])+' '+numtostr(vcp[vci[4]],2)+zf),coloryellow;
drawtext(barpos=sysparam(2),5,wz+wz+wz2+' '+' ④'+stknameex(dm[vci[4]])+' '+strright(' '+numtostr(vcp[vci[4]],2),6)+zf),coloryellow;
if khys<6 then exit;
explain(1,lbs+'滞后股'),colorff00;
explain(1,' ①'+stknameex(dm[vci[khys]])+' '+numtostr(vcp[vci[khys]],2)+zf+' \n ②'+stknameex(dm[vci[khys-1]])+' '+numtostr(vcp[vci[khys-1]],2)+zf+' \n ③'+
stknameex(dm[vci[khys-2]])+' '+numtostr(vcp[vci[khys-2]],2)+zf+' \n ④'+stknameex(dm[vci[khys-3]])+' '+numtostr(vcp[vci[khys-3]],2)+zf),colorffff00;
drawtext(barpos=sysparam(2),2,lbs+'滞后股：'),colorff00;
drawtext(barpos=sysparam(2),2,wz2+' ①'+stknameex(dm[vci[khys]])+' '+strright(' '+numtostr(vcp[vci[khys]],2),6)+zf+kg+' ②'+stknameex(dm[vci[khys-1]])+' '+strright(' '+numtostr(vcp[vci[khys-1]],2),6)+zf+kg+' ③'+
stknameex(dm[vci[khys-2]])+' '+strright(' '+numtostr(vcp[vci[khys-2]],2),6)+zf+kg+' ④'+stknameex(dm[vci[khys-3]])+' '+strright(' '+numtostr(vcp[vci[khys-3]],2),6)+zf),colorffff00;
//
{参数精灵：
排序类别：param#1
1- 涨跌幅 2-换手率 3- 收盘价

引用公式：
{hqsj}
cc:close;hh:high;ll:low;oo:open;
dd:date;d0:ref(dd,1);tt:time;
zdf:(cc/ref(cc,1)-1)*100;
hsh:vol/if(capital>0,capital,sum(vol,120))*100;
前收:ref(cc,1);
ma5:ma(cc,5);ma10:ma(cc,10);
p:barpos,linethick;
hll:winner(close);
量:vol;额:amount;
ltp:capital,linethick;
hs:dynainfo(37);
ff:c>ma(c,30);
ss:openminutes(time);//分时开盘分钟数
rh:ref(hh,1);
涨:indexadv;
跌:indexdec;
//期货
if stktype=7 then 仓:openint;
//

指标公式下载地址

上一指标公式：见顶信号公式下载 飞狐见顶指标 源码

下一指标公式：版本-2011新春独家奉献最牛选股ALG格式有副图加密无限期使用无未来公式下载 飞狐指标 源码

相关飞狐公式推荐

指标公式下载注意

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

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

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

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

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

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

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

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

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

☉ 本文行业板块情况公式下载 飞狐情况行业指标 源码仅供学习研究。