分析家公式网,免费股票公式,股票软件下载站 用户登录  |  用户注册
板块全息B解盘
  • 软件大小:84.0 KB
  • 推荐星级:
  • 更新时间:2010-12-16 07:38:28
  • 软件类别: 国产软件 / 飞狐股票公式
  • 软件语言:简体中文
  • 授权方式: 免费版
  • 联系方式:暂无联系方式
  • 官方主页: Home Page
  • 点击大图:  【一键转帖到论坛】
  • 插件情况:
  • 运行环境:Win9X/Win2000/WinXP/Win2003/
  • 相关Tags:板块全息B解盘  
  • (13)72%
    (5)28%

软件简介

板块全息B解盘
名称: 板块全息B解盘
说明: 新板块柱显,解盘涨幅资金流入
{自定义板块动量比}
V1:="AA04$VOL"/ref(ma("AA04$VOL",5),1);   V2:=("AA07$VOL")/ref(ma("AA07$VOL",5),1); V3:=("AA09$VOL")/ref(ma("AA09$VOL",5),1);
V4:=("AA11$VOL")/ref(ma("AA11$VOL",5),1); V5:=("AA12$VOL")/ref(ma("AA12$VOL",5),1); V6:=("AA13$VOL")/ref(ma("AA13$VOL",5),1);
V7:=("AA14$VOL")/ref(ma("AA14$VOL",5),1); V8:=("AA17$VOL")/ref(ma("AA17$VOL",5),1); V9:=("AA18$VOL")/ref(ma("AA18$VOL",5),1);
V10:=("AA23$VOL")/ref(ma("AA23$VOL",5),1);V11:=("AA25$VOL")/ref(ma("AA25$VOL",5),1);V12:=("AA26$VOL")/ref(ma("AA26$VOL",5),1);
V13:=("AA29$VOL")/ref(ma("AA29$VOL",5),1);V14:=("AA30$VOL")/ref(ma("AA30$VOL",5),1);V15:=("AA32$VOL")/ref(ma("AA32$VOL",5),1);
V16:=("AA33$VOL")/ref(ma("AA33$VOL",5),1);V17:=("AA38$VOL")/ref(ma("AA38$VOL",5),1);V18:=("AA41$VOL")/ref(ma("AA41$VOL",5),1);
V19:=("AA44$VOL")/ref(ma("AA44$VOL",5),1);V20:=("AA45$VOL")/ref(ma("AA45$VOL",5),1);V21:=("AA46$VOL")/ref(ma("AA46$VOL",5),1);
V22:=("AA47$VOL")/ref(ma("AA47$VOL",5),1);V23:=("AA48$VOL")/ref(ma("AA48$VOL",5),1);V24:=("AA50$VOL")/ref(ma("AA50$VOL",5),1);
V25:=("AA53$VOL")/ref(ma("AA53$VOL",5),1);V26:=("AA58$VOL")/ref(ma("AA58$VOL",5),1);V27:=("AA63$VOL")/ref(ma("AA63$VOL",5),1);
V28:=("AA64$VOL")/ref(ma("AA64$VOL",5),1);V29:=("AA65$VOL")/ref(ma("AA65$VOL",5),1);V30:=("AA66$VOL")/ref(ma("AA66$VOL",5),1);
V31:=("AA73$VOL")/ref(ma("AA73$VOL",5),1);V32:=("AA74$VOL")/ref(ma("AA74$VOL",5),1);V33:=("AA78$VOL")/ref(ma("AA78$VOL",5),1);
V34:=("AA81$VOL")/ref(ma("AA81$VOL",5),1);V35:=("AA82$VOL")/ref(ma("AA82$VOL",5),1);V36:=("AA83$VOL")/ref(ma("AA83$VOL",5),1);
V37:=("AA87$VOL")/ref(ma("AA87$VOL",5),1);V38:=("AA96$VOL")/ref(ma("AA96$VOL",5),1);V39:=("AA97$VOL")/ref(ma("AA97$VOL",5),1);
V40:=("AA98$VOL")/ref(ma("AA98$VOL",5),1);V41:=("BB03$VOL")/ref(ma("BB03$VOL",5),1);V42:=("BB04$VOL")/ref(ma("BB04$VOL",5),1);
V43:=("BB06$VOL")/ref(ma("BB06$VOL",5),1);V44:=("BB33$VOL")/ref(ma("BB33$VOL",5),1);V45:=("BB76$VOL")/ref(ma("BB76$VOL",5),1);
V46:=("399005$VOL")/ref(ma("399005$VOL",5),1);V47:=("399006$VOL")/ref(ma("399006$VOL",5),1);V48:=("399314$VOL")/ref(ma("399314$VOL",5),1);
V49:=("399315$VOL")/ref(ma("399315$VOL",5),1);V50:=("399316$VOL")/ref(ma("399316$VOL",5),1);
{19自定义指数涨跌幅}
Z1:=("AA04$CLOSE"/ref("AA04$CLOSE",1)-1)*100; Z2:=("AA07$CLOSE"/ref("AA07$CLOSE",1)-1)*100; Z3:=("AA09$CLOSE"/ref("AA09$CLOSE",1)-1)*100;
Z4:=("AA11$CLOSE"/ref("AA11$CLOSE",1)-1)*100; Z5:=("AA12$CLOSE"/ref("AA12$CLOSE",1)-1)*100; Z6:=("AA13$CLOSE"/ref("AA13$CLOSE",1)-1)*100;
Z7:=("AA14$CLOSE"/ref("AA14$CLOSE",1)-1)*100; Z8:=("AA17$CLOSE"/ref("AA17$CLOSE",1)-1)*100; Z9:=("AA18$CLOSE"/ref("AA18$CLOSE",1)-1)*100;
Z10:=("AA23$CLOSE"/ref("AA23$CLOSE",1)-1)*100;Z11:=("AA25$CLOSE"/ref("AA25$CLOSE",1)-1)*100;Z12:=("AA26$CLOSE"/ref("AA26$CLOSE",1)-1)*100;
Z13:=("AA29$CLOSE"/ref("AA29$CLOSE",1)-1)*100;Z14:=("AA30$CLOSE"/ref("AA30$CLOSE",1)-1)*100;Z15:=("AA32$CLOSE"/ref("AA32$CLOSE",1)-1)*100;
Z16:=("AA33$CLOSE"/ref("AA33$CLOSE",1)-1)*100;Z17:=("AA38$CLOSE"/ref("AA38$CLOSE",1)-1)*100;Z18:=("AA41$CLOSE"/ref("AA41$CLOSE",1)-1)*100;
Z19:=("AA44$CLOSE"/ref("AA44$CLOSE",1)-1)*100;Z20:=("AA45$CLOSE"/ref("AA45$CLOSE",1)-1)*100;Z21:=("AA46$CLOSE"/ref("AA46$CLOSE",1)-1)*100;
Z22:=("AA47$CLOSE"/ref("AA47$CLOSE",1)-1)*100;Z23:=("AA48$CLOSE"/ref("AA48$CLOSE",1)-1)*100;Z24:=("AA50$CLOSE"/ref("AA50$CLOSE",1)-1)*100;
Z25:=("AA53$CLOSE"/ref("AA53$CLOSE",1)-1)*100;Z26:=("AA58$CLOSE"/ref("AA58$CLOSE",1)-1)*100;Z27:=("AA63$CLOSE"/ref("AA63$CLOSE",1)-1)*100;
Z28:=("AA64$CLOSE"/ref("AA64$CLOSE",1)-1)*100;Z29:=("AA65$CLOSE"/ref("AA65$CLOSE",1)-1)*100;Z30:=("AA66$CLOSE"/ref("AA66$CLOSE",1)-1)*100;
Z31:=("AA73$CLOSE"/ref("AA73$CLOSE",1)-1)*100;Z32:=("AA74$CLOSE"/ref("AA74$CLOSE",1)-1)*100;Z33:=("AA78$CLOSE"/ref("AA78$CLOSE",1)-1)*100;
Z34:=("AA81$CLOSE"/ref("AA81$CLOSE",1)-1)*100;Z35:=("AA82$CLOSE"/ref("AA82$CLOSE",1)-1)*100;Z36:=("AA83$CLOSE"/ref("AA83$CLOSE",1)-1)*100;
Z37:=("AA87$CLOSE"/ref("AA87$CLOSE",1)-1)*100;Z38:=("AA96$CLOSE"/ref("AA96$CLOSE",1)-1)*100;Z39:=("AA97$CLOSE"/ref("AA97$CLOSE",1)-1)*100;
Z40:=("AA98$CLOSE"/ref("AA98$CLOSE",1)-1)*100;Z41:=("BB03$CLOSE"/ref("BB03$CLOSE",1)-1)*100;Z42:=("BB04$CLOSE"/ref("BB04$CLOSE",1)-1)*100;
Z43:=("BB06$CLOSE"/ref("BB06$CLOSE",1)-1)*100;Z44:=("BB33$CLOSE"/ref("BB33$CLOSE",1)-1)*100;Z45:=("BB76$CLOSE"/ref("BB76$CLOSE",1)-1)*100;
Z46:=("399005$CLOSE"/ref("399005$CLOSE",1)-1)*100;Z47:=("399006$CLOSE"/ref("399006$CLOSE",1)-1)*100;
Z48:=("399314$CLOSE"/ref("399314$CLOSE",1)-1)*100;Z49:=("399315$CLOSE"/ref("399315$CLOSE",1)-1)*100;
Z50:=("399316$CLOSE"/ref("399316$CLOSE",1)-1)*100;
{}
WV:=MAX(V1,MAX(V2,MAX(V3,MAX(V4,MAX(V5,MAX(V6,MAX(V7,MAX(V8,MAX(V9,MAX(V10,MAX(V11,MAX(V12,MAX(V13,MAX(V14,MAX(V15,MAX(V16,MAX(V17,
    MAX(V18,MAX(V19,MAX(V20,MAX(V21,MAX(V22,MAX(V23,MAX(V24,V25))))))))))))))))))))))));
