伊人国产在线视频,亚洲欧美日本国产一区二区三区,日韩乱视频,精品成人一区二区,a在线亚洲男人的天堂试看,国产成人精品系列在线观看,免费精品精品国产欧美在线

【大智慧】板塊漲幅指標(biāo)公式

2016.01.12 22:58

{漲幅引用}
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,’醫(yī) 藥： ‘ +NUMTOSTRN(STKINDI(‘991028′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991028′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y3,'醫(yī) 藥： ' +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,’房地產(chǎn)： ‘ +NUMTOSTRN(STKINDI(‘991007′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991007′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y5,'房地產(chǎn)： ' +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,’農(nóng)林牧漁： ‘ +NUMTOSTRN(STKINDI(‘991021′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991021′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y7,'農(nóng)林牧漁： ' +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,’商業(yè)連鎖： ‘ +NUMTOSTRN(STKINDI(‘991023′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991023′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y2,'商業(yè)連鎖： ' +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,’計(jì)算機(jī)： ‘ +NUMTOSTRN(STKINDI(‘991004′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991004′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y6,'計(jì)算機(jī)： ' +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,’機(jī) 械： ‘ +NUMTOSTRN(STKINDI(‘991027′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991027′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y5,'機(jī) 械： ' +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,’電力設(shè)備： ‘ +NUMTOSTRN(STKINDI(‘991037′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991037′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y8,'電力設(shè)備： ' +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,’運(yùn)輸物流： ‘ +NUMTOSTRN(STKINDI(‘991136′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991136′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y4,'運(yùn)輸物流： ' +NUMTOSTRN(STKINDI('991136','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘991016′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y5,’交通設(shè)施： ‘ +NUMTOSTRN(STKINDI(‘991016′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991016′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y5,'交通設(shè)施： ' +NUMTOSTRN(STKINDI('991016','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘991031′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y6,’外 貿(mào)： ‘ +NUMTOSTRN(STKINDI(‘991031′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991031′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y6,'外 貿(mào)： ' +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,’創(chuàng) 投： ‘ +NUMTOSTRN(STKINDI(‘993695′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993695′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y2,'創(chuàng) 投： ' +NUMTOSTRN(STKINDI('993695','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘993095′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y3,’奧 運(yùn)： ‘ +NUMTOSTRN(STKINDI(‘993095′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993095′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y3,'奧 運(yùn)： ' +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,’農(nóng)業(yè)龍頭： ‘ +NUMTOSTRN(STKINDI(‘993128′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993128′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y6,'農(nóng)業(yè)龍頭： ' +NUMTOSTRN(STKINDI('993128','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘993645′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y7,’節(jié)能環(huán)保： ‘ +NUMTOSTRN(STKINDI(‘993645′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993645′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y7,'節(jié)能環(huán)保： ' +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,’預(yù) 增： ‘ +NUMTOSTRN(STKINDI(‘993386′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993386′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y8,'預(yù) 增： ' +NUMTOSTRN(STKINDI('993386','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘993385′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x5,y3,’預(yù) 減： ‘ +NUMTOSTRN(STKINDI(‘993385′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993385′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y3,'預(yù) 減： ' +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,’網(wǎng)絡(luò)游戲： ‘ +NUMTOSTRN(STKINDI(‘993305′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993305′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x1,y8,'網(wǎng)絡(luò)游戲： ' +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,’其他行業(yè)： ‘ +NUMTOSTRN(STKINDI(‘991025′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘991025′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y2,'其他行業(yè)： ' +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,’成渝特區(qū)： ‘ +NUMTOSTRN(STKINDI(‘993450′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993450′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y4,'成渝特區(qū)： ' +NUMTOSTRN(STKINDI('993450','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘993580′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x2,y5,’CDM 項(xiàng)目： ‘ +NUMTOSTRN(STKINDI(‘993580′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993580′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y5,'CDM 項(xiàng)目： ' +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,’送 轉(zhuǎn)： ‘ +NUMTOSTRN(STKINDI(‘993590′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993590′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x2,y7,'送 轉(zhuǎn)： ' +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,’智能電網(wǎng)： ‘ +NUMTOSTRN(STKINDI(‘993597′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993597′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y1,'智能電網(wǎng)： ' +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,’濱海新區(qū)： ‘ +NUMTOSTRN(STKINDI(‘993599′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993599′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y3,'濱海新區(qū)： ' +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,’橫琴新區(qū)： ‘ +NUMTOSTRN(STKINDI(‘993604′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993604′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y7,'橫琴新區(qū)： ' +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,’關(guān)中天水： ‘ +NUMTOSTRN(STKINDI(‘993609′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993609′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y3,'關(guān)中天水： ' +NUMTOSTRN(STKINDI('993609','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘993646′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x4,y4,’物聯(lián)網(wǎng)： ‘ +NUMTOSTRN(STKINDI(‘993646′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993646′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x4,y4,'物聯(lián)網(wǎng)： ' +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,’低碳經(jīng)濟(jì)： ‘ +NUMTOSTRN(STKINDI(‘993710′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993710′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x3,y8,'低碳經(jīng)濟(jì)： ' +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,’定向增發(fā)： ‘ +NUMTOSTRN(STKINDI(‘993765′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993765′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y2,'定向增發(fā)： ' +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,’股權(quán)激勵： ‘ +NUMTOSTRN(STKINDI(‘993925′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993925′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y3,'股權(quán)激勵： ' +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,’稅收優(yōu)惠： ‘ +NUMTOSTRN(STKINDI(‘994027′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘994027′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y7,'稅收優(yōu)惠： ' +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,’皖江區(qū)域： ‘ +NUMTOSTRN(STKINDI(‘993612′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993612′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y5,'皖江區(qū)域： ' +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,’武漢規(guī)劃： ‘ +NUMTOSTRN(STKINDI(‘993616′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993616′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x5,y8,'武漢規(guī)則： ' +NUMTOSTRN(STKINDI('993616','漲幅引用.A')*100,2)+'%'),colorb48c33;end;
IF STKINDI(‘993617′,’漲幅引用.A’)*100>=0 THEN BEGIN DRAWTEXTREL(x6,y1,’海南開發(fā)： ‘ +NUMTOSTRN(STKINDI(‘993617′,’漲幅引用.A’)*100,2)+’%’),COLOR7711EE;end;
IF STKINDI(‘993617′,’漲幅引用.A’)*100<0 THEN BEGIN DRAWTEXTREL(x6,y1,'海南開發(fā)： ' +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;

 

0 0 0

數(shù)字時代的手工藝人

我要投稿

申明：本文為作者投稿或轉(zhuǎn)載，在概念股網(wǎng) http://www.chiang1015.com/ 上發(fā)表，為其獨(dú)立觀點(diǎn)。不代表本網(wǎng)立場，不代表本網(wǎng)贊同其觀點(diǎn)，亦不對其真實(shí)性負(fù)責(zé)，投資決策請建立在獨(dú)立思考之上。

< more >

ABCDEFGHIJKLMNOPQRSTUVWXYZ0-9
暫無相關(guān)概念股
暫無相關(guān)概念股
go top