大智慧板块涨幅指标公式

大智慧板块涨幅指标公式

{涨幅引用}

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;

大智慧板块涨幅指标公式的选股公式如下：

>股票指标网