WZ:=MAX(Z1,MAX(Z2,MAX(Z3,MAX(Z4,MAX(Z5,MAX(Z6,MAX(Z7,MAX(Z8,MAX(Z9,MAX(Z10,MAX(Z11,MAX(Z12,MAX(Z13,MAX(Z14,MAX(Z15,MAX(Z16,MAX(Z17,
    MAX(Z18,MAX(Z19,MAX(Z20,MAX(Z21,MAX(Z22,MAX(Z23,MAX(Z24,Z25))))))))))))))))))))))));
WZ2:=MIN(Z1,MIN(Z2,MIN(Z3,MIN(Z4,MIN(Z5,MIN(Z6,MIN(Z7,MIN(Z8,MIN(Z9,MIN(Z10,MIN(Z11,MIN(Z12,MIN(Z13,MIN(Z14,MIN(Z15,MIN(Z16,MIN(Z17,
    MIN(Z18,MIN(Z19,MIN(Z20,MIN(Z21,MIN(Z22,MIN(Z23,MIN(Z24,Z25))))))))))))))))))))))));
{} P:=SYSPARAM(1);
ZMAX:=MAX(WZ[p],ABS(WZ2[p])); ZX:=if(WV[p]-ZMAX/2>0,WV[p],ZMAX/2); X:=ZX+0.1;//控制二楼柱高起始位置.
WVb:=MAX(V26,MAX(V27,MAX(V28,MAX(V29,MAX(V30,MAX(V31,MAX(V32,MAX(V33,MAX(V34,MAX(V35,MAX(V36,MAX(V37,MAX(V38,MAX(V39,MAX(V40,MAX(V41,
     MAX(V42,MAX(V43,MAX(V44,MAX(V45,MAX(V46,MAX(V47,MAX(V48,MAX(V49,V50))))))))))))))))))))))));
