分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
当前位置：分析家公式网 → 软件中心 → 股票公式 → 大智慧L2公式
【大智慧L2】板块涨幅排名（可排序 源码）
  • 软件大小：27.0 KB
  • 推荐星级：
  • 更新时间：2010-08-07 05:46:34
  • 软件类别： 国产软件 / 大智慧L2公式
  • 软件语言：简体中文
  • 授权方式： 共享软件
  • 联系方式：暂无联系方式
  • 官方主页： Home Page
  • 点击大图：  【一键转帖到论坛】
  • 插件情况：
  • 运行环境：Win2000/WinXP/Win2003/WinVista
  • 相关Tags：板块涨幅排名  
  • (7)70%
    (3)30%

软件介绍

今天无意间在网上看到涨幅排名的源码，觉得不错，贴出来大家看看
可以加到行情里据此排序
希望老师们改进让他更完美

如果侵犯了了网友的版权，站内短信请告知我，谢谢

先建立第一个公式，名称是：引用涨幅
A:DYNAINFO(14);

第二个公式：名称是：板块涨幅排名{只能是4个汉字，大智慧真垃圾}
x1:=15 ; x2:=210; x3:=405; x4:=600; x5:=800; x6:=850;  y1:=9; y2:=120; y3:=250; y4:=380; y5:=510; y6:=640; y7:=770; y8:=900;
IF STKINDI('1a0001','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(5,9,'上证：' +NUMTOSTRN(STKINDI('1a0001','引用涨幅.A')*100,2)+'%'),COLORRED;end;
IF STKINDI('1a0001','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(5,9,'上证：' +NUMTOSTRN(STKINDI('1a0001','引用涨幅.A')*100,2)+'%'),COLORGREEN;end;
IF STKINDI('993124','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(108,9,'深证：' +NUMTOSTRN(STKINDI('993124','引用涨幅.A')*100,2)+'%'),COLORRED;end;
IF STKINDI('993124','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(108,9,'深证：' +NUMTOSTRN(STKINDI('993124','引用涨幅.A')*100,2)+'%'),COLORGREEN;end;
IF STKINDI('991036','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y2,'991036 券    商：' +NUMTOSTRN(STKINDI('991036','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991036','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y2,'991036 券    商：' +NUMTOSTRN(STKINDI('991036','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991028','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y3,'991028 医    药：' +NUMTOSTRN(STKINDI('991028','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991028','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y3,'991028 医    药：' +NUMTOSTRN(STKINDI('991028','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991017','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y4,'991017 银 行 类：' +NUMTOSTRN(STKINDI('991017','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991017','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y4,'991017 银 行 类：' +NUMTOSTRN(STKINDI('991017','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991007','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y5,'991007 房 地 产：' +NUMTOSTRN(STKINDI('991007','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991007','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y5,'991007 房 地 产：' +NUMTOSTRN(STKINDI('991007','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991034','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y6,'991034 有色金属：' +NUMTOSTRN(STKINDI('991034','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991034','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y6,'991034 有色金属：' +NUMTOSTRN(STKINDI('991034','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991021','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y7,'991021 农林牧渔：' +NUMTOSTRN(STKINDI('991021','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991021','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y7,'991021 农林牧渔：' +NUMTOSTRN(STKINDI('991021','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991035','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x1,y8,'991035 造纸印刷：' +NUMTOSTRN(STKINDI('991035','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991035','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x1,y8,'991035 造纸印刷：' +NUMTOSTRN(STKINDI('991035','引用涨幅.A')*100,2)+'%'),colorb48c33;end;

IF STKINDI('991018','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y1,'991018 旅游酒店：' +NUMTOSTRN(STKINDI('991018','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991018','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y1,'991018 旅游酒店：' +NUMTOSTRN(STKINDI('991018','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991023','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y2,'991023 商业连锁：' +NUMTOSTRN(STKINDI('991023','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991023','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y2,'991023 商业连锁：' +NUMTOSTRN(STKINDI('991023','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991020','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y3,'991020 酿酒食品：' +NUMTOSTRN(STKINDI('991020','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991020','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y3,'991020 酿酒食品：' +NUMTOSTRN(STKINDI('991020','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991008','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y4,'991008 纺织服装：' +NUMTOSTRN(STKINDI('991008','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991008','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y4,'991008 纺织服装：' +NUMTOSTRN(STKINDI('991008','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991006','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y5,'991006 电子信息：' +NUMTOSTRN(STKINDI('991006','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991006','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y5,'991006 电子信息：' +NUMTOSTRN(STKINDI('991006','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991004','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y6,'991004 计 算 机：' +NUMTOSTRN(STKINDI('991004','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991004','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y6,'991004 计 算 机：' +NUMTOSTRN(STKINDI('991004','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991026','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y7,'991026 汽 车 类：' +NUMTOSTRN(STKINDI('991026','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991026','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y7,'991026 汽 车 类：' +NUMTOSTRN(STKINDI('991026','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991014','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x2,y8,'991014 电    器：' +NUMTOSTRN(STKINDI('991014','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991014','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x2,y8,'991014 电   器：' +NUMTOSTRN(STKINDI('991014','引用涨幅.A')*100,2)+'%'),colorb48c33;end;

IF STKINDI('993745','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x3,y1,'993745 稀缺zi源：' +NUMTOSTRN(STKINDI('993745','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('993745','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x3,y1,'993745 稀缺zi源：' +NUMTOSTRN(STKINDI('993745','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991019','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x3,y2,'991019 煤炭石油：' +NUMTOSTRN(STKINDI('991019','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991019','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x3,y2,'991019 煤炭石油：' +NUMTOSTRN(STKINDI('991019','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991009','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x3,y3,'991009 钢    铁：' +NUMTOSTRN(STKINDI('991009','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991009','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x3,y3,'991009 钢    铁：' +NUMTOSTRN(STKINDI('991009','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991024','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x3,y4,'991024 建    材：' +NUMTOSTRN(STKINDI('991024','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991024','引用涨幅.A')*100<0 THEN BEGIN DRAWTEXTREL(x3,y4,'991024 建    材：' +NUMTOSTRN(STKINDI('991024','引用涨幅.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI('991027','引用涨幅.A')*100>=0 THEN BEGIN DRAWTEXTREL(x3,y5,'991027 机    械：' +NUMTOSTRN(STKINDI('991027','引用涨幅.A')*100,2)+'%'),COLOR7711EE;end;
IF STKINDI('991027','引用涨幅.A')*100<

地址


·上一软件：分时指标 自用资金流量 开盘抓强股（源码 附图）
·下一软件：通达信副图指标:牛熊骨头炖（源码）

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

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

说明

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

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

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

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

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

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

~

栏目导航

本类热门

相关软件

如何导入公式

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