【通达信】

参数：m就是日期，自己设置日期
银行类1:=IF(DATE>=M,STKINDI('991007','板块涨幅.股价',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;