大智慧板块涨幅源码-大智慧公式-股海网

大智慧板块涨幅源码
相关简介：大智慧板块涨幅源码下面另发个可用的板块涨幅于以补过。先将涨幅引用引入装上才可使用的。 {涨幅引用} 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','涨幅
文章来源：股海网作者：股海网发布时间：2012-05-17浏览次数：下载次数：0

大智慧板块涨幅源码

下面另发个可用的“板块涨幅”于以补过。先将“涨幅引用”引入装上才可使用的。

{涨幅引用}
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}{股海网提供：www.guhai.com.cn}
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;

大智慧板块涨幅源码

上一篇：大智慧多空趋势指标源码下一篇：大智慧均线多头排列股价回调14日线预警公式

☞股海网提供公式解密、改选股服务联系点击查看详情（有偿服务,非诚勿扰）...

☞股海网公式指标安装帮助说明，新手必读，好好学习天天向上！...

☞股海网注册、登录、下载问题说明，如遇问题请查阅。...

　☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

上传会员:

股海网

文件大小:

Bytes

上传时间:

2012-05-17

下载积分:

下载地址: 点击下载

免责声明:

请仔细阅读并同意后才能下载

本附件为用户分享上传，股海网没有对文件进行验证，不能保证下载资源的准确性、安全性和完整性，也不保证下载资源能正常安装和使用，且下载后扣除的积分无法退还，除非您充分理解并完全接受本声明，否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利，其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用，不得用于商业或者非法用途，如有侵犯您的版权，请参看《股海网侵权处理流程》《股海网免责声明条款》。
点击下载无反应时，更换主流浏览器重新登录操作，如360浏览器、Edge浏览器、谷歌浏览器，个别浏览器有不兼容现象。

勾选以下表示您已经阅读并同意以上声明才能下载本文件，扣除积分无法退还！

√ 我已阅读所有条款规定， 请点我同意 所有条款内容！我自愿下载！ ←

提示：如下载失败，请点关闭刷新此页面或提交问题反馈给管理员→

关闭

指标公式

看盘软件

股票数据

数据题材

工具应用

期货基金

指标战法

股海宝贝

炒股知识

资讯消息

VIP之家