打开APP
userphoto
未登录

开通VIP，畅享免费电子书等14项超值服

开通VIP

首页

好书

留言交流

下载APP

联系客服
大智慧板块涨幅指标公式
userphoto 关注

{涨幅引用}
A:DYNAINFO(14);

{板块涨A}
x1:=15 ; x2:=180; x3:=350; x4:=520; x5:=680; x6:=850; y1:=9; y2:=120; y3:=250; y4:=380; y5:=510; y6:=640; y7:=770; y8:=900;
DRAWTEXTREL(5,9,’上证：’+NUMTOSTRN(STKINDI(‘1a0001′,’涨幅引用.A’)*100,2)+’%’), {colorb48c33}COLORWHITE;
DRAWTEXTREL(80,9,’深证：’+NUMTOSTRN(STKINDI(‘993124′,’涨幅引用.A’)*100,2)+’%’), {colorb48c33}COLORWHITE;
IF STKINDI(‘991036′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y2,’券 商： ‘ +NUMTOSTRN(STKINDI(‘991036′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991036′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y2,’券 商： ‘ +NUMTOSTRN(STKINDI(‘991036′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991028′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y3,’医 药： ‘ +NUMTOSTRN(STKINDI(‘991028′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991028′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y3,’医 药： ‘ +NUMTOSTRN(STKINDI(‘991028′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991017′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y4,’银行类： ‘ +NUMTOSTRN(STKINDI(‘991017′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991017′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y4,’银行类： ‘ +NUMTOSTRN(STKINDI(‘991017′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991007′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y5,’房地产： ‘ +NUMTOSTRN(STKINDI(‘991007′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991007′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y5,’房地产： ‘ +NUMTOSTRN(STKINDI(‘991007′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991034′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y6,’有色金属： ‘ +NUMTOSTRN(STKINDI(‘991034′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991034′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y6,’有色金属： ‘ +NUMTOSTRN(STKINDI(‘991034′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991021′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y7,’农林牧渔： ‘ +NUMTOSTRN(STKINDI(‘991021′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991021′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y7,’农林牧渔： ‘ +NUMTOSTRN(STKINDI(‘991021′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991035′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y8,’造纸印刷： ‘ +NUMTOSTRN(STKINDI(‘991035′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991035′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y8,’造纸印刷： ‘ +NUMTOSTRN(STKINDI(‘991035′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991018′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y1,’旅游酒店： ‘ +NUMTOSTRN(STKINDI(‘991018′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991018′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y1,’旅游酒店： ‘ +NUMTOSTRN(STKINDI(‘991018′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991023′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y2,’商业连锁： ‘ +NUMTOSTRN(STKINDI(‘991023′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991023′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y2,’商业连锁： ‘ +NUMTOSTRN(STKINDI(‘991023′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991020′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y3,’酿酒食品： ‘ +NUMTOSTRN(STKINDI(‘991020′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991020′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y3,’酿酒食品： ‘ +NUMTOSTRN(STKINDI(‘991020′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991008′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y4,’纺织服装： ‘ +NUMTOSTRN(STKINDI(‘991008′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991008′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y4,’纺织服装： ‘ +NUMTOSTRN(STKINDI(‘991008′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991006′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y5,’电子信息： ‘ +NUMTOSTRN(STKINDI(‘991006′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991006′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y5,’电子信息： ‘ +NUMTOSTRN(STKINDI(‘991006′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991004′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y6,’计算机： ‘ +NUMTOSTRN(STKINDI(‘991004′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991004′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y6,’计算机： ‘ +NUMTOSTRN(STKINDI(‘991004′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991026′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y7,’汽车类： ‘ +NUMTOSTRN(STKINDI(‘991026′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991026′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y7,’汽车类： ‘ +NUMTOSTRN(STKINDI(‘991026′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991014′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y8,’电 器： ‘ +NUMTOSTRN(STKINDI(‘991014′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991014′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y8,’电 器： ‘ +NUMTOSTRN(STKINDI(‘991014′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993745′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y1,’稀缺资源： ‘ +NUMTOSTRN(STKINDI(‘993745′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993745′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y1,’稀缺资源： ‘ +NUMTOSTRN(STKINDI(‘993745′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991019′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y2,’煤炭石油： ‘ +NUMTOSTRN(STKINDI(‘991019′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991019′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y2,’煤炭石油： ‘ +NUMTOSTRN(STKINDI(‘991019′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991009′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y3,’钢 铁： ‘ +NUMTOSTRN(STKINDI(‘991009′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991009′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y3,’钢 铁： ‘ +NUMTOSTRN(STKINDI(‘991009′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991024′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y4,’建 材： ‘ +NUMTOSTRN(STKINDI(‘991024′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991024′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y4,’建 材： ‘ +NUMTOSTRN(STKINDI(‘991024′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991027′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y5,’机 械： ‘ +NUMTOSTRN(STKINDI(‘991027′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991027′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y5,’机 械： ‘ +NUMTOSTRN(STKINDI(‘991027′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991011′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y6,’化工化纤： ‘ +NUMTOSTRN(STKINDI(‘991011′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991011′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y6,’化工化纤： ‘ +NUMTOSTRN(STKINDI(‘991011′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991002′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y7,’工程建筑： ‘ +NUMTOSTRN(STKINDI(‘991002′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991002′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y7,’工程建筑： ‘ +NUMTOSTRN(STKINDI(‘991002′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991037′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y8,’电力设备： ‘ +NUMTOSTRN(STKINDI(‘991037′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991037′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y8,’电力设备： ‘ +NUMTOSTRN(STKINDI(‘991037′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991032′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y1,’教育传媒： ‘ +NUMTOSTRN(STKINDI(‘991032′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991032′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y1,’教育传媒： ‘ +NUMTOSTRN(STKINDI(‘991032′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991010′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y2,’供水供气： ‘ +NUMTOSTRN(STKINDI(‘991010′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991010′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y2,’供水供气： ‘ +NUMTOSTRN(STKINDI(‘991010′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991033′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y3,’仪电仪表： ‘ +NUMTOSTRN(STKINDI(‘991033′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991033′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y3,’仪电仪表： ‘ +NUMTOSTRN(STKINDI(‘991033′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991136′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y4,’运输物流： ‘ +NUMTOSTRN(STKINDI(‘991136′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991136′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y4,’运输物流： ‘ +NUMTOSTRN(STKINDI(‘991136′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991016′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y5,’交通设施： ‘ +NUMTOSTRN(STKINDI(‘991016′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991016′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y5,’交通设施： ‘ +NUMTOSTRN(STKINDI(‘991016′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991031′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y6,’外 贸： ‘ +NUMTOSTRN(STKINDI(‘991031′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991031′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y6,’外 贸： ‘ +NUMTOSTRN(STKINDI(‘991031′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991003′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y7,’电 力： ‘ +NUMTOSTRN(STKINDI(‘991003′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991003′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y7,’电 力： ‘ +NUMTOSTRN(STKINDI(‘991003′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991135′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y8,’通 信： ‘ +NUMTOSTRN(STKINDI(‘991135′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991135′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y8,’通 信： ‘ +NUMTOSTRN(STKINDI(‘991135′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993685′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y1,’3 G： ‘ +NUMTOSTRN(STKINDI(‘993685′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993685′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y1,’3 G： ‘ +NUMTOSTRN(STKINDI(‘993685′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993695′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y2,’创 投： ‘ +NUMTOSTRN(STKINDI(‘993695′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993695′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y2,’创 投： ‘ +NUMTOSTRN(STKINDI(‘993695′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993095′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y3,’奥 运： ‘ +NUMTOSTRN(STKINDI(‘993095′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993095′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y3,’奥 运： ‘ +NUMTOSTRN(STKINDI(‘993095′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993585′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y4,’新能源： ‘ +NUMTOSTRN(STKINDI(‘993585′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993585′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y4,’新能源： ‘ +NUMTOSTRN(STKINDI(‘993585′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993091′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y5,’新上海： ‘ +NUMTOSTRN(STKINDI(‘993091′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993091′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y5,’新上海： ‘ +NUMTOSTRN(STKINDI(‘993091′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993128′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y6,’农业龙头： ‘ +NUMTOSTRN(STKINDI(‘993128′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993128′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y6,’农业龙头： ‘ +NUMTOSTRN(STKINDI(‘993128′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993645′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y7,’节能环保： ‘ +NUMTOSTRN(STKINDI(‘993645′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993645′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y7,’节能环保： ‘ +NUMTOSTRN(STKINDI(‘993645′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993665′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y8,’航天军工： ‘ +NUMTOSTRN(STKINDI(‘993665′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993665′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y8,’航天军工： ‘ +NUMTOSTRN(STKINDI(‘993665′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993795′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y1,’中字头： ‘ +NUMTOSTRN(STKINDI(‘993795′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993795′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y1,’中字头： ‘ +NUMTOSTRN(STKINDI(‘993795′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993139′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y2,’大 盘： ‘ +NUMTOSTRN(STKINDI(‘993139′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993139′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y2,’大 盘： ‘ +NUMTOSTRN(STKINDI(‘993139′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993140′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y3,’中 盘： ‘ +NUMTOSTRN(STKINDI(‘993140′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993140′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y3,’中 盘： ‘ +NUMTOSTRN(STKINDI(‘993140′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993141′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y4,’小 盘： ‘ +NUMTOSTRN(STKINDI(‘993141′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993141′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y4,’小 盘： ‘ +NUMTOSTRN(STKINDI(‘993141′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993142′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y5,’高 价： ‘ +NUMTOSTRN(STKINDI(‘993142′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993142′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y5,’高 价： ‘ +NUMTOSTRN(STKINDI(‘993142′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993143′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y6,’中 价： ‘ +NUMTOSTRN(STKINDI(‘993143′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993143′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y6,’中 价： ‘ +NUMTOSTRN(STKINDI(‘993143′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993144′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y7,’低 价： ‘ +NUMTOSTRN(STKINDI(‘993144′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993144′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y7,’低 价： ‘ +NUMTOSTRN(STKINDI(‘993144′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993386′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y8,’预 增： ‘ +NUMTOSTRN(STKINDI(‘993386′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993386′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y8,’预 增： ‘ +NUMTOSTRN(STKINDI(‘993386′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993385′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y3,’预 减： ‘ +NUMTOSTRN(STKINDI(‘993385′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993385′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y3,’预 减： ‘ +NUMTOSTRN(STKINDI(‘993385′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;

{板块涨B}
x1:=15; x2:=180; x3:=350; x4:=520; x5:=680; x6:=850; y1:=9; y2:=120; y3:=250; y4:=380; y5:=510; y6:=640; y7:=770; y8:=900;
DRAWTEXTREL(5,9,’上证：’+NUMTOSTRN(STKINDI(‘1a0001′,’涨幅引用.A’)*100,2)+’%’), {colorb48c33}COLORWHITE;
DRAWTEXTREL(80,9,’深证：’+NUMTOSTRN(STKINDI(‘993124′,’涨幅引用.A’)*100,2)+’%’), {colorb48c33}COLORWHITE;
IF STKINDI(‘993625′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y2,’QFII持股： ‘ +NUMTOSTRN(STKINDI(‘993625′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993625′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y2,’QFII持股： ‘ +NUMTOSTRN(STKINDI(‘993625′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993798′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y3,’煤化工： ‘ +NUMTOSTRN(STKINDI(‘993798′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993798′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y3,’煤化工： ‘ +NUMTOSTRN(STKINDI(‘993798′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991255′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y4,’保 险： ‘ +NUMTOSTRN(STKINDI(‘991255′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991255′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y4,’保 险： ‘ +NUMTOSTRN(STKINDI(‘991255′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993075′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y5,’次 新： ‘ +NUMTOSTRN(STKINDI(‘993075′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993075′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y5,’次 新： ‘ +NUMTOSTRN(STKINDI(‘993075′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993072′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y6,’S T： ‘ +NUMTOSTRN(STKINDI(‘993072′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993072′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y6,’S T： ‘ +NUMTOSTRN(STKINDI(‘993072′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993130′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y7,’基金重仓： ‘ +NUMTOSTRN(STKINDI(‘993130′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993130′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y7,’基金重仓： ‘ +NUMTOSTRN(STKINDI(‘993130′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993305′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x1,y8,’网络游戏： ‘ +NUMTOSTRN(STKINDI(‘993305′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993305′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y8,’网络游戏： ‘ +NUMTOSTRN(STKINDI(‘993305′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993120′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y1,’新材料： ‘ +NUMTOSTRN(STKINDI(‘993120′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993120′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y1,’新材料： ‘ +NUMTOSTRN(STKINDI(‘993120′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘991025′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y2,’其他行业： ‘ +NUMTOSTRN(STKINDI(‘991025′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991025′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y2,’其他行业： ‘ +NUMTOSTRN(STKINDI(‘991025′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993405′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y3,’社保重仓： ‘ +NUMTOSTRN(STKINDI(‘993405′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993405′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y3,’社保重仓： ‘ +NUMTOSTRN(STKINDI(‘993405′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993450′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y4,’成渝特区： ‘ +NUMTOSTRN(STKINDI(‘993450′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993450′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y4,’成渝特区： ‘ +NUMTOSTRN(STKINDI(‘993450′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993580′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y5,’CDM 项目： ‘ +NUMTOSTRN(STKINDI(‘993580′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993580′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y5,’CDM 项目： ‘ +NUMTOSTRN(STKINDI(‘993580′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993586′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y6,’铁路基建： ‘ +NUMTOSTRN(STKINDI(‘993586′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993586′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y6,’铁路基建： ‘ +NUMTOSTRN(STKINDI(‘993586′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993590′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y7,’送 转： ‘ +NUMTOSTRN(STKINDI(‘993590′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993590′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y7,’送 转： ‘ +NUMTOSTRN(STKINDI(‘993590′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993596′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y8,’海峡西岸： ‘ +NUMTOSTRN(STKINDI(‘993596′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993596′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y8,’海峡西岸： ‘ +NUMTOSTRN(STKINDI(‘993596′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993597′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y1,’智能电网： ‘ +NUMTOSTRN(STKINDI(‘993597′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993597′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y1,’智能电网： ‘ +NUMTOSTRN(STKINDI(‘993597′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993598′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y2,’图们江： ‘ +NUMTOSTRN(STKINDI(‘993598′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993598′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y2,’图们江： ‘ +NUMTOSTRN(STKINDI(‘993598′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993599′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y3,’滨海新区： ‘ +NUMTOSTRN(STKINDI(‘993599′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993599′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y3,’滨海新区： ‘ +NUMTOSTRN(STKINDI(‘993599′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993601′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y4,’I G C C： ‘ +NUMTOSTRN(STKINDI(‘993601′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993601′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y4,’I G C C： ‘ +NUMTOSTRN(STKINDI(‘993601′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993602′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y5,’深圳本地： ‘ +NUMTOSTRN(STKINDI(‘993602′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993602′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y5,’深圳本地： ‘ +NUMTOSTRN(STKINDI(‘993602′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993603′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y6,’黄河三角： ‘ +NUMTOSTRN(STKINDI(‘993603′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993603′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y6,’黄河三角： ‘ +NUMTOSTRN(STKINDI(‘993603′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993604′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y7,’横琴新区： ‘ +NUMTOSTRN(STKINDI(‘993604′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993604′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y7,’横琴新区： ‘ +NUMTOSTRN(STKINDI(‘993604′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993606′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y8,’珠江三角： ‘ +NUMTOSTRN(STKINDI(‘993606′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993607′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y1,’江苏沿海： ‘ +NUMTOSTRN(STKINDI(‘993607′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993607′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y1,’江苏沿海： ‘ +NUMTOSTRN(STKINDI(‘993607′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993608′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y2,’辽宁沿海： ‘ +NUMTOSTRN(STKINDI(‘993608′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993608′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y2,’辽宁沿海： ‘ +NUMTOSTRN(STKINDI(‘993608′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993609′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y3,’关中天水： ‘ +NUMTOSTRN(STKINDI(‘993609′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993609′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y3,’关中天水： ‘ +NUMTOSTRN(STKINDI(‘993609′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993646′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y4,’物联网： ‘ +NUMTOSTRN(STKINDI(‘993646′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993646′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y4,’物联网： ‘ +NUMTOSTRN(STKINDI(‘993646′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993686′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y6,’期 货： ‘ +NUMTOSTRN(STKINDI(‘993686′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993686′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y6,’期 货： ‘ +NUMTOSTRN(STKINDI(‘993686′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993690′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y7,’注资承诺： ‘ +NUMTOSTRN(STKINDI(‘993690′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993690′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y7,’注资承诺： ‘ +NUMTOSTRN(STKINDI(‘993690′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993710′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x3,y8,’低碳经济： ‘ +NUMTOSTRN(STKINDI(‘993710′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993710′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y8,’低碳经济： ‘ +NUMTOSTRN(STKINDI(‘993710′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993730′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y1,’大订单： ‘ +NUMTOSTRN(STKINDI(‘993730′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993730′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y1,’大订单： ‘ +NUMTOSTRN(STKINDI(‘993730′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993765′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y2,’定向增发： ‘ +NUMTOSTRN(STKINDI(‘993765′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993765′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y2,’定向增发： ‘ +NUMTOSTRN(STKINDI(‘993765′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993825′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y2,’参股金融： ‘ +NUMTOSTRN(STKINDI(‘993825′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993825′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y2,’参股金融： ‘ +NUMTOSTRN(STKINDI(‘993825′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993925′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y3,’股权激励： ‘ +NUMTOSTRN(STKINDI(‘993925′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993925′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y3,’股权激励： ‘ +NUMTOSTRN(STKINDI(‘993925′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘994005′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y7,’S 板： ‘ +NUMTOSTRN(STKINDI(‘994005′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘994005′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y7,’S 板： ‘ +NUMTOSTRN(STKINDI(‘994005′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘994027′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y7,’税收优惠： ‘ +NUMTOSTRN(STKINDI(‘994027′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘994027′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y7,’税收优惠： ‘ +NUMTOSTRN(STKINDI(‘994027′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993885′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y8,’中 证100： ‘ +NUMTOSTRN(STKINDI(‘993885′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993885′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y8,’中 证100： ‘ +NUMTOSTRN(STKINDI(‘993885′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993606′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y4,’珠江三角： ‘ +NUMTOSTRN(STKINDI(‘993606′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993606′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y4,’珠江三角： ‘ +NUMTOSTRN(STKINDI(‘993606′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993612′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y5,’皖江区域： ‘ +NUMTOSTRN(STKINDI(‘993612′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993612′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y5,’皖江区域： ‘ +NUMTOSTRN(STKINDI(‘993612′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993613′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y6,’鄱阳湖： ‘ +NUMTOSTRN(STKINDI(‘993613′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993613′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y6,’鄱阳湖： ‘ +NUMTOSTRN(STKINDI(‘993613′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993614′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y7,’长珠潭： ‘ +NUMTOSTRN(STKINDI(‘993614′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993614′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y7,’长珠潭： ‘ +NUMTOSTRN(STKINDI(‘993614′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993616′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y8,’武汉规划： ‘ +NUMTOSTRN(STKINDI(‘993616′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993616′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y8,’武汉规则： ‘ +NUMTOSTRN(STKINDI(‘993616′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993617′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y1,’海南开发： ‘ +NUMTOSTRN(STKINDI(‘993617′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993617′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y1,’海南开发： ‘ +NUMTOSTRN(STKINDI(‘993617′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993621′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y2,’陕甘宁： ‘ +NUMTOSTRN(STKINDI(‘993621′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993621′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y2,’陕甘宁： ‘ +NUMTOSTRN(STKINDI(‘993621′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993731′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y3,’分拆上市： ‘ +NUMTOSTRN(STKINDI(‘993731′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993731′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y3,’分拆上市： ‘ +NUMTOSTRN(STKINDI(‘993731′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993751′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y5,’百元股： ‘ +NUMTOSTRN(STKINDI(‘993751′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993751′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y5,’百元股： ‘ +NUMTOSTRN(STKINDI(‘993751′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;
IF STKINDI(‘993801′,’涨幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y4,’黄金股： ‘ +NUMTOSTRN(STKINDI(‘993801′,’涨幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993801′,’涨幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y4,’黄金股： ‘ +NUMTOSTRN(STKINDI(‘993801′,’涨幅引用.A’)*100,2)+’%’),colorb48c33;end;

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。
打开APP，阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序，算一算2024你的财运
大智慧短底判断指标公式
如何把警告公式定位指向当日领涨行业或热门概念板块 - 指标公式交流区 - 理想论坛 - 中...
同花顺板块轮动指标公式
涨幅小于5%选股公式（通达信涨幅大于7）
大跌之后如何自救
抓涨停板技术：集合竞价排序指标公式
更多类似文章 >>
生活服务
热点新闻
留言交流
回顶部
联系我们
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权！
如果VIP功能使用有故障，
可点击这里联系客服！

联系客服