请老师帮忙14存的如何调制啊!!{已解决}

[大智慧] 2100 0
设置
1623645 Lv.3

专栏

发表于 2009-11-20 14:49 复制 显示全部楼层 正序浏览 |
跳转到指定楼层
{板块监控}
DRAWGBKLAST(C,STRIP(RGB(65,65,65),RGB(0,0,0),0));
工程建筑:=STKINDI('991002','引用线.板块涨幅')*100;
电力:=STKINDI('991003','引用线.板块涨幅')*100;
计算机:=STKINDI('991004','引用线.板块涨幅')*100;
电子信息:=STKINDI('991006','引用线.板块涨幅')*100;
房地产:=STKINDI('991007','引用线.板块涨幅')*100;
纺织服装:=STKINDI('991008','引用线.板块涨幅')*100;
钢铁:=STKINDI('991009','引用线.板块涨幅')*100;
供水供气:=STKINDI('991010','引用线.板块涨幅')*100;
化工化纤:=STKINDI('991011','引用线.板块涨幅')*100;
电器:=STKINDI('991014','引用线.板块涨幅')*100;
交通设施:=STKINDI('991016','引用线.板块涨幅')*100;
银行类:=STKINDI('991017','引用线.板块涨幅')*100;
旅游酒店:=STKINDI('991018','引用线.板块涨幅')*100;
煤炭石油:=STKINDI('991019','引用线.板块涨幅')*100;
酿酒食品:=STKINDI('991020','引用线.板块涨幅')*100;
农林牧渔:=STKINDI('991021','引用线.板块涨幅')*100;
商业连锁:=STKINDI('991023','引用线.板块涨幅')*100;
建材:=STKINDI('991024','引用线.板块涨幅')*100;
其他行业:=STKINDI('991025','引用线.板块涨幅')*100;
汽车类:=STKINDI('991026','引用线.板块涨幅')*100;
机械:=STKINDI('991027','引用线.板块涨幅')*100;
医药:=STKINDI('991028','引用线.板块涨幅')*100;
外贸:=STKINDI('991031','引用线.板块涨幅')*100;
教育传媒:=STKINDI('991032','引用线.板块涨幅')*100;
仪电仪表:=STKINDI('991033','引用线.板块涨幅')*100;
有色金属:=STKINDI('991034','引用线.板块涨幅')*100;
造纸印刷:=STKINDI('991035','引用线.板块涨幅')*100;
券商:=STKINDI('991036','引用线.板块涨幅')*100;
电力设备:=STKINDI('991037','引用线.板块涨幅')*100;
通信:=STKINDI('991135','引用线.板块涨幅')*100;
运输物流:=STKINDI('991136','引用线.板块涨幅')*100;
保险:=STKINDI('991255','引用线.板块涨幅')*100;
ST股:=STKINDI('993072','引用线.板块涨幅')*100;
新上海:=STKINDI('993091','引用线.板块涨幅')*100;
新材料:=STKINDI('993120','引用线.板块涨幅')*100;
农业龙头:=STKINDI('993128','引用线.板块涨幅')*100;
数字电视:=STKINDI('993129','引用线.板块涨幅')*100;
网络游戏:=STKINDI('993305','引用线.板块涨幅')*100;
成渝特区:=STKINDI('993450','引用线.板块涨幅')*100;
新能源:=STKINDI('993585','引用线.板块涨幅')*100;
铁路基建:=STKINDI('993586','引用线.板块涨幅')*100;
海峡西岸:=STKINDI('993596','引用线.板块涨幅')*100;
智能电网:=STKINDI('993597','引用线.板块涨幅')*100;
节能环保:=STKINDI('993645','引用线.板块涨幅')*100;
物联网:=STKINDI('993646','引用线.板块涨幅')*100;
航天军工:=STKINDI('993665','引用线.板块涨幅')*100;
低碳经济:=STKINDI('993710','引用线.板块涨幅')*100;
稀缺资源:=STKINDI('993745','引用线.板块涨幅')*100;
HH1:=MAX(工程建筑,电力,计算机,电子信息,房地产,纺织服装,钢铁,供水供气,化工化纤,电器,交通设施,银行类,旅游酒店,煤炭石油,酿酒食品,农林牧渔,商业连锁,建材,其他行业,汽车类,机械,医药,外贸,教育传媒);
HH2:=MAX(仪电仪表,有色金属,造纸印刷,券商,电力设备,通信,运输物流,保险,ST股,新上海,新材料,农业龙头,数字电视,网络游戏,成渝特区,新能源,铁路基建,海峡西岸,智能电网,节能环保,物联网,航天军工,低碳经济,稀缺资源);
领涨板块:=MAX(HH1,HH2);
HH21:=MAX(IF(工程建筑<领涨板块,工程建筑,-10),IF(电力<领涨板块,电力,-10),IF(计算机<领涨板块,计算机,-10),IF(电子信息<领涨板块,电子信息,-10),IF(房地产<领涨板块,房地产,-10),IF(纺织服装<领涨板块,纺织服装,-10),IF(钢铁<领涨板块,钢铁,-10),IF(供水供气<领涨板块,供水供气,-10),IF(化工化纤<领涨板块,化工化纤,-10),IF(电器<领涨板块,电器,-10),IF(交通设施<领涨板块,交通设施,-10),IF(银行类<领涨板块,银行类,-10),IF(旅游酒店<领涨板块,旅游酒店,-10),IF(煤炭石油<领涨板块,煤炭石油,-10),IF(酿酒食品<领涨板块,酿酒食品,-10),IF(农林牧渔<领涨板块,农林牧渔,-10),IF(商业连锁<领涨板块,商业连锁,-10),IF(建材<领涨板块,建材,-10),IF(其他行业<领涨板块,其他行业,-10),IF(汽车类<领涨板块,汽车类,-10),IF(机械<领涨板块,机械,-10),IF(医药<领涨板块,医药,-10),IF(外贸<领涨板块,外贸,-10),IF(教育传媒<领涨板块,教育传媒,-10));
HH22:=MAX(IF(仪电仪表<领涨板块,仪电仪表,-10),IF(有色金属<领涨板块,有色金属,-10),IF(造纸印刷<领涨板块,造纸印刷,-10),IF(券商<领涨板块,券商,-10),IF(电力设备<领涨板块,电力设备,-10),IF(通信<领涨板块,通信,-10),IF(运输物流<领涨板块,运输物流,-10),IF(保险<领涨板块,保险,-10),IF(ST股<领涨板块,ST股,-10),IF(新上海<领涨板块,新上海,-10),IF(新材料<领涨板块,新材料,-10),IF(农业龙头<领涨板块,农业龙头,-10),IF(数字电视<领涨板块,数字电视,-10),IF(网络游戏<领涨板块,网络游戏,-10),IF(成渝特区<领涨板块,成渝特区,-10),IF(新能源<领涨板块,新能源,-10),IF(铁路基建<领涨板块,铁路基建,-10),IF(海峡西岸<领涨板块,海峡西岸,-10),IF(智能电网<领涨板块,智能电网,-10),IF(节能环保<领涨板块,节能环保,-10),IF(物联网<领涨板块,物联网,-10),IF(航天军工<领涨板块,航天军工,-10),IF(低碳经济<领涨板块,低碳经济,-10),IF(稀缺资源<领涨板块,稀缺资源,-10));
板块第二:=MAX(HH21,HH22);
A1:=DRAWMOVETEXT(工程建筑=领涨板块 AND 工程建筑>0,'领涨板块:工程建筑');
A2:=DRAWMOVETEXT(电力=领涨板块 AND 电力>0,'领涨板块:电    力');
A3:=DRAWMOVETEXT(计算机=领涨板块 AND 计算机>0,'领涨板块:计 算 机');
A4:=DRAWMOVETEXT(电子信息=领涨板块 AND 电子信息>0,'领涨板块:电子信息');
A5:=DRAWMOVETEXT(房地产=领涨板块 AND 房地产>0,'领涨板块:房 地 产');
A6:=DRAWMOVETEXT(纺织服装=领涨板块 AND 纺织服装>0,'领涨板块:纺织服装');
A7:=DRAWMOVETEXT(钢铁=领涨板块 AND 钢铁>0,'领涨板块:钢    铁');
A8:=DRAWMOVETEXT(供水供气=领涨板块 AND 供水供气>0,'领涨板块:供水供气');
A9:=DRAWMOVETEXT(化工化纤=领涨板块 AND 化工化纤>0,'领涨板块:化工化纤');
A10:=DRAWMOVETEXT(电器=领涨板块 AND 电器>0,'领涨板块:电    器');
A11:=DRAWMOVETEXT(交通设施=领涨板块 AND 交通设施>0,'领涨板块:交通设施');
A12:=DRAWMOVETEXT(银行类=领涨板块 AND 银行类>0,'领涨板块:银 行 类');
A13:=DRAWMOVETEXT(旅游酒店=领涨板块 AND 旅游酒店>0,'领涨板块:旅游酒店');
A14:=DRAWMOVETEXT(煤炭石油=领涨板块 AND 煤炭石油>0,'领涨板块:煤炭石油');
A15:=DRAWMOVETEXT(酿酒食品=领涨板块 AND 酿酒食品>0,'领涨板块:酿酒食品');
A16:=DRAWMOVETEXT(农林牧渔=领涨板块 AND 农林牧渔>0,'领涨板块:农林牧渔');
A17:=DRAWMOVETEXT(商业连锁=领涨板块 AND 商业连锁>0,'领涨板块:商业连锁');
A18:=DRAWMOVETEXT(建材=领涨板块 AND 建材>0,'领涨板块:建    材');
A19:=DRAWMOVETEXT(其他行业=领涨板块 AND 其他行业>0,'领涨板块:其他行业');
A20:=DRAWMOVETEXT(汽车类=领涨板块 AND 汽车类>0,'领涨板块:汽 车 类');
A21:=DRAWMOVETEXT(机械=领涨板块 AND 机械>0,'领涨板块:机    械');
A22:=DRAWMOVETEXT(医药=领涨板块 AND 医药>0,'领涨板块:医    药');
A23:=DRAWMOVETEXT(外贸=领涨板块 AND 外贸>0,'领涨板块:外    贸');
A24:=DRAWMOVETEXT(教育传媒=领涨板块 AND 教育传媒>0,'领涨板块:教育传媒');
A25:=DRAWMOVETEXT(仪电仪表=领涨板块 AND 仪电仪表>0,'领涨板块:仪电仪表');
A26:=DRAWMOVETEXT(有色金属=领涨板块 AND 有色金属>0,'领涨板块:有色金属');
A27:=DRAWMOVETEXT(造纸印刷=领涨板块 AND 造纸印刷>0,'领涨板块:造纸印刷');
A28:=DRAWMOVETEXT(券商=领涨板块 AND 券商>0,'领涨板块:券    商');
A29:=DRAWMOVETEXT(电力设备=领涨板块 AND 电力设备>0,'领涨板块:电力设备');
A30:=DRAWMOVETEXT(通信=领涨板块 AND 通信>0,'领涨板块:通    信');
A31:=DRAWMOVETEXT(运输物流=领涨板块 AND 运输物流>0,'领涨板块:运输物流');
A32:=DRAWMOVETEXT(保险=领涨板块 AND 保险>0,'领涨板块:保    险');
A33:=DRAWMOVETEXT(ST股=领涨板块 AND ST股>0,'领涨板块:ST    股');
A34:=DRAWMOVETEXT(新上海=领涨板块 AND 新上海>0,'领涨板块:新 上 海');
A35:=DRAWMOVETEXT(新材料=领涨板块 AND 新材料>0,'领涨板块:新 材 料');
A36:=DRAWMOVETEXT(农业龙头=领涨板块 AND 农业龙头>0,'领涨板块:农业龙头');
A37:=DRAWMOVETEXT(数字电视=领涨板块 AND 数字电视>0,'领涨板块:数字电视');
A38:=DRAWMOVETEXT(网络游戏=领涨板块 AND 网络游戏>0,'领涨板块:网络游戏');
A39:=DRAWMOVETEXT(成渝特区=领涨板块 AND 成渝特区>0,'领涨板块:成渝特区');
A40:=DRAWMOVETEXT(新能源=领涨板块 AND 新能源>0,'领涨板块:新 能 源');
A41:=DRAWMOVETEXT(铁路基建=领涨板块 AND 铁路基建>0,'领涨板块:铁路基建');
A42:=DRAWMOVETEXT(海峡西岸=领涨板块 AND 海峡西岸>0,'领涨板块:海峡西岸');
A43:=DRAWMOVETEXT(智能电网=领涨板块 AND 智能电网>0,'领涨板块:智能电网');
A44:=DRAWMOVETEXT(节能环保=领涨板块 AND 节能环保>0,'领涨板块:节能环保');
A45:=DRAWMOVETEXT(物联网=领涨板块 AND 物联网>0,'领涨板块:物 联 网');
A46:=DRAWMOVETEXT(航天军工=领涨板块 AND 航天军工>0,'领涨板块:航天军工');
A47:=DRAWMOVETEXT(低碳经济=领涨板块 AND 低碳经济>0,'领涨板块:低碳经济');
A48:=DRAWMOVETEXT(稀缺资源=领涨板块 AND 稀缺资源>0,'领涨板块:稀缺资源');
AA1:=DRAWMOVETEXT(工程建筑=板块第二 AND 工程建筑>0,'  板块第二:工程建筑');
AA2:=DRAWMOVETEXT(电力=板块第二 AND 电力>0,'  板块第二:电    力');
AA3:=DRAWMOVETEXT(计算机=板块第二 AND 计算机>0,'  板块第二:计 算 机');
AA4:=DRAWMOVETEXT(电子信息=板块第二 AND 电子信息>0,'  板块第二:电子信息');
AA5:=DRAWMOVETEXT(房地产=板块第二 AND 房地产>0,'  板块第二:房 地 产');
AA6:=DRAWMOVETEXT(纺织服装=板块第二 AND 纺织服装>0,'板块第二:纺织服装');
AA7:=DRAWMOVETEXT(钢铁=板块第二 AND 钢铁>0,'  板块第二:钢    铁');
AA8:=DRAWMOVETEXT(供水供气=板块第二 AND 供水供气>0,'  板块第二:供水供气');
AA9:=DRAWMOVETEXT(化工化纤=板块第二 AND 化工化纤>0,'  板块第二:化工化纤');
AA10:=DRAWMOVETEXT(电器=板块第二 AND 电器>0,'  板块第二:电    器');
AA11:=DRAWMOVETEXT(交通设施=板块第二 AND 交通设施>0,'  板块第二:交通设施');
AA12:=DRAWMOVETEXT(银行类=板块第二 AND 银行类>0,'  板块第二:银 行 类');
AA13:=DRAWMOVETEXT(旅游酒店=板块第二 AND 旅游酒店>0,'  板块第二:旅游酒店');
AA14:=DRAWMOVETEXT(煤炭石油=板块第二 AND 煤炭石油>0,'  板块第二:煤炭石油');
AA15:=DRAWMOVETEXT(酿酒食品=板块第二 AND 酿酒食品>0,'  板块第二:酿酒食品');
AA16:=DRAWMOVETEXT(农林牧渔=板块第二 AND 农林牧渔>0,'  板块第二:农林牧渔');
AA17:=DRAWMOVETEXT(商业连锁=板块第二 AND 商业连锁>0,'  板块第二:商业连锁');
AA18:=DRAWMOVETEXT(建材=板块第二 AND 建材>0,'  板块第二:建    材');
AA19:=DRAWMOVETEXT(其他行业=板块第二 AND 其他行业>0,'  板块第二:其他行业');
AA20:=DRAWMOVETEXT(汽车类=板块第二 AND 汽车类>0,'  板块第二:汽 车 类');
AA21:=DRAWMOVETEXT(机械=板块第二 AND 机械>0,'  板块第二:机    械');
AA22:=DRAWMOVETEXT(医药=板块第二 AND 医药>0,'  板块第二:医    药');
AA23:=DRAWMOVETEXT(外贸=板块第二 AND 外贸>0,'  板块第二:外    贸');
AA24:=DRAWMOVETEXT(教育传媒=板块第二 AND 教育传媒>0,'  板块第二:教育传媒');
AA25:=DRAWMOVETEXT(仪电仪表=板块第二 AND 仪电仪表>0,'  板块第二:仪电仪表');
AA26:=DRAWMOVETEXT(有色金属=板块第二 AND 有色金属>0,'  板块第二:有色金属');
AA27:=DRAWMOVETEXT(造纸印刷=板块第二 AND 造纸印刷>0,'  板块第二:造纸印刷');
AA28:=DRAWMOVETEXT(券商=板块第二 AND 券商>0,'  板块第二:券    商');
AA29:=DRAWMOVETEXT(电力设备=板块第二 AND 电力设备>0,'  板块第二:电力设备');
AA30:=DRAWMOVETEXT(通信=板块第二 AND 通信>0,'  板块第二:通    信');
AA31:=DRAWMOVETEXT(运输物流=板块第二 AND 运输物流>0,'  板块第二:运输物流');
AA32:=DRAWMOVETEXT(保险=板块第二 AND 保险>0,'  板块第二:保    险');
AA33:=DRAWMOVETEXT(ST股=板块第二 AND ST股>0,'  板块第二:ST    股');
AA34:=DRAWMOVETEXT(新上海=板块第二 AND 新上海>0,'  板块第二:新 上 海');
AA35:=DRAWMOVETEXT(新材料=板块第二 AND 新材料>0,'  板块第二:新 材 料');
AA36:=DRAWMOVETEXT(农业龙头=板块第二 AND 农业龙头>0,'  板块第二:农业龙头');
AA37:=DRAWMOVETEXT(数字电视=板块第二 AND 数字电视>0,'  板块第二:数字电视');
AA38:=DRAWMOVETEXT(网络游戏=板块第二 AND 网络游戏>0,'  板块第二:网络游戏');
AA39:=DRAWMOVETEXT(成渝特区=板块第二 AND 成渝特区>0,'  板块第二:成渝特区');
AA40:=DRAWMOVETEXT(新能源=板块第二 AND 新能源>0,'  板块第二:新 能 源');
AA41:=DRAWMOVETEXT(铁路基建=板块第二 AND 铁路基建>0,'  板块第二:铁路基建');
AA42:=DRAWMOVETEXT(海峡西岸=板块第二 AND 海峡西岸>0,'  板块第二:海峡西岸');
AA43:=DRAWMOVETEXT(智能电网=板块第二 AND 智能电网>0,'  板块第二:智能电网');
AA44:=DRAWMOVETEXT(节能环保=板块第二 AND 节能环保>0,'  板块第二:节能环保');
AA45:=DRAWMOVETEXT(物联网=板块第二 AND 物联网>0,'  板块第二:物 联 网');
AA46:=DRAWMOVETEXT(航天军工=板块第二 AND 航天军工>0,'  板块第二:航天军工');
AA47:=DRAWMOVETEXT(低碳经济=板块第二 AND 低碳经济>0,'  板块第二:低碳经济');
AA48:=DRAWMOVETEXT(稀缺资源=板块第二 AND 稀缺资源>0,'  板块第二:稀缺资源');
X:=0;
Y:=0;
X1:=130;
X2:=240;
X3:=465;
X4:=480;
X5:=800;
Y1:=5;
Y2:=35;
Y3:=21;
DRAWTEXTABS(X,Y,'工程建筑:'+NUMTOSTRN(工程建筑,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y1,IF(工程建筑>=0,X1+工程建筑*20,X1-工程建筑*20),Y2,IF(工程建筑>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3,'电    力:'+NUMTOSTRN(电力,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333,IF(电力>=0,X1+电力*20,X1-电力*20),Y2+34.333+30,IF(电力>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*2,'计 算 机:'+NUMTOSTRN(计算机,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*2+30,IF(计算机>=0,X1+计算机*20,X1-计算机*20),Y2+34.333*2+30*2,IF(计算机>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*3,'电子信息:'+NUMTOSTRN(电子信息,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*3+30*2,IF(电子信息>=0,X1+电子信息*20,X1-电子信息*20),Y2+34.333*3+30*3,IF(电子信息>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*4,'房 地 产:'+NUMTOSTRN(房地产,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*4+30*3,IF(房地产>=0,X1+房地产*20,X1-房地产*20),Y2+34.333*4+30*4,IF(房地产>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*5,'纺织服装:'+NUMTOSTRN(纺织服装,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*5+30*4,IF(纺织服装>=0,X1+纺织服装*20,X1-纺织服装*20),Y2+34.333*5+30*5,IF(纺织服装>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*6,'钢    铁:'+NUMTOSTRN(钢铁,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*6+30*5,IF(钢铁>=0,X1+钢铁*20,X1-钢铁*20),Y2+34.333*6+30*6,IF(钢铁>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*7,'供水供气:'+NUMTOSTRN(供水供气,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*7+30*6,IF(供水供气>=0,X1+供水供气*20,X1-供水供气*20),Y2+34.333*7+30*7,IF(供水供气>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*8,'化工化纤:'+NUMTOSTRN(化工化纤,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*8+30*7,IF(化工化纤>=0,X1+化工化纤*20,X1-化工化纤*20),Y2+34.333*8+30*8,IF(化工化纤>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*9,'电    器:'+NUMTOSTRN(电器,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*9+30*8,IF(电器>=0,X1+电器*20,X1-电器*20),Y2+34.333*9+30*9,IF(电器>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*10,'交通设施:'+NUMTOSTRN(交通设施,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*10+30*9,IF(交通设施>=0,X1+交通设施*20,X1-交通设施*20),Y2+34.333*10+30*10,IF(交通设施>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*11,'银 行 类:'+NUMTOSTRN(银行类,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*11+30*10,IF(银行类>=0,X1+银行类*20,X1-银行类*20),Y2+34.333*11+30*11,IF(银行类>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*12,'旅游酒店:'+NUMTOSTRN(旅游酒店,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*12+30*11,IF(旅游酒店>=0,X1+旅游酒店*20,X1-旅游酒店*20),Y2+34.333*12+30*12,IF(旅游酒店>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*13,'煤炭石油:'+NUMTOSTRN(煤炭石油,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*13+30*12,IF(煤炭石油>=0,X1+煤炭石油*20,X1-煤炭石油*20),Y2+34.333*13+30*13,IF(煤炭石油>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*14,'酿酒食品:'+NUMTOSTRN(酿酒食品,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*14+30*13,IF(酿酒食品>=0,X1+酿酒食品*20,X1-酿酒食品*20),Y2+34.333*14+30*14,IF(酿酒食品>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X,Y3*15,'农林牧渔:'+NUMTOSTRN(农林牧渔,2)+'%'),COLORYELLOW;
DRAWRECTREL(X1,Y2+34.333*15+30*14,IF(农林牧渔>=0,X1+农林牧渔*20,X1-农林牧渔*20),Y2+34.333*15+30*15,IF(农林牧渔>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
{}
DRAWTEXTABS(X2,Y,'商业连锁:'+NUMTOSTRN(商业连锁,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y1,IF(商业连锁>=0,X3+商业连锁*20,X3-商业连锁*20),Y2,IF(商业连锁>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3,'建    材:'+NUMTOSTRN(建材,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333,IF(建材>=0,X3+建材*20,X3-建材*20),Y2+34.333+30,IF(建材>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*2,'其他行业:'+NUMTOSTRN(其他行业,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*2+30,IF(其他行业>=0,465+其他行业*20,465-其他行业*20),Y2+34.333*2+30*2,IF(其他行业>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*3,'汽 车 类:'+NUMTOSTRN(汽车类,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*3+30*2,IF(汽车类>=0,465+汽车类*20,465-汽车类*20),Y2+34.333*3+30*3,IF(汽车类>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*4,'机    械:'+NUMTOSTRN(机械,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*4+30*3,IF(机械>=0,X3+机械*20,X3-机械*20),Y2+34.333*4+30*4,IF(机械>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*5,'医    药:'+NUMTOSTRN(医药,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*5+30*4,IF(医药>=0,X3+医药*20,X3-医药*20),Y2+34.333*5+30*5,IF(医药>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*6,'外    贸:'+NUMTOSTRN(外贸,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*6+30*5,IF(外贸>=0,X3+外贸*20,X3-外贸*20),Y2+34.333*6+30*6,IF(外贸>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*7,'教育传媒:'+NUMTOSTRN(教育传媒,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*7+30*6,IF(教育传媒>=0,X3+教育传媒*20,X3-教育传媒*20),Y2+34.333*7+30*7,IF(教育传媒>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*8,'仪电仪表:'+NUMTOSTRN(仪电仪表,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*8+30*7,IF(仪电仪表>=0,X3+仪电仪表*20,X3-仪电仪表*20),Y2+34.333*8+30*8,IF(仪电仪表>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*9,'有色金属:'+NUMTOSTRN(有色金属,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*9+30*8,IF(有色金属>=0,X3+有色金属*20,X3-有色金属*20),Y2+34.333*9+30*9,IF(有色金属>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*10,'造纸印刷:'+NUMTOSTRN(造纸印刷,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*10+30*9,IF(造纸印刷>=0,X3+造纸印刷*20,X3-造纸印刷*20),Y2+34.333*10+30*10,IF(造纸印刷>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*11,'券    商:'+NUMTOSTRN(券商,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*11+30*10,IF(券商>=0,X3+券商*20,X3-券商*20),Y2+34.333*11+30*11,IF(券商>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*12,'电力设备:'+NUMTOSTRN(电力设备,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*12+30*11,IF(电力设备>=0,X3+电力设备*20,X3-电力设备*20),Y2+34.333*12+30*12,IF(电力设备>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*13,'通    信:'+NUMTOSTRN(通信,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*13+30*12,IF(通信>=0,X3+通信*20,X3-通信*20),Y2+34.333*13+30*13,IF(通信>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*14,'运输物流:'+NUMTOSTRN(运输物流,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*14+30*13,IF(运输物流>=0,X3+运输物流*20,X3-运输物流*20),Y2+34.333*14+30*14,IF(运输物流>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X2,Y3*15,'保    险:'+NUMTOSTRN(保险,2)+'%'),COLORYELLOW;
DRAWRECTREL(X3,Y2+34.333*15+30*14,IF(保险>=0,X3+保险*20,X3-保险*20),Y2+34.333*15+30*15,IF(保险>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
{}
DRAWTEXTABS(X4,Y,'ST    股:'+NUMTOSTRN(ST股,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y1,IF(ST股>=0,X5+ST股*20,X5-ST股*20),Y2,IF(ST股>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3,'新 上 海:'+NUMTOSTRN(新上海,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333,IF(新上海>=0,X5+新上海*20,X5-新上海*20),Y2+34.333+30,IF(新上海>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*2,'新 材 料:'+NUMTOSTRN(新材料,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*2+30,IF(新材料>=0,X5+新材料*20,X5-新材料*20),Y2+34.333*2+30*2,IF(新材料>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*3,'农业龙头:'+NUMTOSTRN(农业龙头,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*3+30*2,IF(农业龙头>=0,X5+农业龙头*20,X5-农业龙头*20),Y2+34.333*3+30*3,IF(农业龙头>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*4,'数字电视:'+NUMTOSTRN(数字电视,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*4+30*3,IF(数字电视>=0,X5+数字电视*20,X5-数字电视*20),Y2+34.333*4+30*4,IF(数字电视>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*5,'网络游戏:'+NUMTOSTRN(网络游戏,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*5+30*4,IF(网络游戏>=0,X5+网络游戏*20,X5-网络游戏*20),Y2+34.333*5+30*5,IF(网络游戏>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*6,'成渝特区:'+NUMTOSTRN(成渝特区,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*6+30*5,IF(成渝特区>=0,X5+成渝特区*20,X5-成渝特区*20),Y2+34.333*6+30*6,IF(成渝特区>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*7,'新 能 源:'+NUMTOSTRN(新能源,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*7+30*6,IF(新能源>=0,800+新能源*20,800-新能源*20),Y2+34.333*7+30*7,IF(新能源>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*8,'铁路基建:'+NUMTOSTRN(铁路基建,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*8+30*7,IF(铁路基建>=0,X5+铁路基建*20,X5-铁路基建*20),Y2+34.333*8+30*8,IF(铁路基建>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*9,'海峡西岸:'+NUMTOSTRN(海峡西岸,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*9+30*8,IF(海峡西岸>=0,X5+海峡西岸*20,X5-海峡西岸*20),Y2+34.333*9+30*9,IF(海峡西岸>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*10,'智能电网:'+NUMTOSTRN(智能电网,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*10+30*9,IF(智能电网>=0,X5+智能电网*20,X5-智能电网*20),Y2+34.333*10+30*10,IF(智能电网>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*11,'节能环保:'+NUMTOSTRN(节能环保,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*11+30*10,IF(节能环保>=0,X5+节能环保*20,X5-节能环保*20),Y2+34.333*11+30*11,IF(节能环保>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*12,'物 联 网:'+NUMTOSTRN(物联网,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*12+30*11,IF(物联网>=0,X5+物联网*20,X5-物联网*20),Y2+34.333*12+30*12,IF(物联网>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*13,'航天军工:'+NUMTOSTRN(航天军工,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*13+30*12,IF(航天军工>=0,X5+航天军工*20,X5-航天军工*20),Y2+34.333*13+30*13,IF(航天军工>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*14,'低碳经济:'+NUMTOSTRN(低碳经济,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*14+30*13,IF(低碳经济>=0,X5+低碳经济*20,X5-低碳经济*20),Y2+34.333*14+30*14,IF(低碳经济>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;
DRAWTEXTABS(X4,Y3*15,'稀缺资源:'+NUMTOSTRN(稀缺资源,2)+'%'),COLORYELLOW;
DRAWRECTREL(X5,Y2+34.333*15+30*14,IF(稀缺资源>=0,X5+稀缺资源*20,X5-稀缺资源*20),Y2+34.333*15+30*15,IF(稀缺资源>=0,RGB(255,0,0),RGB(0,255,0))),COLORBLACK;

[ 本帖最后由 股海二零零九 于 2009-11-21 10:27 编辑 ]

附件

2009-11-20_142413.png
来自 江苏省镇江市

举报

使用道具 扔鸡蛋 回复

您需要登录后才可以回帖 登录

本版积分规则 《理想财富服务协议》《免责声明》

优惠券
优惠券
站长推荐 /8
回顶部 到页底
快速回复 返回顶部 返回列表