试用了这么多缠论指标，我认为这个是我收集到的最精确的分笔指标，如果你的缠论学习到一定水平，自己可以试用去体会，学会缠论至少你能掌握操作节奏，大盘波段是能看懂的，多说无益，自己体会，老铁，上图看效果
全免费，没密码，随便折腾。
N:=20;
M0:=5;
M1:=14;
M2:=16;
M3:=2;
M4:=3;
M5:=9;
{计算涨幅}
DP01:="880301$CLOSE"/REF("880301$CLOSE",N); {煤炭}
DP02:="880305$CLOSE"/REF("880305$CLOSE",N); {电力}
DP03:="880310$CLOSE"/REF("880310$CLOSE",N); {石油}
DP04:="880318$CLOSE"/REF("880318$CLOSE",N); {钢铁}
DP05:="880324$CLOSE"/REF("880324$CLOSE",N); {有色}
DP06:="880330$CLOSE"/REF("880330$CLOSE",N); {化纤}
DP07:="880335$CLOSE"/REF("880335$CLOSE",N); {化工}
DP08:="880344$CLOSE"/REF("880344$CLOSE",N); {建材}
DP09:="880350$CLOSE"/REF("880350$CLOSE",N); {造纸}
DP10:="880351$CLOSE"/REF("880351$CLOSE",N); {矿物制品}
DP11:="880355$CLOSE"/REF("880355$CLOSE",N); {日用化工}
DP12:="880360$CLOSE"/REF("880360$CLOSE",N); {农林牧渔}
DP13:="880367$CLOSE"/REF("880367$CLOSE",N); {纺织服饰}
DP14:="880372$CLOSE"/REF("880372$CLOSE",N); {食品饮料}
DP15:="880380$CLOSE"/REF("880380$CLOSE",N); {酿酒}
DP16:="880387$CLOSE"/REF("880387$CLOSE",N); {家用电器}
DP17:="880390$CLOSE"/REF("880390$CLOSE",N); {汽车类}
DP18:="880398$CLOSE"/REF("880398$CLOSE",N); {医疗保健}
DP19:="880399$CLOSE"/REF("880399$CLOSE",N); {家居用品}
DP20:="880400$CLOSE"/REF("880400$CLOSE",N); {医药}
DP21:="880406$CLOSE"/REF("880406$CLOSE",N); {商业连锁}
DP22:="880414$CLOSE"/REF("880414$CLOSE",N); {商贸代理}
DP23:="880418$CLOSE"/REF("880418$CLOSE",N); {传媒娱乐}
DP24:="880421$CLOSE"/REF("880421$CLOSE",N); {广告包装}
DP25:="880422$CLOSE"/REF("880422$CLOSE",N); {文教休闲}
DP26:="880423$CLOSE"/REF("880423$CLOSE",N); {酒店餐饮}
DP27:="880424$CLOSE"/REF("880424$CLOSE",N); {旅游}
DP28:="880430$CLOSE"/REF("880430$CLOSE",N); {航空}
DP29:="880431$CLOSE"/REF("880431$CLOSE",N); {船舶}
DP30:="880432$CLOSE"/REF("880432$CLOSE",N); {运输设备}
DP31:="880437$CLOSE"/REF("880437$CLOSE",N); {通用机械}
DP32:="880440$CLOSE"/REF("880440$CLOSE",N); {工业机械}
DP33:="880446$CLOSE"/REF("880446$CLOSE",N); {电气设备}
DP34:="880447$CLOSE"/REF("880447$CLOSE",N); {工程机械}
DP35:="880448$CLOSE"/REF("880448$CLOSE",N); {电器仪表}
DP36:="880452$CLOSE"/REF("880452$CLOSE",N); {电信运营}
DP37:="880453$CLOSE"/REF("880453$CLOSE",N); {公共交通}
DP38:="880454$CLOSE"/REF("880454$CLOSE",N); {水务}
DP39:="880455$CLOSE"/REF("880455$CLOSE",N); {供气供热}
DP40:="880456$CLOSE"/REF("880456$CLOSE",N); {环境保护}
DP41:="880459$CLOSE"/REF("880459$CLOSE",N); {运输服务}
DP42:="880464$CLOSE"/REF("880464$CLOSE",N); {仓储物流}
DP43:="880465$CLOSE"/REF("880465$CLOSE",N); {交通设施}
DP44:="880471$CLOSE"/REF("880471$CLOSE",N); {银行}
DP45:="880472$CLOSE"/REF("880472$CLOSE",N); {证券}
DP46:="880473$CLOSE"/REF("880473$CLOSE",N); {保险}
DP47:="880474$CLOSE"/REF("880474$CLOSE",N); {多元金融}
DP48:="880476$CLOSE"/REF("880476$CLOSE",N); {建筑}
DP49:="880482$CLOSE"/REF("880482$CLOSE",N); {房地产}
DP50:="880489$CLOSE"/REF("880489$CLOSE",N); {IT设备}
DP51:="880490$CLOSE"/REF("880490$CLOSE",N); {通讯设备}
DP52:="880491$CLOSE"/REF("880491$CLOSE",N); {半导体}
DP53:="880492$CLOSE"/REF("880492$CLOSE",N); {元器件}
DP54:="880493$CLOSE"/REF("880493$CLOSE",N); {软件服务}
DP55:="880494$CLOSE"/REF("880494$CLOSE",N); {互联网}
DP56:="880497$CLOSE"/REF("880497$CLOSE",N); {综合类}
DP57:="999999$CLOSE"/REF("999999$CLOSE",N); {上证指数}
DP58:="399001$CLOSE"/REF("399001$CLOSE",N); {深证成指}
DP59:="399006$CLOSE"/REF("399006$CLOSE",N); {创业板指}
DP60:="399005$CLOSE"/REF("399005$CLOSE",N); {中小企业}
DP61:=CLOSE/REF(CLOSE,N); {个股}
{求最大值}
MX1:=MAX6(DP01,DP02,DP03,DP04,DP05,DP06);
MX2:=MAX6(DP07,DP08,DP09,DP10,DP11,DP12);
MX3:=MAX6(DP13,DP14,DP15,DP16,DP17,DP18);
MX4:=MAX6(DP19,DP20,DP21,DP22,DP23,DP24);
MX5:=MAX6(DP25,DP26,DP27,DP28,DP29,DP30);
MX6:=MAX6(DP31,DP32,DP33,DP34,DP35,DP36);
MX7:=MAX6(DP37,DP38,DP39,DP40,DP41,DP42);
MX8:=MAX6(DP43,DP44,DP45,DP46,DP47,DP48);
MX9:=MAX6(DP49,DP50,DP51,DP52,DP53,DP54);
MXA:=MAX6(DP55,DP56,DP57,DP58,DP59,DP60);
MX:=MAX6(MAX6(MX1,MX2,MX3,MX4,MX5,MX6),MX7,MX8,MX9,MXA,DP61);
{求最小值}
MN1:=MIN6(DP01,DP02,DP03,DP04,DP05,DP06);
MN2:=MIN6(DP07,DP08,DP09,DP10,DP11,DP12);
MN3:=MIN6(DP13,DP14,DP15,DP16,DP17,DP18);
MN4:=MIN6(DP19,DP20,DP21,DP22,DP23,DP24);
MN5:=MIN6(DP25,DP26,DP27,DP28,DP29,DP30);
MN6:=MIN6(DP31,DP32,DP33,DP34,DP35,DP36);
MN7:=MIN6(DP37,DP38,DP39,DP40,DP41,DP42);
MN8:=MIN6(DP43,DP44,DP45,DP46,DP47,DP48);
MN9:=MIN6(DP49,DP50,DP51,DP52,DP53,DP54);
MNA:=MIN6(DP55,DP56,DP57,DP58,DP59,DP60);
MN:=MIN6(MIN6(MN1,MN2,MN3,MN4,MN5,MN6),MN7,MN8,MN9,MNA,DP61);
{计算比例}
BL01:=(DP01-MN)/(MX-MN)*800+80; {煤炭}
BL02:=(DP02-MN)/(MX-MN)*800+80; {电力}
BL03:=(DP03-MN)/(MX-MN)*800+80; {石油}
BL04:=(DP04-MN)/(MX-MN)*800+80; {钢铁}
BL05:=(DP05-MN)/(MX-MN)*800+80; {有色}
BL06:=(DP06-MN)/(MX-MN)*800+80; {化纤}
BL07:=(DP07-MN)/(MX-MN)*800+80; {化工}
BL08:=(DP08-MN)/(MX-MN)*800+80; {建材}
BL09:=(DP09-MN)/(MX-MN)*800+80; {造纸}
BL10:=(DP10-MN)/(MX-MN)*800+80; {矿物制品}
BL11:=(DP11-MN)/(MX-MN)*800+80; {日用化工}
BL12:=(DP12-MN)/(MX-MN)*800+80; {农林牧渔}
BL13:=(DP13-MN)/(MX-MN)*800+80; {纺织服饰}
BL14:=(DP14-MN)/(MX-MN)*800+80; {食品饮料}
BL15:=(DP15-MN)/(MX-MN)*800+80; {酿酒}
BL16:=(DP16-MN)/(MX-MN)*800+80; {家用电器}
BL17:=(DP17-MN)/(MX-MN)*800+80; {汽车类}
BL18:=(DP18-MN)/(MX-MN)*800+80; {医疗保健}
BL19:=(DP19-MN)/(MX-MN)*800+80; {家居用品}
BL20:=(DP20-MN)/(MX-MN)*800+80; {医药}
BL21:=(DP21-MN)/(MX-MN)*800+80; {商业连锁}
BL22:=(DP22-MN)/(MX-MN)*800+80; {商贸代理}
BL23:=(DP23-MN)/(MX-MN)*800+80; {传媒娱乐}
BL24:=(DP24-MN)/(MX-MN)*800+80; {广告包装}
BL25:=(DP25-MN)/(MX-MN)*800+80; {文教休闲}
BL26:=(DP26-MN)/(MX-MN)*800+80; {酒店餐饮}
BL27:=(DP27-MN)/(MX-MN)*800+80; {旅游}
BL28:=(DP28-MN)/(MX-MN)*800+80; {航空}
BL29:=(DP29-MN)/(MX-MN)*800+80; {船舶}
BL30:=(DP30-MN)/(MX-MN)*800+80; {运输设备}
BL31:=(DP31-MN)/(MX-MN)*800+80; {通用机械}
BL32:=(DP32-MN)/(MX-MN)*800+80; {工业机械}
BL33:=(DP33-MN)/(MX-MN)*800+80; {电气设备}
BL34:=(DP34-MN)/(MX-MN)*800+80; {工程机械}
BL35:=(DP35-MN)/(MX-MN)*800+80; {电器仪表}
BL36:=(DP36-MN)/(MX-MN)*800+80; {电信运营}
BL37:=(DP37-MN)/(MX-MN)*800+80; {公共交通}
BL38:=(DP38-MN)/(MX-MN)*800+80; {水务}
BL39:=(DP39-MN)/(MX-MN)*800+80; {供气供热}
BL40:=(DP40-MN)/(MX-MN)*800+80; {环境保护}
BL41:=(DP41-MN)/(MX-MN)*800+80; {运输服务}
BL42:=(DP42-MN)/(MX-MN)*800+80; {仓储物流}
BL43:=(DP43-MN)/(MX-MN)*800+80; {交通设施}
BL44:=(DP44-MN)/(MX-MN)*800+80; {银行}
BL45:=(DP45-MN)/(MX-MN)*800+80; {证券}
BL46:=(DP46-MN)/(MX-MN)*800+80; {保险}
BL47:=(DP47-MN)/(MX-MN)*800+80; {多元金融}
BL48:=(DP48-MN)/(MX-MN)*800+80; {建筑}
BL49:=(DP49-MN)/(MX-MN)*800+80; {房地产}
BL50:=(DP50-MN)/(MX-MN)*800+80; {IT设备}
BL51:=(DP51-MN)/(MX-MN)*800+80; {通讯设备}
BL52:=(DP52-MN)/(MX-MN)*800+80; {半导体}
BL53:=(DP53-MN)/(MX-MN)*800+80; {元器件}
BL54:=(DP54-MN)/(MX-MN)*800+80; {软件服务}
BL55:=(DP55-MN)/(MX-MN)*800+80; {互联网}
BL56:=(DP56-MN)/(MX-MN)*800+80; {综合类}
BL57:=(DP57-MN)/(MX-MN)*800+80; {上证指数}
BL58:=(DP58-MN)/(MX-MN)*800+80; {深证成指}
BL59:=(DP59-MN)/(MX-MN)*800+80; {创业板指}
BL60:=(DP60-MN)/(MX-MN)*800+80; {中小企业}
BL61:=(DP61-MN)/(MX-MN)*800+80; {个股}
{计算位置}
X611:=M0+M2*0;X612:=X611+M1;
X571:=M0+M2*1;X572:=X571+M1;
X581:=M0+M2*2;X582:=X581+M1;
X591:=M0+M2*3;X592:=X591+M1;
X601:=M0+M2*4;X602:=X601+M1;
X011:=M0+M2*5;X012:=X011+M1;
X021:=M0+M2*6;X022:=X021+M1;
X031:=M0+M2*7;X032:=X031+M1;
X041:=M0+M2*8;X042:=X041+M1;
X051:=M0+M2*9;X052:=X051+M1;
X061:=M0+M2*10;X062:=X061+M1;
X071:=M0+M2*11;X072:=X071+M1;
X081:=M0+M2*12;X082:=X081+M1;
X091:=M0+M2*13;X092:=X091+M1;
X101:=M0+M2*14;X102:=X101+M1;
X111:=M0+M2*15;X112:=X111+M1;
X121:=M0+M2*16;X122:=X121+M1;
X131:=M0+M2*17;X132:=X131+M1;
X141:=M0+M2*18;X142:=X141+M1;
X151:=M0+M2*19;X152:=X151+M1;
X161:=M0+M2*20;X162:=X161+M1;
X171:=M0+M2*21;X172:=X171+M1;
X181:=M0+M2*22;X182:=X181+M1;
X191:=M0+M2*23;X192:=X191+M1;
X201:=M0+M2*24;X202:=X201+M1;
X211:=M0+M2*25;X212:=X211+M1;
X221:=M0+M2*26;X222:=X221+M1;
X231:=M0+M2*27;X232:=X231+M1;
X241:=M0+M2*28;X242:=X241+M1;
X251:=M0+M2*29;X252:=X251+M1;
X261:=M0+M2*30;X262:=X261+M1;
X271:=M0+M2*31;X272:=X271+M1;
X281:=M0+M2*32;X282:=X281+M1;
X291:=M0+M2*33;X292:=X291+M1;
X301:=M0+M2*34;X302:=X301+M1;
X311:=M0+M2*35;X312:=X311+M1;
X321:=M0+M2*36;X322:=X321+M1;
X331:=M0+M2*37;X332:=X331+M1;
X341:=M0+M2*38;X342:=X341+M1;
X351:=M0+M2*39;X352:=X351+M1;
X361:=M0+M2*40;X362:=X361+M1;
X371:=M0+M2*41;X372:=X371+M1;
X381:=M0+M2*42;X382:=X381+M1;
X391:=M0+M2*43;X392:=X391+M1;
X401:=M0+M2*44;X402:=X401+M1;
X411:=M0+M2*45;X412:=X411+M1;
X421:=M0+M2*46;X422:=X421+M1;
X431:=M0+M2*47;X432:=X431+M1;
X441:=M0+M2*48;X442:=X441+M1;
X451:=M0+M2*49;X452:=X451+M1;
X461:=M0+M2*50;X462:=X461+M1;
X471:=M0+M2*51;X472:=X471+M1;
X481:=M0+M2*52;X482:=X481+M1;
X491:=M0+M2*53;X492:=X491+M1;
X501:=M0+M2*54;X502:=X501+M1;
X511:=M0+M2*55;X512:=X511+M1;
X521:=M0+M2*56;X522:=X521+M1;
X531:=M0+M2*57;X532:=X531+M1;
X541:=M0+M2*58;X542:=X541+M1;
X551:=M0+M2*59;X552:=X551+M1;
X561:=M0+M2*60;X562:=X561+M1;
X00:=M0-M2+M1-2;XXX:=61*M2+M0;
{画坐标}
DRAWRECTREL(X00,0 ,XXX ,10 ,RGB(255,255,255) ),COLORFFFFFF;
DRAWRECTREL(X00,179 ,XXX ,180 ,RGB(255,255,255) ),COLORFFFFFF;
DRAWRECTREL(X00,360 ,XXX ,361 ,RGB(255,255,255) ),COLORFFFFFF;
DRAWRECTREL(X00,540 ,XXX ,541 ,RGB(255,255,255) ),COLORFFFFFF;
DRAWRECTREL(X00,718 ,XXX ,719 ,RGB(255,255,255) ),COLORFFFFFF;
DRAWRECTREL(X00,0 ,X00+1 ,900 ,RGB(255,255,255) ),COLORFFFFFF;
DRAWRECTREL(X00,900 ,XXX ,910 ,RGB(255,255,255) ),COLORFFFFFF;
{画直方图}
DRAWRECTREL(X611,CONST(900-BL61) ,X612 ,900 ,RGB(255,0,0) ),COLOR0000FF,NOFRAME;
DRAWRECTREL(X571,CONST(900-BL57) ,X572 ,900 ,RGB(150,150,0) ),COLOR009999,NOFRAME;
DRAWRECTREL(X581,CONST(900-BL58) ,X582 ,900 ,RGB(150,150,0) ),COLOR009999,NOFRAME;
DRAWRECTREL(X591,CONST(900-BL59) ,X592 ,900 ,RGB(150,150,0) ),COLOR009999,NOFRAME;
DRAWRECTREL(X601,CONST(900-BL60) ,X602 ,900 ,RGB(150,150,0) ),COLOR009999,NOFRAME;
DRAWRECTREL(X011,CONST(900-BL01) ,X012 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X021,CONST(900-BL02) ,X022 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X031,CONST(900-BL03) ,X032 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X041,CONST(900-BL04) ,X042 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X051,CONST(900-BL05) ,X052 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X061,CONST(900-BL06) ,X062 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X071,CONST(900-BL07) ,X072 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X081,CONST(900-BL08) ,X082 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X091,CONST(900-BL09) ,X092 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X101,CONST(900-BL10) ,X102 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X111,CONST(900-BL11) ,X112 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X121,CONST(900-BL12) ,X122 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X131,CONST(900-BL13) ,X132 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X141,CONST(900-BL14) ,X142 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X151,CONST(900-BL15) ,X152 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X161,CONST(900-BL16) ,X162 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X171,CONST(900-BL17) ,X172 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X181,CONST(900-BL18) ,X182 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X191,CONST(900-BL19) ,X192 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X201,CONST(900-BL20) ,X202 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X211,CONST(900-BL21) ,X212 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X221,CONST(900-BL22) ,X222 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X231,CONST(900-BL23) ,X232 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X241,CONST(900-BL24) ,X242 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X251,CONST(900-BL25) ,X252 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X261,CONST(900-BL26) ,X262 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X271,CONST(900-BL27) ,X272 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X281,CONST(900-BL28) ,X282 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X291,CONST(900-BL29) ,X292 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X301,CONST(900-BL30) ,X302 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X311,CONST(900-BL31) ,X312 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X321,CONST(900-BL32) ,X322 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X331,CONST(900-BL33) ,X332 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X341,CONST(900-BL34) ,X342 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X351,CONST(900-BL35), X352 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X361,CONST(900-BL36) ,X362 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X371,CONST(900-BL37) ,X372 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X381,CONST(900-BL38) ,X382 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X391,CONST(900-BL39) ,X392 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X401,CONST(900-BL40) ,X402 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X411,CONST(900-BL41) ,X412 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X421,CONST(900-BL42) ,X422 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X431,CONST(900-BL43) ,X432 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X441,CONST(900-BL44) ,X442 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X451,CONST(900-BL45) ,X452 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X461,CONST(900-BL46) ,X462 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X471,CONST(900-BL47) ,X472 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X481,CONST(900-BL48) ,X482 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X491,CONST(900-BL49) ,X492 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X501,CONST(900-BL50) ,X502 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X511,CONST(900-BL51) ,X512 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X521,CONST(900-BL52) ,X522 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X531,CONST(900-BL53) ,X532 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X541,CONST(900-BL54) ,X542 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X551,CONST(900-BL55) ,X552 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
DRAWRECTREL(X561,CONST(900-BL56) ,X562 ,900 ,RGB(0,150,150) ),COLOR999900,NOFRAME;
{板块代码}
ZJJ:=IF(M3=1,' ',IF(M3=2,' ',IF(M3=3,' ',IF(M3=4,' ',IF(M3=5,' ','')))));
BK1:=STRCAT('GP',ZJJ);
BK2:=STRCAT('SH',ZJJ);
BK3:=STRCAT('SZ',ZJJ);
BK4:=STRCAT('CY',ZJJ);
BK5:=STRCAT('ZX',ZJJ);
BK6:=STRCAT('01',ZJJ);
BK7:=STRCAT('02',ZJJ);
BK8:=STRCAT('03',ZJJ);
BK9:=STRCAT('04',ZJJ);
BK10:=STRCAT('05',ZJJ);
BK11:=STRCAT('06',ZJJ);
BK12:=STRCAT('07',ZJJ);
BK13:=STRCAT('08',ZJJ);
BK14:=STRCAT('09',ZJJ);
BK15:=STRCAT('10',ZJJ);
BK16:=STRCAT('11',ZJJ);
BK17:=STRCAT('12',ZJJ);
BK18:=STRCAT('13',ZJJ);
BK19:=STRCAT('14',ZJJ);
BK20:=STRCAT('15',ZJJ);
BK21:=STRCAT('16',ZJJ);
BK22:=STRCAT('17',ZJJ);
BK23:=STRCAT('18',ZJJ);
BK24:=STRCAT('19',ZJJ);
BK25:=STRCAT('20',ZJJ);
BK26:=STRCAT('21',ZJJ);
BK27:=STRCAT('22',ZJJ);
BK28:=STRCAT('23',ZJJ);
BK29:=STRCAT('24',ZJJ);
BK30:=STRCAT('25',ZJJ);
BK31:=STRCAT('26',ZJJ);
BK32:=STRCAT('27',ZJJ);
BK33:=STRCAT('28',ZJJ);
BK34:=STRCAT('29',ZJJ);
BK35:=STRCAT('30',ZJJ);
BK36:=STRCAT('31',ZJJ);
BK37:=STRCAT('32',ZJJ);
BK38:=STRCAT('33',ZJJ);
BK39:=STRCAT('34',ZJJ);
BK40:=STRCAT('35',ZJJ);
BK41:=STRCAT('36',ZJJ);
BK42:=STRCAT('37',ZJJ);
BK43:=STRCAT('38',ZJJ);
BK44:=STRCAT('39',ZJJ);
BK45:=STRCAT('40',ZJJ);
BK46:=STRCAT('41',ZJJ);
BK47:=STRCAT('42',ZJJ);
BK48:=STRCAT('43',ZJJ);
BK49:=STRCAT('44',ZJJ);
BK50:=STRCAT('45',ZJJ);
BK51:=STRCAT('46',ZJJ);
BK52:=STRCAT('47',ZJJ);
BK53:=STRCAT('48',ZJJ);
BK54:=STRCAT('49',ZJJ);
BK55:=STRCAT('50',ZJJ);
BK56:=STRCAT('51',ZJJ);
BK57:=STRCAT('52',ZJJ);
BK58:=STRCAT('53',ZJJ);
BK59:=STRCAT('54',ZJJ);
BK60:=STRCAT('55',ZJJ);
BK61:=STRCAT('56',ZJJ);
BKM1:=STRCAT(STRCAT(STRCAT(STRCAT(BK1,BK2),STRCAT(BK3,BK4)),STRCAT(STRCAT(BK5,BK6),STRCAT(BK7,BK8))),STRCAT(STRCAT(STRCAT(BK9,BK10),STRCAT(BK11,BK12)),STRCAT(STRCAT(BK13,BK14),STRCAT(BK15,BK16))));
BKM2:=STRCAT(STRCAT(STRCAT(STRCAT(BK17,BK18),STRCAT(BK19,BK20)),STRCAT(STRCAT(BK21,BK22),STRCAT(BK23,BK24))),STRCAT(STRCAT(STRCAT(BK25,BK26),STRCAT(BK27,BK28)),STRCAT(STRCAT(BK29,BK30),STRCAT(BK31,BK32))));
BKM3:=STRCAT(STRCAT(STRCAT(STRCAT(BK33,BK34),STRCAT(BK35,BK36)),STRCAT(STRCAT(BK37,BK38),STRCAT(BK39,BK40))),STRCAT(STRCAT(STRCAT(BK41,BK42),STRCAT(BK43,BK44)),STRCAT(STRCAT(BK45,BK46),STRCAT(BK47,BK48))));
BKM4:=STRCAT(STRCAT(STRCAT(STRCAT(BK49,BK50),STRCAT(BK51,BK52)),STRCAT(STRCAT(BK53,BK54),STRCAT(BK55,BK56))),STRCAT(STRCAT(STRCAT(BK57,BK58),STRCAT(BK59,BK60)),BK61));
BKM:=STRCAT(STRCAT(BKM1,BKM2),STRCAT(BKM3,BKM4));
DRAWTEXT_FIX(ISLASTBAR,M4/1000,0.91,0,BKM),COLOR00FFFF;
BKDY1:='GP-股票,SH-上证指数,SZ-深证成指,CY-创业板指,ZX-中小企业,01-煤炭,02-电力,03-石油,04-钢铁,05-有色,06-化纤,07-化工,08-建材,09-造纸,10-矿物制品,11-日用化工,12-农林牧渔,13-纺织服饰,14-食品饮料,15-酿酒,16-家用电器,17-汽车类,18-医疗保健';
BKDY2:='19-家居用品,20-医药,21-商业连锁,22-商贸代理,23-传媒娱乐,24-广告包装,25-文教休闲,26-酒店餐饮,27-旅游,28-航空,29-船舶,30-运输设备,31-通用机械,32-工业机械,33-电气设备,34-工程机械,35-电器仪表,36-电信运营,37-公共交通,38-水务';
BKDY3:='39-供气供热,40-环境保护,41-运输服务,42-仓储物流,43-交通设施,44-银行,45-证券,46-保险,47-多元金融,48-建筑,49-房地产,50-IT设备,51-通讯设备,52-半导体,53-元器件,54-软件服务,55-互联网,56-综合类';
DRAWTEXT_FIX(ISLASTBAR,0.003,0.01,0,BKDY1),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.003,0.11,0,BKDY2),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.003,0.21,0,BKDY3),COLOR00FF00;
{所属板块}
BKW1:=IF(INBLOCK('煤炭'),X011,IF(INBLOCK('电力'),X021,IF(INBLOCK('石油'),X031,IF(INBLOCK('钢铁'),X041,IF(INBLOCK('有色'),X051,IF(INBLOCK('化纤'),X061,IF(INBLOCK('化工'),X071,
IF(INBLOCK('建材'),X081,IF(INBLOCK('造纸'),X091,IF(INBLOCK('矿物制品'),X101,IF(INBLOCK('日用化工'),X111,IF(INBLOCK('农林牧渔'),X121,IF(INBLOCK('纺织服饰'),X131,IF(INBLOCK('食品饮料'),X141,
IF(INBLOCK('酿酒'),X151,IF(INBLOCK('家用电器'),X161,IF(INBLOCK('汽车类'),X171,IF(INBLOCK('医疗保健'),X181,IF(INBLOCK('家居用品'),X191,IF(INBLOCK('医药'),X201,IF(INBLOCK('商业连锁'),X211,
IF(INBLOCK('商贸代理'),X221,IF(INBLOCK('传媒娱乐'),X231,IF(INBLOCK('广告包装'),X241,IF(INBLOCK('文教休闲'),X251,IF(INBLOCK('酒店餐饮'),X261,IF(INBLOCK('旅游'),X271,IF(INBLOCK('航空'),X281,
IF(INBLOCK('船舶'),X291,IF(INBLOCK('运输设备'),X301,IF(INBLOCK('通用机械'),X311,-1)))))))))))))))))))))))))))))));
BKW2:=IF(INBLOCK('工业机械'),X321,IF(INBLOCK('电气设备'),X331,IF(INBLOCK('工程机械'),X341,IF(INBLOCK('电器仪表'),X351,IF(INBLOCK('电信运营'),X361,IF(INBLOCK('公共交通'),X371,IF(INBLOCK('水务'),X381,
IF(INBLOCK('供气供热'),X391,IF(INBLOCK('环境保护'),X401,IF(INBLOCK('运输服务'),X411,IF(INBLOCK('仓储物流'),X421,IF(INBLOCK('交通设施'),X431,IF(INBLOCK('银行'),X441,IF(INBLOCK('证券'),X451,
IF(INBLOCK('保险'),X461,IF(INBLOCK('多元金融'),X471,IF(INBLOCK('建筑'),X481,IF(INBLOCK('房地产'),X491,IF(INBLOCK('IT设备'),X501,IF(INBLOCK('通讯设备'),X511,
IF(INBLOCK('半导体'),X521,IF(INBLOCK('元器件'),X531,IF(INBLOCK('软件服务'),X541,IF(INBLOCK('互联网'),X551,X561))))))))))))))))))))))));
BKW:=IF(BKW1=-1,BKW2,BKW1);
SCW:=IF(CODELIKE('600'),X571,IF(CODELIKE('300'),X591,IF(CODELIKE('002'),X601,X581)));
DRAWTEXT_FIX(ISLASTBAR,(SCW+M1/M5)/1000,0.32,0, '所'),COLOR0000FF;DRAWTEXT_FIX(ISLASTBAR,(SCW+M1/M5)/1000,0.46,0, '属'),COLOR0000FF;DRAWTEXT_FIX(ISLASTBAR,(SCW+M1/M5)/1000,0.6,0, '市'),COLOR0000FF;DRAWTEXT_FIX(ISLASTBAR,(SCW+M1/M5)/1000,0.74,0, '场'),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR,(BKW+M1/M5)/1000,0.32,0, '所'),COLOR0000FF;DRAWTEXT_FIX(ISLASTBAR,(BKW+M1/M5)/1000,0.46,0, '属'),COLOR0000FF;DRAWTEXT_FIX(ISLASTBAR,(BKW+M1/M5)/1000,0.6,0, '板'),COLOR0000FF;DRAWTEXT_FIX(ISLASTBAR,(BKW+M1/M5)/1000,0.74,0, '块'),COLOR0000FF;
