分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
领涨板块及个股排序-飞狐精品
  • 软件大小:6.00 KB
  • 推荐星级:
  • 更新时间:2009-09-26 16:52:41
  • 软件类别: 国产软件 / 飞狐公式
  • 软件语言:简体中文
  • 授权方式: 免费版
  • 联系方式:暂无联系方式
  • 官方主页: Home Page
  • 点击大图:  【一键转帖到论坛】
  • 插件情况:
  • 运行环境:Win9X/Win2000/WinXP/Win2003/
  • 相关Tags:指标公式 股票软件,公式源码
  • (3)60%
    (2)40%

软件介绍

国庆送大礼,祝同学们一路凯歌168、168、16888!!!

领涨板块及个股排序

领涨板块及个股排序---飞狐副图,引用网友bajatje(懒汉)及网友1949提供的指标,谢谢懒汉及1949网友
1.板块指数需盘中浏览、刷新之后,显示的结果才是正确的。
2.指标公式运行错误,最根本的原因可能是找不到板块名称、板块指数或自选股数量少于9个。

{//涨幅引用xx
HH:HIGH;LL:LOW;CC:CLOSE;
A0:DYNAINFO(14)*100;
DD:DATE;
ZDF:(CC/REF(CC,1)-1)*100;
HSH:VOL/IF(CAPITAL>0,CAPITAL,SUM(VOL,120))*100;
//}
{先单独建立上面指标名为"涨幅引用xx"的指标,再建下列指标}
///////////////////////////////////////////////////////////


{领涨板块及个股排序---飞狐副图,引用网友bajatje(懒汉)及网友1949提供的指标,谢谢懒汉及1949网友}
//////////////////////////////////////////////////////////
{当前个股所在板块内个股排序,引用网友bajatje(懒汉)提供的指标,谢谢懒汉网友}
INPUT:X(1,1,3);
RQ:=DATE;//取日期
A:=BLKNAME;
HY:=IF(STRFIND(A,',',1)>0,STRLEFT(A,STRFIND(A,',',1)-1),A);//DRAWTEXT(BARPOS=SYSPARAM(2),2,HY);
HYs:=STKCOUNT(HY);
DYZB:=IF(X=1,'涨幅引用xx.ZDF',IF(X=2,'涨幅引用xx.HSH','涨幅引用xx.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,'涨幅引用xx.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);
KHYS:=HYS-TP,LINETHICK;
BKXS:='当前股所属行业: '+HY+'   包含个股数:'+NUMTOSTR(HYs,0);
ZF:=IF(X=3,' 元',' %');
LBS:=IF(X=3,'收盘价',IF(X=1,'涨跌幅','换手率'));
DRAWTEXT(SYSPARAM(2)=BARPOS,h,BKXS),colorAFFF,ALIGN4;

WZ:=INTPART((SYSPARAM(3)-SYSPARAM(2))/10);
HST:=' \n\n';
kg:='         ';
//
IF KHYS<2 THEN EXIT;
COL1:=HST+kg+' ①'+STKNAMEEX(DM[vci[1]])+' '+numtostr(vcp[vci[1]],2)+ZF+
  ' ②'+STKNAMEEX(DM[vci[2]])+' '+numtostr(vcp[vci[2]],2)+ZF+
  IF(KHYS>3,' ③'+STKNAMEEX(DM[vci[3]])+' '+numtostr(vcp[vci[3]],2)+ZF,'')+
  IF(KHYS>4,' ④'+STKNAMEEX(DM[vci[4]])+' '+numtostr(vcp[vci[4]],2)+ZF+' ⑤'+STKNAMEEX(DM[vci[5]])+' '+numtostr(vcp[vci[5]],2)+ZF+'\n'+kg
+' ⑥'+STKNAMEEX(DM[vci[6]])+' '+numtostr(vcp[vci[6]],2)+ZF+' ⑦'+STKNAMEEX(DM[vci[7]])+' '+numtostr(vcp[vci[7]],2)+ZF
+' ⑧'+STKNAMEEX(DM[vci[8]])+' '+numtostr(vcp[vci[8]],2)+ZF+' ⑨'+STKNAMEEX(DM[vci[9]])+' '+numtostr(vcp[vci[9]],2)+ZF
+' ⑩'+STKNAMEEX(DM[vci[10]])+' '+numtostr(vcp[vci[10]],2)+ZF,'');//领先股
COL2:=HST+HST+kg+IF(KHYS>6,' ①'+STKNAMEEX(DM[vci[KHYs]])+' '+numtostr(vcp[vci[KHYs]],2)+ZF+
  ' ②'+STKNAMEEX(DM[vci[KHYs-1]])+' '+numtostr(vcp[vci[KHYs-1]],2)+ZF+
  ' ③'+STKNAMEEX(DM[vci[KHYs-2]])+' '+numtostr(vcp[vci[KHYs-2]],2)+ZF+
  ' ④'+STKNAMEEX(DM[vci[KHYs-3]])+' '+numtostr(vcp[vci[KHYs-3]],2)+ZF+
  ' ⑤'+STKNAMEEX(DM[vci[KHYs-4]])+' '+numtostr(vcp[vci[KHYs-4]],2)+ZF+'\n'+kg+
  ' ⑥'+STKNAMEEX(DM[vci[KHYs-5]])+' '+numtostr(vcp[vci[KHYs-5]],2)+ZF+
  ' ⑦'+STKNAMEEX(DM[vci[KHYs-6]])+' '+numtostr(vcp[vci[KHYs-6]],2)+ZF+
  ' ⑧'+STKNAMEEX(DM[vci[KHYs-7]])+' '+numtostr(vcp[vci[KHYs-7]],2)+ZF+
  ' ⑨'+STKNAMEEX(DM[vci[KHYs-8]])+' '+numtostr(vcp[vci[KHYs-8]],2)+ZF+
  ' ⑩'+STKNAMEEX(DM[vci[KHYs-9]])+' '+numtostr(vcp[vci[KHYs-9]],2)+ZF,'');//滞后股

DRAWTEXT(BARPOS=SYSPARAM(2),h,HST+'领先股:'),COLORred,ALIGN4;
DRAWTEXT(BARPOS=SYSPARAM(2),h,COL1),Colorred,ALIGN4;
DRAWTEXT(BARPOS=SYSPARAM(2),h,HST+HST+HST+'滞后股:'),COLORFF00,ALIGN4;
DRAWTEXT(BARPOS=SYSPARAM(2),h,HST+COL2
+'\n'+'*********************************************************************************************************************************'),COLORFFFF00,ALIGN4;

//////////////////////////////////////////////////////////////

{指定板块内个股排序,引用网友bajatje(懒汉)提供的指标,谢谢懒汉网友}
bk:='自选股'; //可任意指定版块,板块内个股数需大于9个
stksum:=STKCOUNT(bk);dcount:=DATACOUNT;yygs4:='涨幅引用xx.A0';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
    dn:=stkfromblk(bk,k);
    dmstr[k]:=dn;
    temp1:=stkindi(dn,yygs4,0,-1);
    var_px[k]:=temp1[dcount];
    var_indi[k]:=temp1[dcount];
end;
Num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3];dm_max4:=var_indi[4];
dm_max5:=var_indi[5];dm_max6:=var_indi[6];dm_max7:=var_indi[7];dm_max8:=var_indi[8];
max1:=var_px[dm_max1];max2:=var_px[dm_max2];max3:=var_px[dm_max3];
max4:=var_px[dm_max4];max5:=var_px[dm_max5];max6:=var_px[dm_max6];max7:=var_px[dm_max7];
max8:=var_px[dm_max8];
DRAWTEXT(BARPOS=SYSPARAM(2),100,hst+hst+hst+hst+hst+hst+'自选前排序%'+'['+STKNAMEEX(dmstr[dm_max1])+''+NUMTOSTR(max1,2)
                  +']['+STKNAMEEX(dmstr[dm_max2])+''+NUMTOSTR(max2,2)
                  +']['+STKNAMEEX(dmstr[dm_max3])+''+NUMTOSTR(max3,2)
                  +']['+STKNAMEEX(dmstr[dm_max4])+''+NUMTOSTR(max4,2)
                  +']['+STKNAMEEX(dmstr[dm_max5])+''+NUMTOSTR(max5,2)
                  +']['+STKNAMEEX(dmstr[dm_max6])+''+NUMTOSTR(max6,2)
                  +']['+STKNAMEEX(dmstr[dm_max7])+''+NUMTOSTR(max7,2)
                  +']['+STKNAMEEX(dmstr[dm_max8])+''+NUMTOSTR(max8,2)
                  +']'),ColorFF99ff,align4;
yygs5:='涨幅引用xx.A0';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
    dn:=stkfromblk(bk,k);
    dmstr[k]:=dn;
    temp1:=stkindi(dn,yygs5,0,-1);
    var_px[k]:=temp1[dcount];
    var_indi[k]:=temp1[dcount];
end;
Num1:=sortpos(var_indi,0,1,stksum);
dm_max1:=var_indi[1];dm_max2:=var_indi[2];dm_max3:=var_indi[3];dm_max4:=var_indi[4];
dm_max5:=var_indi[5];dm_max6:=var_indi[6];dm_max7:=var_indi[7];dm_max8:=var_indi[8];
max1:=var_px[dm_max1];max2:=var_px[dm_max2];max3:=var_px[dm_max3];
max4:=var_px[dm_max4];max5:=var_px[dm_max5];max6:=var_px[dm_max6];max7:=var_px[dm_max7];
max8:=var_px[dm_max8];
DRAWTEXT(BARPOS=SYSPARAM(2),h,hst+hst+hst+hst+hst+hst+hst+'自选后排序%'+'['+STKNAMEEX(dmstr[dm_max1])+''+NUMTOSTR(max1,2)
                                +']['+STKNAMEEX(dmstr[dm_max2])+''+NU

地址


软件评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

说明

* 使用方法:点击上面蓝色块,打开新页面按照提示进行

* 本网站提供的各种股票软件,例如大智慧软件,通达信软件,同花顺软件,东方财富通等等,和各种股票公式指标,例如大智慧公式,通达信公式,同花顺公式,文华公式,博易大师公式,股票价格计算公式等等公式指标等,都来源网上公开来源收集

本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程

* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间:5,812.01200 毫秒