大智慧板块涨幅副图指标
源码
x1:=15 ; x2:=180; x3:=350; x4:=520; x5:=680; x6:=850;
DRAWTEXTREL(5,9,’上证：’+NUMTOSTRN(STKINDI(‘1a0001′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;
DRAWTEXTREL(80,9,’深：’+NUMTOSTRN(STKINDI(‘993124′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;
IF STKINDI(‘991036′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y2,’券
IF STKINDI(‘991036′,’涨幅引用.A’)*100 商：
IF STKINDI(‘991028′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y3,’医
IF STKINDI(‘991028′,’涨幅引用.A’)*100 药：
IF STKINDI(‘991017′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y4,’银行类：
IF STKINDI(‘991017′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991017′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991007′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y5,’房地产：
IF STKINDI(‘991007′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991007′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991034′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y6,’有色金属：
IF STKINDI(‘991034′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991034′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991021′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y7,’农林牧渔：
IF STKINDI(‘991021′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991021′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991035′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y8,’造纸印刷：
IF STKINDI(‘991035′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991035′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991018′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y1,’旅游酒店：
IF STKINDI(‘991018′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991018′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991023′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y2,’商业连锁：
IF STKINDI(‘991023′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991023′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991020′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y3,’酿酒食品：
IF STKINDI(‘991020′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991020′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991008′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y4,’纺织服装：
IF STKINDI(‘991008′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991008′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991006′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y5,’电子信息：
IF STKINDI(‘991006′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991006′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991004′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y6,’计算机：
IF STKINDI(‘991004′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991004′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991026′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y7,’汽车类：
IF STKINDI(‘991026′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991026′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991014′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y8,’电
IF STKINDI(‘991014′,’涨幅引用.A’)*100 器：
IF STKINDI(‘993745′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y1,’稀缺资源：
IF STKINDI(‘993745′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘993745′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991019′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y2,’煤炭石油：
IF STKINDI(‘991019′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991019′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991009′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y3,’钢
IF STKINDI(‘991009′,’涨幅引用.A’)*100 铁：
IF STKINDI(‘991024′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y4,’建
IF STKINDI(‘991024′,’涨幅引用.A’)*100 材：
IF STKINDI(‘991027′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y5,’机
IF STKINDI(‘991027′,’涨幅引用.A’)*100 械：
IF STKINDI(‘991011′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y6,’化工化纤：
IF STKINDI(‘991011′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991011′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991002′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y7,’工程建筑：
IF STKINDI(‘991002′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991002′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991037′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y8,’电力设备：
IF STKINDI(‘991037′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991037′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991032′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y1,’教育传媒：
IF STKINDI(‘991032′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991032′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991010′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y2,’供水供气：
IF STKINDI(‘991010′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991010′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991033′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y3,’仪电仪表：
IF STKINDI(‘991033′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991033′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991136′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y4,’运输物流：
IF STKINDI(‘991136′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991136′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991016′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y5,’交通设施：
IF STKINDI(‘991016′,’涨幅引用.A’)*100 ‘ +NUMTOSTRN(STKINDI(‘991016′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991031′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y6,’外
IF STKINDI(‘991031′,’涨幅引用.A’)*100 贸：
IF STKINDI(‘991003′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y7,’电
IF STKINDI(‘991003′,’涨幅引用.A’)*100 力：
IF STKINDI(‘991135′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y8,’通
IF STKINDI(‘991135′,’涨幅引用.A’)*100 信：
2. 分享目的仅供大家学习和交流，请不要用于商业用途!
3. 如果你也有好源码或者教程，可以到用户中心发布，分享有积分奖励和额外收入！
4. 本站提供的源码、模板、插件等等其他资源，都不包含技术服务请大家谅解！
5. 如有链接无法下载、失效或广告，请联系管理员处理！
6. 本站资源售价只是赞助，收取费用仅维持本站的日常运营所需！
7. 如遇到加密压缩包，默认解压密码为"dtmb.taobao.com",如遇到无法解压的请联系管理员！
8. 因为资源和程序源码均为可复制品，所以不支持任何理由的退款兑现，请斟酌后支付下载
声明：如果标题没有注明"已测试"或者"测试可用"等字样的资源源码均未经过站长测试.特别注意没有标注的源码不保证任何可用性
指标资源网 » 大智慧板块涨幅副图指标
常见问题FAQ
- 免费下载或者VIP会员专享资源能否直接商用？
- 本站所有资源版权均属于原作者所有，这里所提供资源均只能用于参考学习用，请勿直接商用。若由于商用引起版权纠纷，一切责任均由使用者承担。更多说明请参考 VIP介绍。
- 提示下载完但解压或打开不了？
- 你们有qq群吗怎么加入？
