年前几位老师在论坛发表的关于板块方面的指标公式,经过细细研读源码,受益匪浅,现在也把自己写的一点东西拿出来,和大家交流。 本帖源码的写法受一品老师【板块聚焦】一文启发,只是算法略有不同,在此感谢一品老师。 如果将两种不同属性的东西放在一起进行比较是没有意义的,故我的写法是将大智慧行业和大智慧概念分开进行比较, 先建立如下引用指标:(就是另外的一个单独的指标) 指标名称:涨幅1 Var1:=(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100; A:sma(Var1,3,1)*(-1)+100;
大智慧行业有三十一个分类,可放在一起进行比较,源码如下: 指标名称:行业三强 上证1:=(HHV(INDEXH,34)-INDEXC)/(HHV(INDEXH,34)-LLV(INDEXL,34))*100; 大盘1:=sma(上证1,3,1)*(-1)+100;
机械1:=STKINDI('991027','涨幅1.A'); 工程建筑1:=STKINDI('991002','涨幅1.A'); 电力1:=STKINDI('991003','涨幅1.A'); 计算机1:=STKINDI('991004','涨幅1.A'); 电子信息1:=STKINDI('991006','涨幅1.A'); 房地产1:=STKINDI('991007','涨幅1.A'); 纺织服装1:=STKINDI('991008','涨幅1.A'); 钢铁1:=STKINDI('991009','涨幅1.A'); 供水供气1:=STKINDI('991010','涨幅1.A'); 化工化纤1:=STKINDI('991011','涨幅1.A'); 电器1:=STKINDI('991014','涨幅1.A'); 交通设施1:=STKINDI('991016','涨幅1.A'); 银行类1:=STKINDI('991017','涨幅1.A'); 旅游酒店1:=STKINDI('991018','涨幅1.A'); 煤炭石油1:=STKINDI('991019','涨幅1.A'); 酿酒食品1:=STKINDI('991020','涨幅1.A'); 农林牧渔1:=STKINDI('991021','涨幅1.A'); 商业连锁1:=STKINDI('991023','涨幅1.A'); 建材1:=STKINDI('991024','涨幅1.A'); 其它行业1:=STKINDI('991025','涨幅1.A'); 交通工具1:=STKINDI('991026','涨幅1.A'); 医药1:=STKINDI('991028','涨幅1.A'); 外贸1:=STKINDI('991031','涨幅1.A'); 教育传媒1:=STKINDI('991032','涨幅1.A'); 仪电仪表1:=STKINDI('991033','涨幅1.A'); 有色金属1:=STKINDI('991034','涨幅1.A'); 造纸印刷1:=STKINDI('991035','涨幅1.A'); 券商1:=STKINDI('991036','涨幅1.A'); 通信1:=STKINDI('991135','涨幅1.A'); 运输物流1:=STKINDI('991136','涨幅1.A'); 保险1:=STKINDI('991255','涨幅1.A');
MAX1:=MAX(机械1,工程建筑1); MAX2:=MAX(电力1,MAX1); MAX3:=MAX(计算机1,MAX2); MAX4:=MAX(电子信息1,MAX3); MAX5:=MAX(房地产1,MAX4); MAX6:=MAX(纺织服装1,MAX5); MAX7:=MAX(钢铁1,MAX6); MAX8:=MAX(供水供气1,MAX7); MAX9:=MAX(化工化纤1,MAX8); MAX10:=MAX(电器1,MAX9); MAX11:=MAX(交通设施1,MAX10); MAX12:=MAX(银行类1,MAX11); MAX13:=MAX(旅游酒店1,MAX12); MAX14:=MAX(煤炭石油1,MAX13); MAX15:=MAX(酿酒食品1,MAX14); MAX16:=MAX(农林牧渔1,MAX15); MAX17:=MAX(商业连锁1,MAX16); MAX18:=MAX(建材1,MAX17); MAX19:=MAX(其它行业1,MAX18); MAX20:=MAX(交通工具1,MAX19); MAX21:=MAX(医药1,MAX20); MAX22:=MAX(外贸1,MAX21); MAX23:=MAX(教育传媒1,MAX22); MAX24:=MAX(仪电仪表1,MAX23); MAX25:=MAX(有色金属1,MAX24); MAX26:=MAX(造纸印刷1,MAX25); MAX27:=MAX(券商1,MAX26); MAX28:=MAX(通信1,MAX27); MAX29:=MAX(运输物流1,MAX28); MAX30:=MAX(保险1,MAX29);
A1:=IF(机械1=MAX30,0,机械1); A2:=IF(工程建筑1=MAX30,0,工程建筑1); A3:=IF(电力1=MAX30,0,电力1); A4:=IF(计算机1=MAX30,0,计算机1); A5:=IF(电子信息1=MAX30,0,电子信息1); A6:=IF(房地产1=MAX30,0,房地产1); A7:=IF(纺织服装1=MAX30,0,纺织服装1); A8:=IF(钢铁1=MAX30,0,钢铁1); A9:=IF(供水供气1=MAX30,0,供水供气1); A10:=IF(化工化纤1=MAX30,0,化工化纤1); A11:=IF(电器1=MAX30,0,电器1); A12:=IF(交通设施1=MAX30,0,交通设施1); A13:=IF(银行类1=MAX30,0,银行类1); A14:=IF(旅游酒店1=MAX30,0,旅游酒店1); A15:=IF(煤炭石油1=MAX30,0,煤炭石油1); A16:=IF(酿酒食品1=MAX30,0,酿酒食品1); A17:=IF(农林牧渔1=MAX30,0,农林牧渔1); A18:=IF(商业连锁1=MAX30,0,商业连锁1); A19:=IF(建材1=MAX30,0,建材1); A20:=IF(其它行业1=MAX30,0,其它行业1); A21:=IF(交通工具1=MAX30,0,交通工具1); A22:=IF(医药1=MAX30,0,医药1); A23:=IF(外贸1=MAX30,0,外贸1); A24:=IF(教育传媒1=MAX30,0,教育传媒1); A25:=IF(仪电仪表1=MAX30,0,仪电仪表1); A26:=IF(有色金属1=MAX30,0,有色金属1); A27:=IF(造纸印刷1=MAX30,0,造纸印刷1); A28:=IF(券商1=MAX30,0,券商1); A29:=IF(通信1=MAX30,0,通信1); A30:=IF(运输物流1=MAX30,0,运输物流1); A31:=IF(保险1=MAX30,0,保险1);
MAXA1:=MAX(A1,A2); MAXA2:=MAX(A3,MAXA1); MAXA3:=MAX(A4,MAXA2); MAXA4:=MAX(A5,MAXA3); MAXA5:=MAX(A6,MAXA4); MAXA6:=MAX(A7,MAXA5); MAXA7:=MAX(A8,MAXA6); MAXA8:=MAX(A9,MAXA7); MAXA9:=MAX(A10,MAXA8); MAXA10:=MAX(A11,MAXA9); MAXA11:=MAX(A12,MAXA10); MAXA12:=MAX(A13,MAXA11); MAXA13:=MAX(A14,MAXA12); MAXA14:=MAX(A15,MAXA13); MAXA15:=MAX(A16,MAXA14); MAXA16:=MAX(A17,MAXA15); MAXA17:=MAX(A18,MAXA16); MAXA18:=MAX(A19,MAXA17); MAXA19:=MAX(A20,MAXA18); MAXA20:=MAX(A21,MAXA19); MAXA21:=MAX(A22,MAXA20); MAXA22:=MAX(A23,MAXA21); MAXA23:=MAX(A24,MAXA22); MAXA24:=MAX(A25,MAXA23); MAXA25:=MAX(A26,MAXA24); MAXA26:=MAX(A27,MAXA25); MAXA27:=MAX(A28,MAXA26); MAXA28:=MAX(A29,MAXA27); MAXA29:=MAX(A30,MAXA28); MAXA30:=MAX(A31,MAXA29);
AA1:=IF(机械1>=MAXA30,0,机械1); AA2:=IF(工程建筑1>=MAXA30,0,工程建筑1); AA3:=IF(电力1>=MAXA30,0,电力1); AA4:=IF(计算机1>=MAXA30,0,计算机1); AA5:=IF(电子信息1>=MAXA30,0,电子信息1); AA6:=IF(房地产1>=MAXA30,0,房地产1); AA7:=IF(纺织服装1>=MAXA30,0,纺织服装1); AA8:=IF(钢铁1>=MAXA30,0,钢铁1); AA9:=IF(供水供气1>=MAXA30,0,供水供气1); AA10:=IF(化工化纤1>=MAXA30,0,化工化纤1); AA11:=IF(电器1>=MAXA30,0,电器1); AA12:=IF(交通设施1>=MAXA30,0,交通设施1); AA13:=IF(银行类1>=MAXA30,0,银行类1); AA14:=IF(旅游酒店1>=MAXA30,0,旅游酒店1); AA15:=IF(煤炭石油1>=MAXA30,0,煤炭石油1); AA16:=IF(酿酒食品1>=MAXA30,0,酿酒食品1); AA17:=IF(农林牧渔1>=MAXA30,0,农林牧渔1); AA18:=IF(商业连锁1>=MAXA30,0,商业连锁1); AA19:=IF(建材1>=MAXA30,0,建材1); AA20:=IF(其它行业1>=MAXA30,0,其它行业1); AA21:=IF(交通工具1>=MAXA30,0,交通工具1); AA22:=IF(医药1>=MAXA30,0,医药1); AA23:=IF(外贸1>=MAXA30,0,外贸1); AA24:=IF(教育传媒1>=MAXA30,0,教育传媒1); AA25:=IF(仪电仪表1>=MAXA30,0,仪电仪表1); AA26:=IF(有色金属1>=MAXA30,0,有色金属1); AA27:=IF(造纸印刷1>=MAXA30,0,造纸印刷1); AA28:=IF(券商1>=MAXA30,0,券商1); AA29:=IF(通信1>=MAXA30,0,通信1); AA30:=IF(运输物流1>=MAXA30,0,运输物流1); AA31:=IF(保险1>=MAXA30,0,保险1);
MAXAA1:=MAX(AA1,AA2); MAXAA2:=MAX(AA3,MAXAA1); MAXAA3:=MAX(AA4,MAXAA2); MAXAA4:=MAX(AA5,MAXAA3); MAXAA5:=MAX(AA6,MAXAA4); MAXAA6:=MAX(AA7,MAXAA5); MAXAA7:=MAX(AA8,MAXAA6); MAXAA8:=MAX(AA9,MAXAA7); MAXAA9:=MAX(AA10,MAXAA8); MAXAA10:=MAX(AA11,MAXAA9); MAXAA11:=MAX(AA12,MAXAA10); MAXAA12:=MAX(AA13,MAXAA11); MAXAA13:=MAX(AA14,MAXAA12); MAXAA14:=MAX(AA15,MAXAA13); MAXAA15:=MAX(AA16,MAXAA14); MAXAA16:=MAX(AA17,MAXAA15); MAXAA17:=MAX(AA18,MAXAA16); MAXAA18:=MAX(AA19,MAXAA17); MAXAA19:=MAX(AA20,MAXAA18); MAXAA20:=MAX(AA21,MAXAA19); MAXAA21:=MAX(AA22,MAXAA20); MAXAA22:=MAX(AA23,MAXAA21); MAXAA23:=MAX(AA24,MAXAA22); MAXAA24:=MAX(AA25,MAXAA23); MAXAA25:=MAX(AA26,MAXAA24); MAXAA26:=MAX(AA27,MAXAA25); MAXAA27:=MAX(AA28,MAXAA26); MAXAA28:=MAX(AA29,MAXAA27); MAXAA29:=MAX(AA30,MAXAA28); MAXAA30:=MAX(AA31,MAXAA29);
大盘涨幅:大盘1,COLORRED,LINETHICK0; 涨幅榜首:MAX30,COLORYELLOW,LINETHICK0; 涨幅次位:MAXA30,COLORC0C0C0,LINETHICK0; DRAWTEXT(机械1=MAX30 AND 机械1>0,0-1,'①机械'),COLOR00FF00; DRAWTEXT(工程建筑1=MAX30 AND 工程建筑1>0,0-1,'①工程建筑'),COLORFF6600; DRAWTEXT(电力1=MAX30 AND 电力1>0,0-1,'①电力'),COLORFF8800; DRAWTEXT(计算机1=MAX30 AND 计算机1>0,0-1,'①计算机'),COLOR008800; DRAWTEXT(电子信息1=MAX30 AND 电子信息1>0,0-1,'①电子信息'),COLORBLUE; DRAWTEXT(房地产1=MAX30 AND 房地产1>0,0-1,'①房地产'),COLORBLUE; DRAWTEXT(纺织服装1=MAX30 AND 纺织服装1>0,0-1,'①纺织服装'),COLORBLUE; DRAWTEXT(钢铁1=MAX30 AND 钢铁1>0,0-1,'①钢铁'),COLOR0000FF; DRAWTEXT(供水供气1=MAX30 AND 供水供气1>0,0-1,'①供水供气'),COLOR88CC99; DRAWTEXT(化工化纤1=MAX30 AND 化工化纤1>0,0-1,'①化工化纤'),COLOR00FFFF; DRAWTEXT(电器1=MAX30 AND 电器1>0,0-1,'①电器'),COLORRED; DRAWTEXT(交通设施1=MAX30 AND 交通设施1>0,0-1,'①交通设施'),COLORYELLOW; DRAWTEXT(银行类1=MAX30 AND 银行类1>0,0-1,'①银行类'),COLORYELLOW; DRAWTEXT(旅游酒店1=MAX30 AND 旅游酒店1>0,0-1,'①旅游酒店'),COLORWHITE; DRAWTEXT(煤炭石油1=MAX30 AND 煤炭石油1>0,0-1,'①煤炭石油'),COLORFF00FF; DRAWTEXT(酿酒食品1=MAX30 AND 酿酒食品1>0,0-1,'①酿酒食品'),COLORFF00FF; DRAWTEXT(农林牧渔1=MAX30 AND 农林牧渔1>0,0-1,'①农林牧渔'),COLORFF00FF; DRAWTEXT(商业连锁1=MAX30 AND 商业连锁1>0,0-1,'①商业连锁'),COLORFFFFFF; DRAWTEXT(建材1=MAX30 AND 建材1>0,0-1,'①建材'),COLORGREEN; DRAWTEXT(其它行业1=MAX30 AND 其它行业1>0,0-1,'①其它行业'),COLORFF66FF; DRAWTEXT(交通工具1=MAX30 AND 交通工具1>0,0-1,'①交通工具'),COLORFF66FF; DRAWTEXT(医药1=MAX30 AND 医药1>0,0-1,'①医药'),COLOR0022AA; DRAWTEXT(外贸1=MAX30 AND 外贸1>0,0-1,'①外贸'),COLORFF8822; DRAWTEXT(教育传媒1=MAX30 AND 教育传媒1>0,0-1,'①教育传媒'),COLORWHITE; DRAWTEXT(仪电仪表1=MAX30 AND 仪电仪表1>0,0-1,'①仪电仪表'),COLORFF00FF; DRAWTEXT(有色金属1=MAX30 AND 有色金属1>0,0-1,'①有色金属'),COLORFF00FF; DRAWTEXT(造纸印刷1=MAX30 AND 造纸印刷1>0,0-1,'①造纸印刷'),COLORFF00FF; DRAWTEXT(券商1=MAX30 AND 券商1>0,0-1,'①券商'),COLORFFFFFF; DRAWTEXT(通信1=MAX30 AND 通信1>0,0-1,'①通信'),COLOR0022FF; DRAWTEXT(运输物流1=MAX30 AND 运输物流1>0,0-1,'①运输物流'),COLORFF66FF; DRAWTEXT(保险1=MAX30 AND 保险1>0,0-1,'①保险'),COLOR00FFFF;
DRAWTEXT(机械1=MAXA30 AND 机械1>0,0-3,'②机械'),COLOR00FF00; DRAWTEXT(工程建筑1=MAXA30 AND 工程建筑1>0,0-3,'②工程建筑'),COLORFF6600; DRAWTEXT(电力1=MAXA30 AND 电力1>0,0-3,'②电力'),COLORFF8800; DRAWTEXT(计算机1=MAXA30 AND 计算机1>0,0-3,'②计算机'),COLOR008800; DRAWTEXT(电子信息1=MAXA30 AND 电子信息1>0,0-3,'②电子信息'),COLORBLUE; DRAWTEXT(房地产1=MAXA30 AND 房地产1>0,0-3,'②房地产'),COLORBLUE; DRAWTEXT(纺织服装1=MAXA30 AND 纺织服装1>0,0-3,'②纺织服装'),COLORBLUE; DRAWTEXT(钢铁1=MAXA30 AND 钢铁1>0,0-3,'②钢铁'),COLOR0000FF; DRAWTEXT(供水供气1=MAXA30 AND 供水供气1>0,0-3,'②供水供气'),COLOR88CC99; DRAWTEXT(化工化纤1=MAXA30 AND 化工化纤1>0,0-3,'②金属'),COLOR00FFFF; DRAWTEXT(电器1=MAXA30 AND 电器1>0,0-3,'②电器'),COLORRED; DRAWTEXT(交通设施1=MAXA30 AND 交通设施1>0,0-3,'②交通设施'),COLORYELLOW; DRAWTEXT(银行类1=MAXA30 AND 银行类1>0,0-3,'②银行类'),COLORYELLOW; DRAWTEXT(旅游酒店1=MAXA30 AND 旅游酒店1>0,0-3,'②旅游酒店'),COLORWHITE; DRAWTEXT(煤炭石油1=MAXA30 AND 煤炭石油1>0,0-3,'②煤炭石油'),COLORFF00FF; DRAWTEXT(酿酒食品1=MAXA30 AND 酿酒食品1>0,0-3,'②酿酒食品'),COLORFF00FF; DRAWTEXT(农林牧渔1=MAXA30 AND 农林牧渔1>0,0-3,'②农林牧渔'),COLORFF00FF; DRAWTEXT(商业连锁1=MAXA30 AND 商业连锁1>0,0-3,'②商业连锁'),COLORFFFFFF; DRAWTEXT(建材1=MAXA30 AND 建材1>0,0-3,'②建材'),COLORGREEN; DRAWTEXT(其它行业1=MAXA30 AND 其它行业1>0,0-3,'②其它行业'),COLORFF66FF; DRAWTEXT(交通工具1=MAXA30 AND 交通工具1>0,0-3,'②交通工具'),COLORFF66FF; DRAWTEXT(医药1=MAXA30 AND 医药1>0,0-3,'②医药'),COLOR0022AA; DRAWTEXT(外贸1=MAXA30 AND 外贸1>0,0-3,'②外贸'),COLORFF8822; DRAWTEXT(教育传媒1=MAXA30 AND 教育传媒1>0,0-3,'②教育传媒'),COLORWHITE; DRAWTEXT(仪电仪表1=MAXA30 AND 仪电仪表1>0,0-3,'②仪电仪表'),COLORFF00FF; DRAWTEXT(有色金属1=MAXA30 AND 有色金属1>0,0-3,'②有色金属'),COLORFF00FF; DRAWTEXT(造纸印刷1=MAXA30 AND 造纸印刷1>0,0-3,'②造纸印刷'),COLORFF00FF; DRAWTEXT(券商1=MAXA30 AND 券商1>0,0-3,'②券商'),COLORFFFFFF; DRAWTEXT(通信1=MAXA30 AND 通信1>0,0-3,'②通信'),COLOR0022FF; DRAWTEXT(运输物流1=MAXA30 AND 运输物流1>0,0-3,'②运输物流'),COLORFF66FF; DRAWTEXT(保险1=MAXA30 AND 保险1>0,0-3,'②保险'),COLOR00FFFF;
DRAWTEXT(机械1=MAXAA30 AND 机械1>0,0-5,'③机械'),COLOR00FF00; DRAWTEXT(工程建筑1=MAXAA30 AND 工程建筑1>0,0-5,'③工程建筑'),COLORFF6600; DRAWTEXT(电力1=MAXAA30 AND 电力1>0,0-5,'③电力'),COLORFF8800; DRAWTEXT(计算机1=MAXAA30 AND 计算机1>0,0-5,'③计算机'),COLOR008800; DRAWTEXT(电子信息1=MAXAA30 AND 电子信息1>0,0-5,'③电子信息'),COLORBLUE; DRAWTEXT(房地产1=MAXAA30 AND 房地产1>0,0-5,'③房地产'),COLORBLUE; DRAWTEXT(纺织服装1=MAXAA30 AND 纺织服装1>0,0-5,'③纺织服装'),COLORBLUE; DRAWTEXT(钢铁1=MAXAA30 AND 钢铁1>0,0-5,'③钢铁'),COLOR0000FF; DRAWTEXT(供水供气1=MAXAA30 AND 供水供气1>0,0-5,'③供水供气'),COLOR88CC99; DRAWTEXT(化工化纤1=MAXAA30 AND 化工化纤1>0,0-5,'③化工化纤'),COLOR00FFFF; DRAWTEXT(电器1=MAXAA30 AND 电器1>0,0-5,'③电器'),COLORRED; DRAWTEXT(交通设施1=MAXAA30 AND 交通设施1>0,0-5,'③交通设施'),COLORYELLOW; DRAWTEXT(银行类1=MAXAA30 AND 银行类1>0,0-5,'③银行类'),COLORYELLOW; DRAWTEXT(旅游酒店1=MAXAA30 AND 旅游酒店1>0,0-5,'③旅游酒店'),COLORWHITE; DRAWTEXT(煤炭石油1=MAXAA30 AND 煤炭石油1>0,0-5,'③煤炭石油'),COLORFF00FF; DRAWTEXT(酿酒食品1=MAXAA30 AND 酿酒食品1>0,0-5,'③酿酒食品'),COLORFF00FF; DRAWTEXT(农林牧渔1=MAXAA30 AND 农林牧渔1>0,0-5,'③农林牧渔'),COLORFF00FF; DRAWTEXT(商业连锁1=MAXAA30 AND 商业连锁1>0,0-5,'③商业连锁'),COLORFFFFFF; DRAWTEXT(建材1=MAXAA30 AND 建材1>0,0-5,'③建材'),COLORGREEN; DRAWTEXT(其它行业1=MAXAA30 AND 其它行业1>0,0-5,'③其它行业'),COLORFF66FF; DRAWTEXT(交通工具1=MAXAA30 AND 交通工具1>0,0-5,'③交通工具'),COLORFF66FF; DRAWTEXT(医药1=MAXAA30 AND 医药1>0,0-5,'③医药'),COLOR0022AA; DRAWTEXT(外贸1=MAXAA30 AND 外贸1>0,0-5,'③外贸'),COLORFF8822; DRAWTEXT(教育传媒1=MAXAA30 AND 教育传媒1>0,0-5,'③教育传媒'),COLORWHITE; DRAWTEXT(仪电仪表1=MAXAA30 AND 仪电仪表1>0,0-5,'③仪电仪表'),COLORFF00FF; DRAWTEXT(有色金属1=MAXAA30 AND 有色金属1>0,0-5,'③有色金属'),COLORFF00FF; DRAWTEXT(造纸印刷1=MAXAA30 AND 造纸印刷1>0,0-5,'③造纸印刷'),COLORFF00FF; DRAWTEXT(券商1=MAXAA30 AND 券商1>0,0-5,'③券商'),COLORFFFFFF; DRAWTEXT(通信1=MAXAA30 AND 通信1>0,0-5,'③通信'),COLOR0022FF; DRAWTEXT(运输物流1=MAXAA30 AND 运输物流1>0,0-5,'③运输物流'),COLORFF66FF; DRAWTEXT(保险1=MAXAA30 AND 保险1>0,0-5,'③保险'),COLOR00FFFF; %:0-7,COLOR000000;0,COLOR000000; 上段源码其实是完整的源码,用“{}”括住最后两大段,就是概念老大,如果括住倒数第一大段和倒数第三大段,就是概念老二,概念老三的方法一样,图省事的哥们直接引入。 是我做的看图模板,放在 大智慧的安装盘符:dzh2userdataIndiTemp文件夹中。 下面是效果图,编写源码的初衷是如何避免那种板块“强势一日游,见光死”,当然弊端就是有时找到的强势板块已属强弩之末,需要大家留意。 |