大智慧板块监控的新写法[大智慧公式]

相关标签: 大智慧板块分类 、 大智慧板块不能排序 、 大智慧板块导入 、 大智慧 央视50 板块 、 大智慧板块与大盘对比 、 大智慧板块指数公式 、 大智慧板块文件 、 大智慧板块下载 、 大智慧主题板块导入 、

{新板块监控}{利用BKNAME函数取得[行业板块]名称字符串,自选股～自选股8}

源码：
X:=MAX(STRFIND(BKNAME,'自选股1',1),STRFIND(BKNAME,'自选股 2',1),STRFIND(BKNAME,'自选股3',1),STRFIND(BKNAME,'自选股4',1),STRFIND(BKNAME,' 自选股5',1),STRFIND(BKNAME,'自选股6',1),STRFIND(BKNAME,'自选股 7',1),STRFIND(BKNAME,'自选股8',1)); X1:=(STRFIND(BKNAME,'自选股',1)=1)*8;XZ:=IF(STRFIND(STRMID(BKNAME,X+X1,5),',',1)=5,5,IF(STRFIND(STRMID(BKNAME,X+X1,7),',',1)=7,7,9));BK:=STRMID(BKNAME,X+X1,XZ-1);{根据板块字符串比较条件，取得不同[行业板块]代码字符串}BKDM:=IFS(STRCMP(BK,'工程建筑')=0,'991002',IFS(STRCMP(BK,'电力')=0,'991003',IFS(STRCMP(BK,'计算机')=0,'991004',IFS(STRCMP(BK,'电子信息')=0,'991006',IFS(STRCMP(BK,'房地产')=0,'991007',IFS(STRCMP(BK,'纺织服装')=0,'991008',IFS(STRCMP(BK,'钢铁')=0,'991009',IFS(STRCMP(BK,'供水供气')=0,'991010',IFS(STRCMP(BK,'化工化纤')=0,'991011',IFS(STRCMP(BK,'电器')=0,'991014',IFS(STRCMP(BK,'交通设施')=0,'991016',IFS(STRCMP(BK,'银行类')=0,'991017',IFS(STRCMP(BK,'旅游酒店')=0,'991018',IFS(STRCMP(BK,'煤炭石油')=0,'991019',IFS(STRCMP(BK,'酿酒食品')=0,'991020',IFS(STRCMP(BK,'农林牧渔')=0,'991021',IFS(STRCMP(BK,'商业连锁')=0,'991023',IFS(STRCMP(BK,'建材')=0,'991024',IFS(STRCMP(BK,'其他行业')=0,'991025',IFS(STRCMP(BK,'交通工具')=0,'991026',IFS(STRCMP(BK,'机械')=0,'991027',IFS(STRCMP(BK,'医药')=0,'991028',IFS(STRCMP(BK,'外贸')=0,'991031',IFS(STRCMP(BK,'教育传媒')=0,'991032',IFS(STRCMP(BK,'仪电仪表')=0,'991033',IFS(STRCMP(BK,'有色金属')=0,'991034',IFS(STRCMP(BK,'造纸印刷')=0,'991035',IFS(STRCMP(BK,'券商')=0,'991036',IFS(STRCMP(BK,'通信')=0,'991135',IFS(STRCMP(BK,'运输物流')=0,'991136',IFS(STRCMP(BK,'保险')=0,'991255','')))))))))))))))))))))))))))))));{引用相应板块的指标数值，举例如下：} 板块指数:STKINDI(BKDM,'MA.MA1',1),LINETHICK0,PRECIS2; 板块涨幅:STKINDI(BKDM,'涨幅.'),LINETHICK0,PRECIS2; 板块DDX:STKINDI(BKDM,'DDX.DDX'),LINETHICK0;{.......这里可以方便取得任意系统或自定义引用公式的指标数值}{下面是文字部分的应用实例，可根据需要修改成线型什么的} 大盘涨幅:INDEXC/REF(INDEXC,1)*100-100,LINETHICK0,PRECIS2;个股涨幅:C/REF(C,1)*100-100,LINETHICK0,PRECIS2; DRAWTEXTABS(5,5,'板块信息：'+BK+'('+BKDM+') 涨幅'+NUMTOSTRN(板块涨幅,2)+'%'),COLORDDDDDD; DRAWTEXTABS(240,5,IFS(板块涨幅>大盘涨幅,'强于大盘','')),COLOR0000FF; DRAWTEXTABS(240,5,IFS(板块涨幅<大盘涨幅,'弱于大盘','')),COLOR00FF00; DRAWTEXTABS(5,20,'个股信息：'+STKNAME+'('+STKLABEL+') 涨幅'+NUMTOSTRN(个股涨幅,2)+'%'),COLORDDDDDD; DRAWTEXTABS(240,20,IFS(个股涨幅>大盘涨幅,'强于大盘','')),COLOR0000FF; DRAWTEXTABS(240,20,IFS(个股涨幅<大盘涨幅,'弱于大盘','')),COLOR00FF00; DRAWTEXTABS(300,20,IFS(个股涨幅>板块涨幅,'强于板块','')),COLOR0000FF;DRAWTEXTABS(300,20,IFS(个股涨幅<板块涨幅,'弱于板块','')),COLOR00FF00; DRAWTEXTREL(10,880,'WWW.CXH99.COM'),coloryellow; DRAWTEXTREL(999,999,'<span style="display:none;"><a data-cke-saved-href=" http://www.cxh99.com" href=" http://www.cxh99.com" title="大智慧程序化交易">大智慧程序化交易</a></span>');
点击复制上述代码粘贴到到公式管理器

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】