V1:="399139$VOL"/ref(ma("399139$VOL",5),1);V2:=("399190$VOL")/ref(ma("399190$VOL",5),1);
V3:=("399132$VOL")/ref(ma("399132$VOL",5),1);V4:=("399150$VOL")/ref(ma("399150$VOL",5),1);
V5:=("399138$VOL")/ref(ma("399138$VOL",5),1);V6:=("399200$VOL")/ref(ma("399200$VOL",5),1);
V7:=("399110$VOL")/ref(ma("399110$VOL",5),1);V8:=("399136$VOL")/ref(ma("399136$VOL",5),1);
V9:=("399135$VOL")/ref(ma("399135$VOL",5),1);V10:=("399130$VOL")/ref(ma("399130$VOL",5),1);
V11:=("399160$VOL")/ref(ma("399160$VOL",5),1);V12:=("399131$VOL")/ref(ma("399131$VOL",5),1);
V13:=("399137$VOL")/ref(ma("399137$VOL",5),1);V14:=("399140$VOL")/ref(ma("399140$VOL",5),1);
V15:=("399210$VOL")/ref(ma("399210$VOL",5),1);V16:=("399005$VOL")/ref(ma("399005$VOL",5),1);
V17:=("399006$VOL")/ref(ma("399006$VOL",5),1);V18:=("399314$VOL")/ref(ma("399314$VOL",5),1);
V19:=("399316$VOL")/ref(ma("399316$VOL",5),1);aa:=BLKNAME;BB:=STRLEFT(AA,STRFIND(AA,',',1)-1);
VAR1:=("399139$CLOSE");VAR2:=("399190$CLOSE");VAR3:=("399132$CLOSE");
VAR4:=("399150$CLOSE");VAR5:=("399138$CLOSE");VAR6:=("399200$CLOSE");
VAR7:=("399110$CLOSE");VAR8:=("399136$CLOSE");VAR9:=("399135$CLOSE");
VAR10:=("399130$CLOSE");VAR11:=("399160$CLOSE");VAR12:=("399131$CLOSE");
VAR13:=("399137$CLOSE");VAR14:=("399140$CLOSE");VAR15:=("399210$CLOSE");
VAR16:=("399005$CLOSE");VAR17:=("399006$CLOSE");VAR18:=("399314$CLOSE");
VAR19:=("399316$CLOSE");HS3:=("399300$CLOSE");K:=STKCOUNT(BB);
DD:=(INDEXC/ref(INDEXC,1)-1)*100;HS:=(hs3/ref(hs3,1)-1)*100;
医药:=(VAR1/REF(VAR1,1)-1)*100;金融:=(VAR2/REF(VAR2,1)-1)*100;
纺织:=(VAR3/REF(VAR3,1)-1)*100;建筑:=(VAR4/REF(VAR4,1)-1)*100;
机械:=(VAR5/REF(VAR5,1)-1)*100;地产:=(VAR6/REF(VAR6,1)-1)*100;
农林:=(VAR7/REF(VAR7,1)-1)*100;电子:=(VAR8/REF(VAR8,1)-1)*100;
石化:=(VAR9/REF(VAR9,1)-1)*100;制造:=(VAR10/REF(VAR10,1)-1)*100;
运输:=(VAR11/REF(VAR11,1)-1)*100;食品:=(VAR12/REF(VAR12,1)-1)*100;
金属:=(VAR13/REF(VAR13,1)-1)*100;水电:=(VAR14/REF(VAR14,1)-1)*100;
服务:=(VAR15/REF(VAR15,1)-1)*100;中小:=(VAR16/REF(VAR16,1)-1)*100;
创业:=(VAR17/REF(VAR17,1)-1)*100;大盘:=(VAR18/REF(VAR18,1)-1)*100;
小盘:=(VAR19/REF(VAR19,1)-1)*100;P:=SYSPARAM(1);
STICKLINE(BARPOS=SYSPARAM(3) and 医药[p]>=0,0,医药[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3) and 医药[p]<0,0,-医药[p],10,0),COLOR00EE00;
STICKLINE(BARPOS=SYSPARAM(3)-7 and 金融[p]>=0,0,金融[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-7 and 金融[p]<0,0,-金融[p],10,0),COLOR00EE00;
STICKLINE(BARPOS=SYSPARAM(3)-14 and 纺织[p]>=0,0,纺织[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-14 and 纺织[p]<0,0,-纺织[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-21 and 建筑[p]>=0,0,建筑[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-21 and 建筑[p]<0,0,-建筑[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-28 and 机械[p]>=0,0,机械[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-28 and 机械[p]<0,0,-机械[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-35 and 地产[p]>=0,0,地产[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-35 and 地产[p]<0,0,-地产[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-42 and 农林[p]>=0,0,农林[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-42 and 农林[p]<0,0,-农林[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-49 and 电子[p]>=0,0,电子[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-49 and 电子[p]<0,0,-电子[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-56 and 石化[p]>=0,0,石化[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-56 and 石化[p]<0,0,-石化[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-63 and 制造[p]>=0,0,制造[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-63 and 制造[p]<0,0,-制造[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-70 and 运输[p]>=0,0,运输[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-70 and 运输[p]<0,0,-运输[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-77 and 食品[p]>=0,0,食品[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-77 and 食品[p]<0,0,-食品[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-84 and 金属[p]>=0,0,金属[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-84 and 金属[p]<0,0,-金属[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-91 and 水电[p]>=0,0,水电[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-91 and 水电[p]<0,0,-水电[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-98 and 服务[p]>=0,0,服务[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-98 and 服务[p]<0,0,-服务[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-105 and 中小[p]>=0,0,中小[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-105 and 中小[p]<0,0,-中小[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-112 and 创业[p]>=0,0,创业[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-112 and 创业[p]<0,0,-创业[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-119 and 大盘[p]>=0,0,大盘[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-119 and 大盘[p]<0,0,-大盘[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-126 and 小盘[p]>=0,0,小盘[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-126 and 小盘[p]<0,0,-小盘[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-2,0,V1[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-9,0,V2[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-16,0,V3[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-23,0,V4[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-30,0,V5[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-37,0,V6[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-44,0,V7[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-51,0,V8[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-58,0,V9[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-65,0,V10[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-72,0,V11[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-79,0,V12[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-86,0,V13[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-93,0,V14[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-100,0,V15[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-107,0,V16[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-114,0,V17[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-121,0,V18[p],10,0),COLORffff00;
STICKLINE(BARPOS=SYSPARAM(3)-128,0,V19[p],10,0),COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3),0,''+NUMTOSTR(V1[p],2)),SHIFT1,PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-6,0,''+NUMTOSTR(V2[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-13,0,''+NUMTOSTR(V3[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-20,0,''+NUMTOSTR(V4[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-27,0,''+NUMTOSTR(V5[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-34,0,''+NUMTOSTR(V6[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-41,0,''+NUMTOSTR(V7[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-48,0,''+NUMTOSTR(V8[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-55,0,''+NUMTOSTR(V9[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-62,0,''+NUMTOSTR(V10[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-69,0,''+NUMTOSTR(V11[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-76,0,''+NUMTOSTR(V12[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-83,0,''+NUMTOSTR(V13[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-90,0,''+NUMTOSTR(V14[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-97,0,''+NUMTOSTR(V15[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-104,0,''+NUMTOSTR(V16[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-111,0,''+NUMTOSTR(V17[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-118,0,''+NUMTOSTR(V18[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3)-125,0,''+NUMTOSTR(V19[p],2)),PXUP18,COLORffff00;
DRAWTEXT(BARPOS=SYSPARAM(3),0,'医药\n\n'+NUMTOSTR(医药[p],2)),SHIFT1,PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-6,0,'金融\n\n'+NUMTOSTR(金融[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-13,0,'纺织\n\n'+NUMTOSTR(纺织[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-20,0,'建筑\n\n'+NUMTOSTR(建筑[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-27,0,'机械\n\n'+NUMTOSTR(机械[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-34,0,'地产\n\n'+NUMTOSTR(地产[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-41,0,'农林\n\n'+NUMTOSTR(农林[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-48,0,'电子\n\n'+NUMTOSTR(电子[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-55,0,'石化\n\n'+NUMTOSTR(石化[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-62,0,'制造\n\n'+NUMTOSTR(制造[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-69,0,'运输\n\n'+NUMTOSTR(运输[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-76,0,'食品\n\n'+NUMTOSTR(食品[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-83,0,'金属\n\n'+NUMTOSTR(金属[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-90,0,'水电\n\n'+NUMTOSTR(水电[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-97,0,'服务\n\n'+NUMTOSTR(服务[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-104,0,'中小\n\n'+NUMTOSTR(中小[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-111,0,'创业\n\n'+NUMTOSTR(创业[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-118,0,'大盘\n\n'+NUMTOSTR(大盘[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-125,0,'小盘\n\n'+NUMTOSTR(小盘[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXTEX(DD[p]>=0,1,470,0,'大盘涨跌幅:'+NUMTOSTR(DD[p],2)+' %'),COLOR0000FF;
DRAWTEXTEX(DD[p]<0,1,470,0,'大盘涨跌幅:'+NUMTOSTR(DD[p],2)+' %'),COLOR00FF00;
DRAWTEXTEX(HS[p]>=0,1,620,0,'沪深300涨跌幅:'+NUMTOSTR(HS[p],2)+' %'),COLOR0000FF;
DRAWTEXTEX(HS[p]<0,1,620,0,'沪深300涨跌幅:'+NUMTOSTR(HS[p],2)+' %'),COLOR00FF00;
DRAWTEXTEX(c,1,10,0,STKNAME+': '+STKLABEL+' 所属板块: '+BB+', 共有：'+NUMTOSTR(K,0)+' 家上市公*'),COLORDD00DD;
DRAWTEXTEX(c,1,10,100,'量比:'+'▄'),COLORffff00;
DRAWTEXTEX(c,1,70,100,'上涨:'+'▄'),COLOR0000EE;
DRAWTEXTEX(c,1,130,100,'下跌:'+'▄'),COLOR00EE00; |
