以下是通达信龙头板块指标公式
参数：m就是日期，自己设置日期
银行类1:=if(date>=M,STKINDI('991017','板块涨幅.股价',0),0);
银行类:SUM((银行类1-ref(银行类1,1))/ref(银行类1,1)*100,0),color8080ff;
DRAWTEXT(ALL(BARSTATUS=2,1),银行类 ,'银行类'),color8080ff;
房地产1:=if(date>=M,STKINDI('991007','板块涨幅.股价',0),0);
房地产:SUM((房地产1-ref(房地产1,1))/ref(房地产1,1)*100,0),color0000ff;
DRAWTEXT(ALL(BARSTATUS=2,1),房地产 ,'房地产 '),color0000ff;
煤炭石油1:=if(date>=M,STKINDI('991019','板块涨幅.股价',0),0);
煤炭石油:SUM((煤炭石油1-ref(煤炭石油1,1))/ref(煤炭石油1,1)*100,0),color404080;
DRAWTEXT(ALL(BARSTATUS=2,1),煤炭石油 ,'煤炭石油'),color404080;
有色金属1:=if(date>=M,STKINDI('991034','板块涨幅.股价',0),0);
有色金属:SUM((有色金属1-ref(有色金属1,1))/ref(有色金属1,1)*100,0),color00ffff;
DRAWTEXT(ALL(BARSTATUS=2,1),有色金属,'有色金属'),color00ffff;
钢铁1:=if(date>=M,STKINDI('991009','板块涨幅.股价',0),0);
钢铁:SUM((钢铁1-ref(钢铁1,1))/ref(钢铁1,1)*100,0),color00ff00;
DRAWTEXT(ALL(BARSTATUS=2,1),钢铁 , '钢铁'),color00ff00;
电力1:=if(date>=M,STKINDI('991003','板块涨幅.股价',0),0);
电力:SUM((电力1-ref(电力1,1))/ref(电力1,1)*100,0),COLORWHITE;
DRAWTEXT(ALL(BARSTATUS=2,1),电力,'电力'),COLORWHITE;
工程建筑1:=if(date>=M,STKINDI('991002','板块涨幅.股价',0),0);
工程建筑:SUM((工程建筑1-ref(工程建筑1,1))/ref(工程建筑1,1)*100,0),color008000;
DRAWTEXT(ALL(BARSTATUS=2,1),工程建筑 , '工程建筑'),color008000;
商业连锁1:=if(date>=M,STKINDI('991023','板块涨幅.股价',0),0);
商业连锁:SUM((商业连锁1-ref(商业连锁1,1))/ref(商业连锁1,1)*100,0),colorffff00;
DRAWTEXT(ALL(BARSTATUS=2,1),商业连锁 , ' 商业连锁'),colorffff00;
医药1:=if(date>=M,STKINDI('991028','板块涨幅.股价',0),0);
医药:SUM((医药1-ref(医药1,1))/ref(医药1,1)*100,0),color808000;
DRAWTEXT(ALL(BARSTATUS=2,1),医药 ,'医药'),color808000;
教育传媒1:=if(date>=M,STKINDI('991032','板块涨幅.股价',0),0);
教育传媒:SUM((教育传媒1-ref(教育传媒1,1))/ref(教育传媒1,1)*100,0),colorff8000;
DRAWTEXT(ALL(BARSTATUS=2,1),教育传媒 ,'教育传媒 '),colorff8000;
仪电仪表1:=if(date>=M,STKINDI('991033','板块涨幅.股价',0),0);
仪电仪表:SUM((仪电仪表1-ref(仪电仪表1,1))/ref(仪电仪表1,1)*100,0),colorff8080;
DRAWTEXT(ALL(BARSTATUS=2,1),仪电仪表 ,'仪电仪表 '),colorff8080;
旅游酒店1:=if(date>=M,STKINDI('991018','板块涨幅.股价',0),0);
旅游酒店:SUM((旅游酒店1-ref(旅游酒店1,1))/ref(旅游酒店1,1)*100,0),colorc080ff;
DRAWTEXT(ALL(BARSTATUS=2,1),旅游酒店 ,' 旅游酒店'),colorc080ff;
电子信息1:=if(date>=M,STKINDI('991006','板块涨幅.股价',0),0);
电子信息:SUM((电子信息1-ref(电子信息1,1))/ref(电子信息1,1)*100,0),colorff00ff;
DRAWTEXT(ALL(BARSTATUS=2,1),电子信息 ,'电子信息'),colorff00ff;
纺织服装1:=if(date>=M,STKINDI('991008','板块涨幅.股价',0),0);
纺织服装:SUM((纺织服装1-ref(纺织服装1,1))/ref(纺织服装1,1)*100,0),color8000ff;
DRAWTEXT(ALL(BARSTATUS=2,1),纺织服装 ,'纺织服装'),color8000ff ;
电器1:=if(date>=M,STKINDI('991014','板块涨幅.股价',0),0);
电器:SUM((电器1-ref(电器1,1))/ref(电器1,1)*100,0),colorff0080;
DRAWTEXT(ALL(BARSTATUS=2,1),电器,'电器'),colorff0080;
保险1:=if(date>=M,STKINDI('991255','板块涨幅.股价',0),0);
保险:SUM((保险1-ref(保险1,1))/ref(保险1,1)*100,0),COLOR00FF00;
DRAWTEXT(ALL(BARSTATUS=2,1),保险 ,' 保险'),COLOR00FF00;
化工化纤1:=if(date>=M,STKINDI('991011','板块涨幅.股价',0),0);
化工化纤:SUM((化工化纤1-ref(化工化纤1,1))/ref(化工化纤1,1)*100,0),COLORMAGENTA;
DRAWTEXT(ALL(BARSTATUS=2,1),化工化纤 , '化工化纤'),COLORMAGENTA;
农林牧渔1:=if(date>=M,STKINDI('991021','板块涨幅.股价',0),0);
农林牧渔:SUM((农林牧渔1-ref(农林牧渔1,1))/ref(农林牧渔1,1)*100,0),color404080;
DRAWTEXT(ALL(BARSTATUS=2,1),农林牧渔 ,' 农林牧渔'),color404080;
供水供气1:=if(date>=M,STKINDI('991010','板块涨幅.股价',0),0);
供水供气:SUM((供水供气1-ref(供水供气1,1))/ref(供水供气1,1)*100,0),ColorFFFFFA;
DRAWTEXT(ALL(BARSTATUS=2,1),供水供气 ,'供水供气'),ColorFFFFFA;
外贸1:=if(date>=M,STKINDI('991031','板块涨幅.股价',0),0);
外贸:SUM((外贸1-ref(外贸1,1))/ref(外贸1,1)*100,0),color000080;
DRAWTEXT(ALL(BARSTATUS=2,1),外贸,'外贸'),color000080;
交通工具1:=if(date>=M,STKINDI('991026','板块涨幅.股价',0),0);
交通工具:SUM((交通工具1-ref(交通工具1,1))/ref(交通工具1,1)*100,0),color80ffff;
DRAWTEXT(ALL(BARSTATUS=2,1),交通工具,'交通工具'),color80ffff;
计算机1:=if(date>=M,STKINDI('991004','板块涨幅.股价',0),0);
计算机:SUM((计算机1-ref(计算机1,1))/ref(计算机1,1)*100,0),color80ff80;
DRAWTEXT(ALL(BARSTATUS=2,1),计算机,'计算机'),color80ff80;
建材1:=if(date>=M,STKINDI('991024','板块涨幅.股价',0),0);
建材:SUM((建材1-ref(建材1,1))/ref(建材1,1)*100,0),color00ff80;
DRAWTEXT(ALL(BARSTATUS=2,1),建材,' 建材'),color00ff80;
酿酒食品1:=if(date>=M,STKINDI('991020','板块涨幅.股价',0),0);
酿酒食品:SUM((酿酒食品1-ref(酿酒食品1,1))/ref(酿酒食品1,1)*100,0),ColorFFFFFA;
DRAWTEXT(ALL(BARSTATUS=2,1),酿酒食品 ,' 酿酒食品'),ColorFFFFFA;
通信1:=if(date>=M,STKINDI('991135','板块涨幅.股价',0),0);
通信:SUM((通信1-ref(通信1,1))/ref(通信1,1)*100,0),COLORYELLOW;
DRAWTEXT(ALL(BARSTATUS=2,1),通信,'通信'),COLORYELLOW;
机械1:=if(date>=M,STKINDI('991027','板块涨幅.股价',0),0);
机械:SUM((机械1-ref(机械1,1))/ref(机械1,1)*100,0),colorffff80 ;
DRAWTEXT(ALL(BARSTATUS=2,1),机械,' 机械'),colorffff80;
券商1:=if(date>=M,STKINDI('991036','板块涨幅.股价',0),0);
券商:SUM((券商1-ref(券商1,1))/ref(券商1,1)*100,0),color008080 ;
DRAWTEXT(ALL(BARSTATUS=2,1),券商,'券商'),color008080 ;
交通设施1:=if(date>=M,STKINDI('991016','板块涨幅.股价',0),0);
交通设施:SUM((交通设施1-ref(交通设施1,1))/ref(交通设施1,1)*100,0),color00ff00;
DRAWTEXT(ALL(BARSTATUS=2,1),交通设施,' 交通设施'),color00ff00;
造纸印刷1:=if(date>=M,STKINDI('991035','板块涨幅.股价',0),0);
造纸印刷:SUM((造纸印刷1-ref(造纸印刷1,1))/ref(造纸印刷1,1)*100,0),ColorBEF824;
DRAWTEXT(ALL(BARSTATUS=2,1),造纸印刷 ,'造纸印刷 '),ColorBEF824;
运输物流1:=if(date>=M,STKINDI('991136','板块涨幅.股价',0),0);
运输物流:SUM((运输物流1-ref(运输物流1,1))/ref(运输物流1,1)*100,0),colorff0080;
DRAWTEXT(ALL(BARSTATUS=2,1),运输物流 ,' 运输物流 '),colorff0080;
A股指数1:=if(date>=M,STKINDI('SH000002','板块涨幅.股价',0),0);
A股指数:SUM((A股指数1-ref(A股指数1,1))/ref(钢铁1,1)*100,0),color0000FF;
DRAWTEXT(ALL(BARSTATUS=2,1),A股指数,'A股指数'),color0000FF;
当前线1:=if(date>=M,C,0);
当前线:SUM((当前线1-REF(当前线1,1))/REF(当前线1,1)*100,0),LINETHICK3,ColorBEF824;
DRAWTEXTREL(10,0,'行业板块雷达'),linethick4,ColorFF00FF;
DRAWTEXTREL(560,960,'证券代码: '+STKLABEL+' 证券名称: '+STKNAME+''),LINETHICK3,ColorBEF824;
