一发千钧作品

上两个版本都是在系统板块指数框架下制作的,有利也有弊。
利--不需要其它数据、只要是飞狐软件就都可以使用。而且改成通达信指标时不用替换板块代码
弊--反映的板块信息不够全面,证监会板块划分的比较宽泛不细致。
因此,就有很多朋友觉得不过瘾,不能反映大多数板块情况
下面这个指标就是建立在‘千钧个人制作的板块指数’状态下的。
注意:
1、你必须下载使用帖子中的板块指数,或者你自己有能力的,可以分别把你的板块指数代码修改的与指标对应,否则不能正常运行此指标。
2、没有下载我的板块指数的朋友,请不要安装这个指标,因为它无法在你的软件中运行。

图示:

公式文件:板块全息1.alg
板块文件:StkBlock.rar
在附件里

源码
V1:="AA01$VOL"/ref(ma("AA01$VOL",5),1);V2:=("AA02$VOL")/ref(ma("AA02$VOL",5),1);
V3:=("AA03$VOL")/ref(ma("AA03$VOL",5),1);V4:=("AA04$VOL")/ref(ma("AA04$VOL",5),1);
V5:=("AA05$VOL")/ref(ma("AA05$VOL",5),1);V6:=("AA06$VOL")/ref(ma("AA06$VOL",5),1);
V7:=("AA07$VOL")/ref(ma("AA07$VOL",5),1);V8:=("AA08$VOL")/ref(ma("AA08$VOL",5),1);
V9:=("AA09$VOL")/ref(ma("AA09$VOL",5),1);V10:=("AA10$VOL")/ref(ma("AA10$VOL",5),1);
V11:=("AA11$VOL")/ref(ma("AA11$VOL",5),1);V12:=("AA12$VOL")/ref(ma("AA12$VOL",5),1);
V13:=("AA13$VOL")/ref(ma("AA13$VOL",5),1);V14:=("AA14$VOL")/ref(ma("AA14$VOL",5),1);
V15:=("AA15$VOL")/ref(ma("AA15$VOL",5),1);V16:=("AA16$VOL")/ref(ma("AA16$VOL",5),1);
V21:=("AA21$VOL")/ref(ma("AA21$VOL",5),1);V22:=("AA22$VOL")/ref(ma("AA22$VOL",5),1);
V23:=("AA23$VOL")/ref(ma("AA23$VOL",5),1);V24:=("AA24$VOL")/ref(ma("AA24$VOL",5),1);
V25:=("AA25$VOL")/ref(ma("AA25$VOL",5),1);V26:=("AA26$VOL")/ref(ma("AA26$VOL",5),1);
V27:=("AA27$VOL")/ref(ma("AA27$VOL",5),1);V28:=("AA28$VOL")/ref(ma("AA28$VOL",5),1);
V29:=("AA29$VOL")/ref(ma("AA29$VOL",5),1);V30:=("AA30$VOL")/ref(ma("AA30$VOL",5),1);
V31:=("AA31$VOL")/ref(ma("AA31$VOL",5),1);V32:=("AA35$VOL")/ref(ma("AA35$VOL",5),1);
V33:=("AA37$VOL")/ref(ma("AA37$VOL",5),1);V34:=("AA38$VOL")/ref(ma("AA38$VOL",5),1);
V35:=("AA39$VOL")/ref(ma("AA39$VOL",5),1);V36:=("AA40$VOL")/ref(ma("AA40$VOL",5),1);
V37:=("AA43$VOL")/ref(ma("AA43$VOL",5),1);V38:=("AA44$VOL")/ref(ma("AA44$VOL",5),1);
V39:=("399005$VOL")/ref(ma("399005$VOL",5),1);V40:=("399006$VOL")/ref(ma("399006$VOL",5),1);
V41:=("399314$VOL")/ref(ma("399314$VOL",5),1);V42:=("399316$VOL")/ref(ma("399316$VOL",5),1);
aa:=BLKNAME;BB:=STRLEFT(AA,STRFIND(AA,',',1)-1);K:=STKCOUNT(BB);DD:=(INDEXC/ref(INDEXC,1)-1)*100;
Z1:=("AA01$CLOSE"/ref("AA01$CLOSE",1)-1)*100;Z2:=("AA02$CLOSE"/ref("AA02$CLOSE",1)-1)*100;
Z3:=("AA03$CLOSE"/ref("AA03$CLOSE",1)-1)*100;Z4:=("AA04$CLOSE"/ref("AA04$CLOSE",1)-1)*100;
Z5:=("AA05$CLOSE"/ref("AA05$CLOSE",1)-1)*100;Z6:=("AA06$CLOSE"/ref("AA06$CLOSE",1)-1)*100;
Z7:=("AA07$CLOSE"/ref("AA07$CLOSE",1)-1)*100;Z8:=("AA08$CLOSE"/ref("AA08$CLOSE",1)-1)*100;
Z9:=("AA09$CLOSE"/ref("AA09$CLOSE",1)-1)*100;Z10:=("AA10$CLOSE"/ref("AA10$CLOSE",1)-1)*100;
Z11:=("AA11$CLOSE"/ref("AA11$CLOSE",1)-1)*100;Z12:=("AA12$CLOSE"/ref("AA12$CLOSE",1)-1)*100;
Z13:=("AA13$CLOSE"/ref("AA13$CLOSE",1)-1)*100;Z14:=("AA14$CLOSE"/ref("AA14$CLOSE",1)-1)*100;
Z15:=("AA15$CLOSE"/ref("AA15$CLOSE",1)-1)*100;Z16:=("AA16$CLOSE"/ref("AA16$CLOSE",1)-1)*100;
Z21:=("AA21$CLOSE"/ref("AA21$CLOSE",1)-1)*100;Z22:=("AA22$CLOSE"/ref("AA22$CLOSE",1)-1)*100;
Z23:=("AA23$CLOSE"/ref("AA23$CLOSE",1)-1)*100;Z24:=("AA24$CLOSE"/ref("AA24$CLOSE",1)-1)*100;
Z25:=("AA25$CLOSE"/ref("AA25$CLOSE",1)-1)*100;Z26:=("AA26$CLOSE"/ref("AA26$CLOSE",1)-1)*100;
Z27:=("AA27$CLOSE"/ref("AA27$CLOSE",1)-1)*100;Z28:=("AA28$CLOSE"/ref("AA28$CLOSE",1)-1)*100;
Z29:=("AA29$CLOSE"/ref("AA29$CLOSE",1)-1)*100;Z30:=("AA30$CLOSE"/ref("AA30$CLOSE",1)-1)*100;
Z31:=("AA31$CLOSE"/ref("AA31$CLOSE",1)-1)*100;Z32:=("AA35$CLOSE"/ref("AA35$CLOSE",1)-1)*100;
Z33:=("AA37$CLOSE"/ref("AA37$CLOSE",1)-1)*100;Z34:=("AA38$CLOSE"/ref("AA38$CLOSE",1)-1)*100;
Z35:=("AA39$CLOSE"/ref("AA39$CLOSE",1)-1)*100;Z36:=("AA40$CLOSE"/ref("AA40$CLOSE",1)-1)*100;
Z37:=("AA43$CLOSE"/ref("AA43$CLOSE",1)-1)*100;Z38:=("AA44$CLOSE"/ref("AA44$CLOSE",1)-1)*100;
Z39:=("399005$CLOSE"/ref("399005$CLOSE",1)-1)*100;Z40:=("399006$CLOSE"/ref("399006$CLOSE",1)-1)*100;
Z41:=("399314$CLOSE"/ref("399314$CLOSE",1)-1)*100;Z42:=("399316$CLOSE"/ref("399316$CLOSE",1)-1)*100;
HS3:=("399300$CLOSE"/ref("399300$CLOSE",1)-1)*100;P:=SYSPARAM(1);
STICKLINE(BARPOS=SYSPARAM(3) and Z1[p]>=0,0,Z1[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3) and Z1[p]<0,0,-Z1[p],10,0),COLOR00EE00;
STICKLINE(BARPOS=SYSPARAM(3)-7 and Z2[p]>=0,0,Z2[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-7 and Z2[p]<0,0,-Z2[p],10,0),COLOR00EE00;
STICKLINE(BARPOS=SYSPARAM(3)-14 and Z3[p]>=0,0,Z3[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-14 and Z3[p]<0,0,-Z3[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-21 and Z4[p]>=0,0,Z4[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-21 and Z4[p]<0,0,-Z4[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-28 and Z5[p]>=0,0,Z5[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-28 and Z5[p]<0,0,-Z5[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-35 and Z6[p]>=0,0,Z6[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-35 and Z6[p]<0,0,-Z6[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-42 and Z7[p]>=0,0,Z7[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-42 and Z7[p]<0,0,-Z7[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-49 and Z8[p]>=0,0,Z8[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-49 and Z8[p]<0,0,-Z8[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-56 and Z9[p]>=0,0,Z9[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-56 and Z9[p]<0,0,-Z9[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-63 and Z10[p]>=0,0,Z10[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-63 and Z10[p]<0,0,-Z10[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-70 and Z11[p]>=0,0,Z11[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-70 and Z11[p]<0,0,-Z11[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-77 and Z12[p]>=0,0,Z12[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-77 and Z12[p]<0,0,-Z12[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-84 and Z13[p]>=0,0,Z13[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-84 and Z13[p]<0,0,-Z13[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-91 and Z14[p]>=0,0,Z14[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-91 and Z14[p]<0,0,-Z14[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-98 and Z15[p]>=0,0,Z15[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-98 and Z15[p]<0,0,-Z15[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-105 and Z16[p]>=0,0,Z16[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-105 and Z16[p]<0,0,-Z16[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-112 and Z21[p]>=0,0,Z21[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-112 and Z21[p]<0,0,-Z21[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-119 and Z22[p]>=0,0,Z22[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-119 and Z22[p]<0,0,-Z22[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-126 and Z23[p]>=0,0,Z23[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-126 and Z23[p]<0,0,-Z23[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3) and Z24[p]>=0,6,6+Z24[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3) and Z24[p]<0,6,6-Z24[p],10,0),COLOR00EE00;
STICKLINE(BARPOS=SYSPARAM(3)-7 and Z25[p]>=0,6,6+Z25[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-7 and Z25[p]<0,6,6--Z25[p],10,0),COLOR00EE00;
STICKLINE(BARPOS=SYSPARAM(3)-14 and Z26[p]>=0,6,6+Z26[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-14 and Z26[p]<0,6,6--Z26[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-21 and Z27[p]>=0,6,6+Z27[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-21 and Z27[p]<0,6,6--Z27[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-28 and Z28[p]>=0,6,6+Z28[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-28 and Z28[p]<0,6,6--Z28[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-35 and Z29[p]>=0,6,6+Z29[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-35 and Z29[p]<0,6,6--Z29[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-42 and Z30[p]>=0,6,6+Z30[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-42 and Z30[p]<0,6,6-Z30[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-49 and Z31[p]>=0,6,6+Z31[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-49 and Z31[p]<0,6,6-Z31[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-56 and Z32[p]>=0,6,6+Z32[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-56 and Z32[p]<0,6,6-Z32[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-63 and Z33[p]>=0,6,6+Z33[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-63 and Z33[p]<0,6,6-Z33[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-70 and Z34[p]>=0,6,6+Z34[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-70 and Z34[p]<0,6,6-Z34[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-77 and Z35[p]>=0,6,6+Z35[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-77 and Z35[p]<0,6,6-Z35[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-84 and Z36[p]>=0,6,6+Z36[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-84 and Z36[p]<0,6,6-Z36[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-91 and Z37[p]>=0,6,6+Z37[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-91 and Z37[p]<0,6,6-Z37[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-98 and Z38[p]>=0,6,6+Z38[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-98 and Z38[p]<0,6,6-Z38[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-105 and Z39[p]>=0,6,6+Z39[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-105 and Z39[p]<0,6,6-Z39[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-112 and Z40[p]>=0,6,6+Z40[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-112 and Z40[p]<0,6,6-Z40[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-119 and Z41[p]>=0,6,6+Z41[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-119 and Z41[p]<0,6,6-Z41[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-126 and Z42[p]>=0,6,6+Z42[p],10,0),COLOR0000EE;
STICKLINE(BARPOS=SYSPARAM(3)-126 and Z42[p]<0,6,6-Z42[p],10,0),COLOR00ee00;
STICKLINE(BARPOS=SYSPARAM(3)-2,0,V1[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-9,0,V2[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-16,0,V3[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-23,0,V4[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-30,0,V5[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-37,0,V6[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-44,0,V7[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-51,0,V8[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-58,0,V9[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-65,0,V10[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-72,0,V11[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-79,0,V12[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-86,0,V13[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-93,0,V14[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-100,0,V15[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-107,0,V16[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-114,0,V21[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-121,0,V22[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-128,0,V23[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-2,6,6+V24[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-9,6,6+V25[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-16,6,6+V26[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-23,6,6+V27[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-30,6,6+V28[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-37,6,6+V29[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-44,6,6+V30[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-51,6,6+V31[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-58,6,6+V32[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-65,6,6+V33[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-72,6,6+V34[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-79,6,6+V35[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-86,6,6+V36[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-93,6,6+V37[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-100,6,6+V38[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-107,6,6+V39[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-114,6,6+V40[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-121,6,6+V41[p],10,0),COLOREE00EE;
STICKLINE(BARPOS=SYSPARAM(3)-128,6,6+V42[p],10,0),COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3),0,''+NUMTOSTR(V1[p],2)),SHIFT1,PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-6,0,''+NUMTOSTR(V2[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-13,0,''+NUMTOSTR(V3[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-20,0,''+NUMTOSTR(V4[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-27,0,''+NUMTOSTR(V5[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-34,0,''+NUMTOSTR(V6[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-41,0,''+NUMTOSTR(V7[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-48,0,''+NUMTOSTR(V8[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-55,0,''+NUMTOSTR(V9[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-62,0,''+NUMTOSTR(V10[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-69,0,''+NUMTOSTR(V11[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-76,0,''+NUMTOSTR(V12[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-83,0,''+NUMTOSTR(V13[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-90,0,''+NUMTOSTR(V14[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-97,0,''+NUMTOSTR(V15[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-104,0,''+NUMTOSTR(V16[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-111,0,''+NUMTOSTR(V21[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-118,0,''+NUMTOSTR(V22[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3)-125,0,''+NUMTOSTR(V23[p],2)),PXUP18,COLOREE00EE;
DRAWTEXT(BARPOS=SYSPARAM(3),6,''+NUMTOSTR(V24[p],2)),SHIFT1,PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-6,6,''+NUMTOSTR(V25[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-13,6,''+NUMTOSTR(V26[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-20,6,''+NUMTOSTR(V27[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-27,6,''+NUMTOSTR(V28[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-34,6,''+NUMTOSTR(V29[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-41,6,''+NUMTOSTR(V30[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-48,6,''+NUMTOSTR(V31[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-55,6,''+NUMTOSTR(V32[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-62,6,''+NUMTOSTR(V33[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-69,6,''+NUMTOSTR(V34[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-76,6,''+NUMTOSTR(V35[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-83,6,''+NUMTOSTR(V36[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-90,6,''+NUMTOSTR(V37[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-97,6,''+NUMTOSTR(V38[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-104,6,''+NUMTOSTR(V39[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-111,6,''+NUMTOSTR(V40[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-118,6,''+NUMTOSTR(V41[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3)-125,6,''+NUMTOSTR(V42[p],2)),PXUP18,COLOREE8800;
DRAWTEXT(BARPOS=SYSPARAM(3),0,'工程\n\n'+NUMTOSTR(Z1[p],2)),SHIFT1,PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-6,0,'电力\n\n'+NUMTOSTR(Z2[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-13,0,'电脑\n\n'+NUMTOSTR(Z3[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-20,0,'铁路\n\n'+NUMTOSTR(Z4[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-27,0,'地产\n\n'+NUMTOSTR(Z5[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-34,0,'纺织\n\n'+NUMTOSTR(Z6[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-41,0,'钢铁\n\n'+NUMTOSTR(Z7[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-48,0,'水气\n\n'+NUMTOSTR(Z8[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-55,0,'化工\n\n'+NUMTOSTR(Z9[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-62,0,'电器\n\n'+NUMTOSTR(Z10[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-69,0,'交运\n\n'+NUMTOSTR(Z11[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-76,0,'金融\n\n'+NUMTOSTR(Z12[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-83,0,'酒店\n\n'+NUMTOSTR(Z13[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-90,0,'煤油\n\n'+NUMTOSTR(Z14[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-97,0,'食品\n\n'+NUMTOSTR(Z15[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-104,0,'农林\n\n'+NUMTOSTR(Z16[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-111,0,'医药\n\n'+NUMTOSTR(Z21[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-118,0,'外贸\n\n'+NUMTOSTR(Z22[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-125,0,'教育\n\n'+NUMTOSTR(Z23[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3),6,'仪表\n\n'+NUMTOSTR(Z24[p],2)),SHIFT1,PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-6,6,'有色\n\n'+NUMTOSTR(Z25[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-13,6,'造纸\n\n'+NUMTOSTR(Z26[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-20,6,'稀资\n\n'+NUMTOSTR(Z27[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-27,6,'券商\n\n'+NUMTOSTR(Z28[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-34,6,'电力\n\n'+NUMTOSTR(Z29[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-41,6,'通信\n\n'+NUMTOSTR(Z30[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-48,6,'运输\n\n'+NUMTOSTR(Z31[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-55,6,'全 A\n\n'+NUMTOSTR(Z32[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-62,6,'航军\n\n'+NUMTOSTR(Z33[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-69,6,'材料\n\n'+NUMTOSTR(Z34[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-76,6,'环保\n\n'+NUMTOSTR(Z35[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-83,6,'能源\n\n'+NUMTOSTR(Z36[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-90,6,'网游\n\n'+NUMTOSTR(Z37[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-97,6,'汽车\n\n'+NUMTOSTR(Z38[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-104,6,'中小\n\n'+NUMTOSTR(Z39[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-111,6,'创业\n\n'+NUMTOSTR(Z40[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-118,6,'大盘\n\n'+NUMTOSTR(Z41[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXT(BARPOS=SYSPARAM(3)-125,6,'小盘\n\n'+NUMTOSTR(Z42[p],2)),PXUP68,COLORDDDDDD;
DRAWTEXTEX(DD[p]>=0,1,390,0,'当前对应市场跌幅:'+NUMTOSTR(DD[p],2)+' %'),COLOR0000FF;
DRAWTEXTEX(DD[p]<0,1,390,0,'当前对应市场涨跌幅:'+NUMTOSTR(DD[p],2)+' %'),COLOR00FF00;
DRAWTEXTEX(HS3[p]>=0,1,570,0,'当前沪深300 涨跌幅:'+NUMTOSTR(HS3[p],2)+' %'),COLOR0000FF;
DRAWTEXTEX(HS3[p]<0,1,570,0,'当前沪深300 涨跌幅:'+NUMTOSTR(HS3[p],2)+' %'),COLOR00FF00;
DRAWTEXTEX(c,1,10,0,STKNAME+': '+STKLABEL+' 所属板块: '+BB+', 共有:'+NUMTOSTR(K,0)+' 家上市公*'),COLOR00DDDD;
DRAWTEXTEX(c,1,750,0,'量比:'+'▄'),COLOREE00EE;DRAWTEXTEX(c,1,810,0,'上涨:'+'▄'),COLOR0000EE;
DRAWTEXTEX(c,1,870,0,'下跌:'+'▄'),COLOR00EE00;12,COLORBLACK;
 

提示:
指标中的【全 A】板块指数,就是很多朋友想尽办法想弄到的“全部A股”的算术平均价指数。
它的板块定义是:
 


© 著作权归作者所有,未经允许《飞狐股票公式:板块全息--自定义指数版(一发千钧作品 副图 源码 公式文件 贴图和说明)》不得转载