WZb:=MAX(Z26,MAX(Z27,MAX(Z28,MAX(Z29,MAX(Z30,MAX(Z31,MAX(Z32,MAX(Z33,MAX(Z34,MAX(Z35,MAX(Z36,MAX(Z37,MAX(Z38,MAX(Z39,MAX(Z40,MAX(Z41,
     MAX(Z42,MAX(Z43,MAX(Z44,MAX(Z45,MAX(Z46,MAX(Z47,MAX(Z48,MAX(Z49,Z50))))))))))))))))))))))));
WZb2:=MIN(Z26,MIN(Z27,MIN(Z28,MIN(Z29,MIN(Z30,MIN(Z31,MIN(Z32,MIN(Z33,MIN(Z34,MIN(Z35,MIN(Z36,MIN(Z37,MIN(Z38,MIN(Z39,MIN(Z40,MIN(Z41,
     MIN(Z42,MIN(Z43,MIN(Z44,MIN(Z45,MIN(Z46,MIN(Z47,MIN(Z48,MIN(Z49,Z50))))))))))))))))))))))));
ZBMAX:=MAX(WZb[p],ABS(WZb2[p])); ZbX:=if(WVb[p]-ZBMAX/2>0,WVb[p],ZBMAX/2); Z:ZbX+X+0.25,PRECISION2,COLORBLACK;//控制二楼柱高顶距.
{} w:=BARPOS; q:=SYSPARAM(3);
STICKLINE(w=q    and Z1[p]>=0,0, Z1[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q    and Z1[p]<0,0,-Z1[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-7  and Z2[p]>=0,0, Z2[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-7  and Z2[p]<0,0,-Z2[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-14 and Z3[p]>=0,0, Z3[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-14 and Z3[p]<0,0,-Z3[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-21 and Z4[p]>=0,0, Z4[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-21 and Z4[p]<0,0,-Z4[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-28 and Z5[p]>=0,0, Z5[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-28 and Z5[p]<0,0,-Z5[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-35 and Z6[p]>=0,0, Z6[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-35 and Z6[p]<0,0,-Z6[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-42 and Z7[p]>=0,0, Z7[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-42 and Z7[p]<0,0,-Z7[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-49 and Z8[p]>=0,0, Z8[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-49 and Z8[p]<0,0,-Z8[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-56 and Z9[p]>=0,0, Z9[p]/2,10,0),COLOR0000AA;  STICKLINE(w=q-56 and Z9[p]<0,0,-Z9[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-63 and Z10[p]>=0,0, Z10[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-63 and Z10[p]<0,0,-Z10[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-70  and Z11[p]>=0,0, Z11[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-70  and Z11[p]<0,0,-Z11[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-77  and Z12[p]>=0,0, Z12[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-77  and Z12[p]<0,0,-Z12[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-84  and Z13[p]>=0,0, Z13[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-84  and Z13[p]<0,0,-Z13[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-91  and Z14[p]>=0,0, Z14[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-91  and Z14[p]<0,0,-Z14[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-98  and Z15[p]>=0,0, Z15[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-98  and Z15[p]<0,0,-Z15[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-105 and Z16[p]>=0,0, Z16[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-105 and Z16[p]<0,0,-Z16[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-112 and Z17[p]>=0,0, Z17[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-112 and Z17[p]<0,0,-Z17[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-119 and Z18[p]>=0,0, Z18[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-119 and Z18[p]<0,0,-Z18[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-126 and Z19[p]>=0,0, Z19[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-126 and Z19[p]<0,0,-Z19[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-133 and Z20[p]>=0,0, Z20[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-133 and Z20[p]<0,0,-Z20[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-140 and Z21[p]>=0,0, Z21[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-140 and Z21[p]<0,0,-Z21[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-147 and Z22[p]>=0,0, Z22[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-147 and Z22[p]<0,0,-Z22[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-154 and Z23[p]>=0,0, Z23[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-154 and Z23[p]<0,0,-Z23[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-161 and Z24[p]>=0,0, Z24[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-161 and Z24[p]<0,0,-Z24[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-168 and Z25[p]>=0,0, Z25[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-168 and Z25[p]<0,0,-Z25[p]/2,10,0),COLOR00AA00;
{}
STICKLINE(w=q    and Z26[p]>=0,X,X+Z26[p]/2,10,0),COLOR0000AA;STICKLINE(w=q    and Z26[p]<0,X,X-Z26[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-7  and Z27[p]>=0,X,X+Z27[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-7  and Z27[p]<0,X,X-Z27[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-14 and Z28[p]>=0,X,X+Z28[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-14 and Z28[p]<0,X,X-Z28[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-21 and Z29[p]>=0,X,X+Z29[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-21 and Z29[p]<0,X,X-Z29[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-28 and Z30[p]>=0,X,X+Z30[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-28 and Z30[p]<0,X,X-Z30[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-35 and Z31[p]>=0,X,X+Z31[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-35 and Z31[p]<0,X,X-Z31[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-42 and Z32[p]>=0,X,X+Z32[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-42 and Z32[p]<0,X,X-Z32[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-49 and Z33[p]>=0,X,X+Z33[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-49 and Z33[p]<0,X,X-Z33[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-56 and Z34[p]>=0,X,X+Z34[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-56 and Z34[p]<0,X,X-Z34[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-63 and Z35[p]>=0,X,X+Z35[p]/2,10,0),COLOR0000AA;STICKLINE(w=q-63 and Z35[p]<0,X,X-Z35[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-70  and Z36[p]>=0,X,X+Z36[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-70  and Z36[p]<0,X,X-Z36[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-77  and Z37[p]>=0,X,X+Z37[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-77  and Z37[p]<0,X,X-Z37[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-84  and Z38[p]>=0,X,X+Z38[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-84  and Z38[p]<0,X,X-Z38[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-91  and Z39[p]>=0,X,X+Z39[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-91  and Z39[p]<0,X,X-Z39[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-98  and Z40[p]>=0,X,X+Z40[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-98  and Z40[p]<0,X,X-Z40[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-105 and Z41[p]>=0,X,X+Z41[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-105 and Z41[p]<0,X,X-Z41[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-112 and Z42[p]>=0,X,X+Z42[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-112 and Z42[p]<0,X,X-Z42[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-119 and Z43[p]>=0,X,X+Z43[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-119 and Z43[p]<0,X,X-Z43[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-126 and Z44[p]>=0,X,X+Z44[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-126 and Z44[p]<0,X,X-Z44[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-133 and Z45[p]>=0,X,X+Z45[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-133 and Z45[p]<0,X,X-Z45[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-140 and Z46[p]>=0,X,X+Z46[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-140 and Z46[p]<0,X,X-Z46[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-147 and Z47[p]>=0,X,X+Z47[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-147 and Z47[p]<0,X,X-Z47[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-154 and Z48[p]>=0,X,X+Z48[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-154 and Z48[p]<0,X,X-Z48[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-161 and Z49[p]>=0,X,X+Z49[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-161 and Z49[p]<0,X,X-Z49[p]/2,10,0),COLOR00AA00;
STICKLINE(w=q-168 and Z50[p]>=0,X,X+Z50[p]/2,10,0),COLOR0000AA; STICKLINE(w=q-168 and Z50[p]<0,X,X-Z50[p]/2,10,0),COLOR00AA00;
{}
STICKLINE(w=q-2  and V1[p]>=1, 0,V1[p],5,0),COLOR008888; STICKLINE(w=q-2  and V1[p]<1, 0,V1[p],5,0),COLOR888800;
STICKLINE(w=q-9  and V2[p]>=1, 0,V2[p],5,0),COLOR008888; STICKLINE(w=q-9  and V2[p]<1, 0,V2[p],5,0),COLOR888800;
STICKLINE(w=q-16 and V3[p]>=1, 0,V3[p],5,0),COLOR008888; STICKLINE(w=q-16 and V3[p]<1, 0,V3[p],5,0),COLOR888800;
STICKLINE(w=q-23 and V4[p]>=1, 0,V4[p],5,0),COLOR008888; STICKLINE(w=q-23 and V4[p]<1, 0,V4[p],5,0),COLOR888800;
STICKLINE(w=q-30 and V5[p]>=1, 0,V5[p],5,0),COLOR008888; STICKLINE(w=q-30 and V5[p]<1, 0,V5[p],5,0),COLOR888800;
STICKLINE(w=q-37 and V6[p]>=1, 0,V6[p],5,0),COLOR008888; STICKLINE(w=q-37 and V6[p]<1, 0,V6[p],5,0),COLOR888800;
STICKLINE(w=q-44 and V7[p]>=1, 0,V7[p],5,0),COLOR008888; STICKLINE(w=q-44 and V7[p]<1, 0,V7[p],5,0),COLOR888800;
STICKLINE(w=q-51 and V8[p]>=1, 0,V8[p],5,0),COLOR008888; STICKLINE(w=q-51 and V8[p]<1, 0,V8[p],5,0),COLOR888800;
STICKLINE(w=q-58 and V9[p]>=1, 0,V9[p],5,0),COLOR008888; STICKLINE(w=q-58 and V9[p]<1, 0,V9[p],5,0),COLOR888800;
STICKLINE(w=q-65 and V10[p]>=1,0,V10[p],5,0),COLOR008888;STICKLINE(w=q-65 and V10[p]<1,0,V10[p],5,0),COLOR888800;
STICKLINE(w=q-72  and V11[p]>=1,0,V11[p],5,0),COLOR008888;STICKLINE(w=q-72  and V11[p]<1,0,V11[p],5,0),COLOR888800;
STICKLINE(w=q-79  and V12[p]>=1,0,V12[p],5,0),COLOR008888;STICKLINE(w=q-79  and V12[p]<1,0,V12[p],5,0),COLOR888800;
STICKLINE(w=q-86  and V13[p]>=1,0,V13[p],5,0),COLOR008888;STICKLINE(w=q-86  and V13[p]<1,0,V13[p],5,0),COLOR888800;
STICKLINE(w=q-93  and V14[p]>=1,0,V14[p],5,0),COLOR008888;STICKLINE(w=q-93  and V14[p]<1,0,V14[p],5,0),COLOR888800;
STICKLINE(w=q-100 and V15[p]>=1,0,V15[p],5,0),COLOR008888;STICKLINE(w=q-100 and V15[p]<1,0,V15[p],5,0),COLOR888800;
STICKLINE(w=q-107 and V16[p]>=1,0,V16[p],5,0),COLOR008888;STICKLINE(w=q-107 and V16[p]<1,0,V16[p],5,0),COLOR888800;
STICKLINE(w=q-114 and V17[p]>=1,0,V17[p],5,0),COLOR008888;STICKLINE(w=q-114 and V17[p]<1,0,V17[p],5,0),COLOR888800;
STICKLINE(w=q-121 and V18[p]>=1,0,V18[p],5,0),COLOR008888;STICKLINE(w=q-121 and V18[p]<1,0,V18[p],5,0),COLOR888800;
STICKLINE(w=q-128 and V19[p]>=1,0,V19[p],5,0),COLOR008888;STICKLINE(w=q-128 and V19[p]<1,0,V19[p],5,0),COLOR888800;
STICKLINE(w=q-135 and V20[p]>=1,0,V20[p],5,0),COLOR008888;STICKLINE(w=q-135 and V20[p]<1,0,V20[p],5,0),COLOR888800;
STICKLINE(w=q-142 and V21[p]>=1,0,V21[p],5,0),COLOR008888;STICKLINE(w=q-142 and V21[p]<1,0,V21[p],5,0),COLOR888800;
STICKLINE(w=q-149 and V22[p]>=1,0,V22[p],5,0),COLOR008888;STICKLINE(w=q-149 and V22[p]<1,0,V22[p],5,0),COLOR888800;
STICKLINE(w=q-156 and V23[p]>=1,0,V23[p],5,0),COLOR008888;STICKLINE(w=q-156 and V23[p]<1,0,V23[p],5,0),COLOR888800;
STICKLINE(w=q-163 and V24[p]>=1,0,V24[p],5,0),COLOR008888;STICKLINE(w=q-163 and V24[p]<1,0,V24[p],5,0),COLOR888800;
STICKLINE(w=q-170 and V25[p]>=1,0,V25[p],5,0),COLOR008888;STICKLINE(w=q-170 and V25[p]<1,0,V25[p],5,0),COLOR888800;
STICKLINE(w=q-2  and V26[p]>=1,X,X+V26[p],5,0),COLOR008888;STICKLINE(w=q-2  and V26[p]<1,X,X+V26[p],5,0),COLOR888800;
STICKLINE(w=q-9  and V27[p]>=1,X,X+V27[p],5,0),COLOR008888;STICKLINE(w=q-9  and V27[p]<1,X,X+V27[p],5,0),COLOR888800;
STICKLINE(w=q-16 and V28[p]>=1,X,X+V28[p],5,0),COLOR008888;STICKLINE(w=q-16 and V28[p]<1,X,X+V28[p],5,0),COLOR888800;
STICKLINE(w=q-23 and V29[p]>=1,X,X+V29[p],5,0),COLOR008888;STICKLINE(w=q-23 and V29[p]<1,X,X+V29[p],5,0),COLOR888800;
STICKLINE(w=q-30 and V30[p]>=1,X,X+V30[p],5,0),COLOR008888;STICKLINE(w=q-30 and V30[p]<1,X,X+V30[p],5,0),COLOR888800;
STICKLINE(w=q-37 and V31[p]>=1,X,X+V31[p],5,0),COLOR008888;STICKLINE(w=q-37 and V31[p]<1,X,X+V31[p],5,0),COLOR888800;
STICKLINE(w=q-44 and V32[p]>=1,X,X+V32[p],5,0),COLOR008888;STICKLINE(w=q-44 and V32[p]<1,X,X+V32[p],5,0),COLOR888800;
STICKLINE(w=q-51 and V33[p]>=1,X,X+V33[p],5,0),COLOR008888;STICKLINE(w=q-51 and V33[p]<1,X,X+V33[p],5,0),COLOR888800;
STICKLINE(w=q-58 and V34[p]>=1,X,X+V34[p],5,0),COLOR008888;STICKLINE(w=q-58 and V34[p]<1,X,X+V34[p],5,0),COLOR888800;
STICKLINE(w=q-65 and V35[p]>=1,X,X+V35[p],5,0),COLOR008888;STICKLINE(w=q-65 and V35[p]<1,X,X+V35[p],5,0),COLOR888800;
STICKLINE(w=q-72  and V36[p]>=1,X,X+V36[p],5,0),COLOR008888;STICKLINE(w=q-72  and V36[p]<1,X,X+V36[p],5,0),COLOR888800;
STICKLINE(w=q-79  and V37[p]>=1,X,X+V37[p],5,0),COLOR008888;STICKLINE(w=q-79  and V37[p]<1,X,X+V37[p],5,0),COLOR888800;
STICKLINE(w=q-86  and V38[p]>=1,X,X+V38[p],5,0),COLOR008888;STICKLINE(w=q-86  and V38[p]<1,X,X+V38[p],5,0),COLOR888800;
STICKLINE(w=q-93  and V39[p]>=1,X,X+V39[p],5,0),COLOR008888;STICKLINE(w=q-93  and V39[p]<1,X,X+V39[p],5,0),COLOR888800;
STICKLINE(w=q-100 and V40[p]>=1,X,X+V40[p],5,0),COLOR008888;STICKLINE(w=q-100 and V40[p]<1,X,X+V40[p],5,0),COLOR888800;
STICKLINE(w=q-107 and V41[p]>=1,X,X+V41[p],5,0),COLOR008888;STICKLINE(w=q-107 and V41[p]<1,X,X+V41[p],5,0),COLOR888800;
STICKLINE(w=q-114 and V42[p]>=1,X,X+V42[p],5,0),COLOR008888;STICKLINE(w=q-114 and V42[p]<1,X,X+V42[p],5,0),COLOR888800;
STICKLINE(w=q-121 and V43[p]>=1,X,X+V43[p],5,0),COLOR008888;STICKLINE(w=q-121 and V43[p]<1,X,X+V43[p],5,0),COLOR888800;
STICKLINE(w=q-128 and V44[p]>=1,X,X+V44[p],5,0),COLOR008888;STICKLINE(w=q-128 and V44[p]<1,X,X+V44[p],5,0),COLOR888800;
STICKLINE(w=q-135 and V45[p]>=1,X,X+V45[p],5,0),COLOR008888;STICKLINE(w=q-135 and V45[p]<1,X,X+V45[p],5,0),COLOR888800;
STICKLINE(w=q-142 and V46[p]>=1,X,X+V46[p],5,0),COLOR008888;STICKLINE(w=q-142 and V46[p]<1,X,X+V46[p],5,0),COLOR888800;
STICKLINE(w=q-149 and V47[p]>=1,X,X+V47[p],5,0),COLOR008888;STICKLINE(w=q-149 and V47[p]<1,X,X+V47[p],5,0),COLOR888800;
STICKLINE(w=q-156 and V48[p]>=1,X,X+V48[p],5,0),COLOR008888;STICKLINE(w=q-156 and V48[p]<1,X,X+V48[p],5,0),COLOR888800;
STICKLINE(w=q-163 and V49[p]>=1,X,X+V49[p],5,0),COLOR008888;STICKLINE(w=q-163 and V49[p]<1,X,X+V49[p],5,0),COLOR888800;
STICKLINE(w=q-170 and V50[p]>=1,X,X+V50[p],5,0),COLOR008888;STICKLINE(w=q-170 and V50[p]<1,X,X+V50[p],5,0),COLOR888800;
{}
DRAWTEXT(w=q,   0,'银行\n\n'+NUMTOSTR(Z1[p],2)+'\n'+NUMTOSTR(V1[p],2)),SHIFT1,PXUP68,COLOR00BBBB;
DRAWTEXT(w=q-6, 0,'地产\n\n'+NUMTOSTR(Z2[p],2)+'\n'+NUMTOSTR(V2[p],2)),PXUP68,COLOR00BBBB;
DRAWTEXT(w=q-13,0,'钢铁\n\n'+NUMTOSTR(Z3[p],2)+'\n'+NUMTOSTR(V3[p],2)),PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-20,0,'有色\n\n'+NUMTOSTR(Z4[p],2)+'\n'+NUMTOSTR(V4[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-27,0,'永磁\n\n'+NUMTOSTR(Z5[p],2)+'\n'+NUMTOSTR(V5[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-34,0,'稀缺\n\n'+NUMTOSTR(Z6[p],2)+'\n'+NUMTOSTR(V6[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-41,0,'资优\n\n'+NUMTOSTR(Z7[p],2)+'\n'+NUMTOSTR(V7[p],2)),PXUP68,COLOR0099DD;
DRAWTEXT(w=q-48,0,'煤油\n\n'+NUMTOSTR(Z8[p],2)+'\n'+NUMTOSTR(V8[p],2)),PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-55,0,'电力\n\n'+NUMTOSTR(Z9[p],2)+'\n'+NUMTOSTR(V9[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-62,0,'电设\n\n'+NUMTOSTR(Z10[p],2)+'\n'+NUMTOSTR(V10[p],2)),PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-69,0,'石化\n\n'+NUMTOSTR(Z11[p],2)+'\n'+NUMTOSTR(V11[p],2)),PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-76,0,'化纤\n\n'+NUMTOSTR(Z12[p],2)+'\n'+NUMTOSTR(V12[p],2)),PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-83,0,'水气\n\n'+NUMTOSTR(Z13[p],2)+'\n'+NUMTOSTR(V13[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-90,0,'环保\n\n'+NUMTOSTR(Z14[p],2)+'\n'+NUMTOSTR(V14[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-97,0,'汽车\n\n'+NUMTOSTR(Z15[p],2)+'\n'+NUMTOSTR(V15[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-104,0,'汽配\n\n'+NUMTOSTR(Z16[p],2)+'\n'+NUMTOSTR(V16[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-111,0,'铁建\n\n'+NUMTOSTR(Z17[p],2)+'\n'+NUMTOSTR(V17[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-118,0,'运输\n\n'+NUMTOSTR(Z18[p],2)+'\n'+NUMTOSTR(V18[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-125,0,'交设\n\n'+NUMTOSTR(Z19[p],2)+'\n'+NUMTOSTR(V19[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-132,0,'通信\n\n'+NUMTOSTR(Z20[p],2)+'\n'+NUMTOSTR(V20[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-139,0,'电器\n\n'+NUMTOSTR(Z21[p],2)+'\n'+NUMTOSTR(V21[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-146,0,'电脑\n\n'+NUMTOSTR(Z22[p],2)+'\n'+NUMTOSTR(V22[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-153,0,'信息\n\n'+NUMTOSTR(Z23[p],2)+'\n'+NUMTOSTR(V23[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-160,0,'网游\n\n'+NUMTOSTR(Z24[p],2)+'\n'+NUMTOSTR(V24[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-167,0,'仪表\n\n'+NUMTOSTR(Z25[p],2)+'\n'+NUMTOSTR(V25[p],2)),PXUP68,COLOR00AAEE;
{}
DRAWTEXT(w=q,   X,'工机\n\n'+NUMTOSTR(Z26[p],2)+'\n'+NUMTOSTR(V26[p],2)),SHIFT1,PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-6, X,'外贸\n\n'+NUMTOSTR(Z27[p],2)+'\n'+NUMTOSTR(V27[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-13,X,'商业\n\n'+NUMTOSTR(Z28[p],2)+'\n'+NUMTOSTR(V28[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-20,X,'酒店\n\n'+NUMTOSTR(Z29[p],2)+'\n'+NUMTOSTR(V29[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-27,X,'医药\n\n'+NUMTOSTR(Z30[p],2)+'\n'+NUMTOSTR(V30[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-34,X,'农林\n\n'+NUMTOSTR(Z31[p],2)+'\n'+NUMTOSTR(V31[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-41,X,'农业\n\n'+NUMTOSTR(Z32[p],2)+'\n'+NUMTOSTR(V32[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-48,X,'食品\n\n'+NUMTOSTR(Z33[p],2)+'\n'+NUMTOSTR(V33[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-55,X,'航军\n\n'+NUMTOSTR(Z34[p],2)+'\n'+NUMTOSTR(V34[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-62,X,'纺织\n\n'+NUMTOSTR(Z35[p],2)+'\n'+NUMTOSTR(V35[p],2)),PXUP68,COLOR0066DD;
DRAWTEXT(w=q-69, X,'造纸\n\n'+NUMTOSTR(Z36[p],2)+'\n'+NUMTOSTR(V36[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-76, X,'3G  \n\n'+NUMTOSTR(Z37[p],2)+'\n'+NUMTOSTR(V37[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-83, X,'新能\n\n'+NUMTOSTR(Z38[p],2)+'\n'+NUMTOSTR(V38[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-90, X,'新材\n\n'+NUMTOSTR(Z39[p],2)+'\n'+NUMTOSTR(V39[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-97, X,'物联\n\n'+NUMTOSTR(Z40[p],2)+'\n'+NUMTOSTR(V40[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-104,X,'数视\n\n'+NUMTOSTR(Z41[p],2)+'\n'+NUMTOSTR(V41[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-111,X,'传媒\n\n'+NUMTOSTR(Z42[p],2)+'\n'+NUMTOSTR(V42[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-118,X,'低碳\n\n'+NUMTOSTR(Z43[p],2)+'\n'+NUMTOSTR(V43[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-125,X,'西开\n\n'+NUMTOSTR(Z44[p],2)+'\n'+NUMTOSTR(V44[p],2)),PXUP68,COLOR00EEFF;
DRAWTEXT(w=q-132,X,'全 A\n\n'+NUMTOSTR(Z45[p],2)+'\n'+NUMTOSTR(V45[p],2)),PXUP68,COLOR00AAEE;
DRAWTEXT(w=q-139,X,'中小\n\n'+NUMTOSTR(Z46[p],2)+'\n'+NUMTOSTR(V46[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-146,X,'创业\n\n'+NUMTOSTR(Z47[p],2)+'\n'+NUMTOSTR(V47[p],2)),PXUP68,COLOR0066DD;
DRAWTEXT(w=q-153,X,'大盘\n\n'+NUMTOSTR(Z48[p],2)+'\n'+NUMTOSTR(V48[p],2)),PXUP68,COLORBBBBBB;
DRAWTEXT(w=q-160,X,'中盘\n\n'+NUMTOSTR(Z49[p],2)+'\n'+NUMTOSTR(V49[p],2)),PXUP68,COLOR0000FF;
DRAWTEXT(w=q-167,X,'小盘\n\n'+NUMTOSTR(Z50[p],2)+'\n'+NUMTOSTR(V50[p],2)),PXUP68,COLOR0066DD;
{}
aa:=BLKNAME;BB:=STRLEFT(AA,STRFIND(AA,',',1)-1);K:=STKCOUNT(BB);DD:=(INDEXC/ref(INDEXC,1)-1)*100;
HS3:=("399300$CLOSE"/ref("399300$CLOSE",1)-1)*100;
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;{4,COLORBLACK;}
{}
bk:='板块指数';stksum:=STKCOUNT(bk);dcount:=DATACOUNT;
yygs4:='Z,.F';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs4,0,6);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
Num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];  dm_max2:=var_indi[2];  dm_max3:=var_indi[3];  dm_max4:=var_indi[4];  dm_max5:=var_indi[5];  
dm_max6:=var_indi[6];  dm_max7:=var_indi[7];  dm_max8:=var_indi[8];  dm_max9:=var_indi[9];  dm_max10:=var_indi[10];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3]; max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
max6:=var_px[dm_max6]; max7:=var_px[dm_max7]; max8:=var_px[dm_max8]; max9:=var_px[dm_max9]; max10:=var_px[dm_max10];
EXPLAIN(1,' 【涨幅--前十名】'),Color00EEFF;
EXPLAIN(1,'1:'+STKNAMEEX(dmstr[dm_max1])+': '+NUMTOSTR(max1,2)+'%'),Color0088FF;
EXPLAIN(1,'2:'+STKNAMEEX(dmstr[dm_max2])+': '+NUMTOSTR(max2,2)+'%'),Color0088FF;
EXPLAIN(1,'3:'+STKNAMEEX(dmstr[dm_max3])+': '+NUMTOSTR(max3,2)+'%'),Color0088FF;
EXPLAIN(1,'4:'+STKNAMEEX(dmstr[dm_max4])+': '+NUMTOSTR(max4,2)+'%'),Color0088FF;
EXPLAIN(1,'5:'+STKNAMEEX(dmstr[dm_max5])+': '+NUMTOSTR(max5,2)+'%'),Color0088FF;
EXPLAIN(1,'6:'+STKNAMEEX(dmstr[dm_max6])+': '+NUMTOSTR(max6,2)+'%'),Color0088FF;
EXPLAIN(1,'7:'+STKNAMEEX(dmstr[dm_max7])+': '+NUMTOSTR(max7,2)+'%'),Color0088FF;
EXPLAIN(1,'8:'+STKNAMEEX(dmstr[dm_max8])+': '+NUMTOSTR(max8,2)+'%'),Color0088FF;
EXPLAIN(1,'9:'+STKNAMEEX(dmstr[dm_max9])+': '+NUMTOSTR(max9,2)+'%'),Color0088FF;
EXPLAIN(1,'10:'+STKNAMEEX(dmstr[dm_max10])+': '+NUMTOSTR(max10,2)+'%'),Color0088FF;
yygs2:='Z,.a1';stksum:=STKCOUNT(bk);dcount:=datacount;
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs2,0,0);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
Num1:=sortpos(var_indi,1,1,stksum);
dm_max1:=var_indi[1];  dm_max2:=var_indi[2];  dm_max3:=var_indi[3];  dm_max4:=var_indi[4];  dm_max5:=var_indi[5];  
dm_max6:=var_indi[6];  dm_max7:=var_indi[7];  dm_max8:=var_indi[8];  dm_max9:=var_indi[9];  dm_max10:=var_indi[10];
max1:=var_px[dm_max1]; max2:=var_px[dm_max2]; max3:=var_px[dm_max3]; max4:=var_px[dm_max4]; max5:=var_px[dm_max5];
max6:=var_px[dm_max6]; max7:=var_px[dm_max7]; max8:=var_px[dm_max8]; max9:=var_px[dm_max9]; max10:=var_px[dm_max10];
EXPLAIN(1,'  【资金流入前十名】'),colorFF00FF;
EXPLAIN(1,'1:'+STKNAMEEX(dmstr[dm_max1])+': '+NUMTOSTR(max1,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'2:'+STKNAMEEX(dmstr[dm_max2])+': '+NUMTOSTR(max2,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'3:'+STKNAMEEX(dmstr[dm_max3])+': '+NUMTOSTR(max3,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'4:'+STKNAMEEX(dmstr[dm_max4])+': '+NUMTOSTR(max4,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'5:'+STKNAMEEX(dmstr[dm_max5])+': '+NUMTOSTR(max5,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'6:'+STKNAMEEX(dmstr[dm_max6])+': '+NUMTOSTR(max6,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'7:'+STKNAMEEX(dmstr[dm_max7])+': '+NUMTOSTR(max7,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'8:'+STKNAMEEX(dmstr[dm_max8])+': '+NUMTOSTR(max8,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'9:'+STKNAMEEX(dmstr[dm_max9])+': '+NUMTOSTR(max9,2)+' 亿'),Color00DDFF;
EXPLAIN(1,'10:'+STKNAMEEX(dmstr[dm_max10])+': '+NUMTOSTR(max10,2)+' 亿'),Color00DDFF;
yygs3:='Z,.a1';
variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;
for k=1 to stksum do
begin
dm:=stkfromblk(bk,k);
dmstr[k]:=dm;
temp1:=stkindi(dm,yygs3,0,0);
var_px[k]:=temp1[dcount];
var_indi[k]:=temp1[dcount];
end;
Num1:=sortpos(var_indi,0,1,stksum);
dm_max1:=var_indi[1];  dm_max2:=var_indi[2];  dm_max3:=var_indi[3];  dm_max4:=var_indi[4];  
dm_max5:=var_indi[5];  dm_max6:=var_indi[6];  dm_max7:=var_indi[7];  dm_max8:=var_indi[8];
min1:=var_px[dm_max1]; min2:=var_px[dm_max2]; min3:=var_px[dm_max3]; min4:=var_px[dm_max4];
min5:=var_px[dm_max5]; min6:=var_px[dm_max6]; min7:=var_px[dm_max7]; min8:=var_px[dm_max8];
EXPLAIN(1,'  【资金增幅后八名】'),colorFFFF00;
EXPLAIN(1,'1:'+STKNAMEEX(dmstr[dm_max1])+': '+NUMTOSTR(min1,2)+' 亿'),color00DD00;
EXPLAIN(1,'2:'+STKNAMEEX(dmstr[dm_max2])+': '+NUMTOSTR(min2,2)+' 亿'),color00DD00;
EXPLAIN(1,'3:'+STKNAMEEX(dmstr[dm_max3])+': '+NUMTOSTR(min3,2)+' 亿'),color00DD00;
EXPLAIN(1,'4:'+STKNAMEEX(dmstr[dm_max4])+': '+NUMTOSTR(min4,2)+' 亿'),color00DD00;
EXPLAIN(1,'5:'+STKNAMEEX(dmstr[dm_max5])+': '+NUMTOSTR(min5,2)+' 亿'),color00DD00;
EXPLAIN(1,'6:'+STKNAMEEX(dmstr[dm_max6])+': '+NUMTOSTR(min6,2)+' 亿'),color00DD00;
EXPLAIN(1,'7:'+STKNAMEEX(dmstr[dm_max7])+': '+NUMTOSTR(min7,2)+' 亿'),color00DD00;
EXPLAIN(1,'8:'+STKNAMEEX(dmstr[dm_max8])+': '+NUMTOSTR(min8,2)+' 亿'),color00DD00;
stksum:=STKCOUNT(bk);
variable:dmstr[stksum]='';  
for k=1 to stksum do  
begin
    dm:=stkfromblk(bk,k);
    dmstr[k]:=dm;  
end;
{}
 

下载地址(点击上图是广告,点击下图进入下载地址网页)

    板块全息B解盘下载

软件评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

下载说明

* 本网发布的公式指标和股票软件绝大部分是来源于各大论坛,例如:理想论坛,老钱庄,创幻,MACD等论坛,谢谢各位老师的原创软件。为了达到最快的下载速度,推荐使用网际快车迅雷下载本站软件。
* 请一定升级到最新版WinRAR3.61才能正常解压本站提供的软件!

本网提供的公式文件说明:
* alg格式股票公式,仅仅可以用飞狐交易师股票软件引入使用;
* fnc格式股票公式,可以用大智慧新一代高速行情分析系统股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式股票公式,仅可以用大智慧经典版股票软件引入使用;
* tnc格式股票公式,可以用通达信股票软件引入使用;
* tni格式股票公式,仅可以用通达信新版本引入使用例如通达信v6.05以上版本,通达 信老版本不能引入;
* hxf格式股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到并下载!

* 关于股票公式时间限制,如果在引入公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称 ,并且能正常显示,可能是公式使用期限已过。
* 关于公式解密收费破解FNC大智慧公式;破 解hxf同花顺,daf操盘手,alg飞狐等原码,可解密完全加密定向加密公式或延时,收费服务无意勿扰,联系QQ984388831。

* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本网就可以有资 料说明编写过程,请搜索:教程

* 如果您发现下载链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含破解及注册码均是由网上搜集,若侵犯了你的版权利益,敬请来信通知我们!

关于本站 | 网站帮助 | 广告合作 | 下载声明 | 友情连接 | 网站地图 |

特别声明:本站不招任何收费会员,站内所有广告其网站的一切言行均与本站无关,请广大网友小心谨慎。
Copyright © 2003-2008 88GS.Com. All Rights Reserved .
页面执行时间:156.25000 毫秒
网站备案信息:粤ICP备05017571号