通达信HYZSCODE所属行业的板块指数代码大智慧替代方法

HYZSCODE

"返回品种所属行业的板块指数代码。比如: CALCSTOCKINDEX(HYZSCODE,'KDJ',3);
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,HYZSCODE);
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);"
例如：通达信：
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,HYZSCODE);
大智慧：
drawtextrel(0,0,HYZSCODE);

HYZSCODE:=
IFS(STRFIND(BKNAME,'土木工程',1)>0,'991002',
IFS(STRFIND(BKNAME,'电热供应',1)>0,'991003',
IFS(STRFIND(BKNAME,'软件',1)>0,'991004',
IFS(STRFIND(BKNAME,'电子设备',1)>0,'991006',
IFS(STRFIND(BKNAME,'房地产',1)>0,'991007',
IFS(STRFIND(BKNAME,'服装',1)>0,'991008',
IFS(STRFIND(BKNAME,'黑色金属',1)>0,'991009',
IFS(STRFIND(BKNAME,'供水供气',1)>0,'991010',
IFS(STRFIND(BKNAME,'化工化纤',1)>0,'991011',
IFS(STRFIND(BKNAME,'农副食品',1)>0,'991013',
IFS(STRFIND(BKNAME,'电器机械',1)>0,'991014',
IFS(STRFIND(BKNAME,'橡胶塑料',1)>0,'991015',
IFS(STRFIND(BKNAME,'运输业',1)>0,'991016'',
IFS(STRFIND(BKNAME,'银行类',1)>0,'991017',
IFS(STRFIND(BKNAME,'住宿餐饮',1)>0,'991018',
IFS(STRFIND(BKNAME,'煤炭石油',1)>0,'991019',
IFS(STRFIND(BKNAME,'酒及饮料',1)>0,'991020',
IFS(STRFIND(BKNAME,'农林牧渔',1)>0,'991021',
IFS(STRFIND(BKNAME,'开采辅助',1)>0,'991022',
IFS(STRFIND(BKNAME,'零售业',1)>0,'991023',
IFS(STRFIND(BKNAME,'建材家具',1)>0,'991024',
IFS(STRFIND(BKNAME,'综合',1)>0,'991025',
IFS(STRFIND(BKNAME,'运输设备',1)>0,'991026',
IFS(STRFIND(BKNAME,'通用设备',1)>0,'991027',
IFS(STRFIND(BKNAME,'医疗卫生',1)>0,'991028',
IFS(STRFIND(BKNAME,'纺织业',1)>0,'991029',
IFS(STRFIND(BKNAME,'能源加工',1)>0,'991030',
IFS(STRFIND(BKNAME,'批发业',1)>0,'991031',
IFS(STRFIND(BKNAME,'文体传媒',1)>0,'991032',
IFS(STRFIND(BKNAME,'仪器仪表',1)>0,'991033',
IFS(STRFIND(BKNAME,'有色金属',1)>0,'991034',
IFS(STRFIND(BKNAME,'造纸印刷',1)>0,'991035',
IFS(STRFIND(BKNAME,'券商',1)>0,'991036',
IFS(STRFIND(BKNAME,'非金属矿',1)>0,'991037',
IFS(STRFIND(BKNAME,'金属制品',1)>0,'991038',
IFS(STRFIND(BKNAME,'专用设备',1)>0,'991039',
IFS(STRFIND(BKNAME,'汽车制造',1)>0,'991040',
IFS(STRFIND(BKNAME,'其它制造',1)>0,'991041',
IFS(STRFIND(BKNAME,'建筑装饰',1)>0,'991042',
IFS(STRFIND(BKNAME,'互联网',1)>0,'991043',
IFS(STRFIND(BKNAME,'商务服务',1)>0,'991044',
IFS(STRFIND(BKNAME,'技术服务',1)>0,'991045',
IFS(STRFIND(BKNAME,'生态环境',1)>0,'991046',
IFS(STRFIND(BKNAME,'公共设施',1)>0,'991047',
IFS(STRFIND(BKNAME,'通信网络',1)>0,'991135',
IFS(STRFIND(BKNAME,'仓储物流',1)>0,'991136',
IFS(STRFIND(BKNAME,'保险',1)>0,'991255',
IFS(STRFIND(BKNAME,'其他金融',1)>0,'991256',
'000001'
))))))))))))))))))))))))))))))))))))))))))))))));

--------------------------------------------------
HYZSCODE:=
IFS(STRFIND(BKNAME,'土木工程',1)>0,'991002',
IFS(STRFIND(BKNAME,'电热供应',1)>0,'991003',
IFS(STRFIND(BKNAME,'软件',1)>0,'991004',
IFS(STRFIND(BKNAME,'电子设备',1)>0,'991006',
IFS(STRFIND(BKNAME,'房地产',1)>0,'991007',
IFS(STRFIND(BKNAME,'服装',1)>0,'991008',
IFS(STRFIND(BKNAME,'黑色金属',1)>0,'991009',
IFS(STRFIND(BKNAME,'供水供气',1)>0,'991010',
IFS(STRFIND(BKNAME,'化工化纤',1)>0,'991011',
IFS(STRFIND(BKNAME,'农副食品',1)>0,'991013',
IFS(STRFIND(BKNAME,'电器机械',1)>0,'991014',
IFS(STRFIND(BKNAME,'橡胶塑料',1)>0,'991015',
IFS(STRFIND(BKNAME,'运输业',1)>0,'991016',
IFS(STRFIND(BKNAME,'银行类',1)>0,'991017',
IFS(STRFIND(BKNAME,'住宿餐饮',1)>0,'991018',
IFS(STRFIND(BKNAME,'煤炭石油',1)>0,'991019',
IFS(STRFIND(BKNAME,'酒及饮料',1)>0,'991020',
IFS(STRFIND(BKNAME,'农林牧渔',1)>0,'991021',
IFS(STRFIND(BKNAME,'开采辅助',1)>0,'991022',
IFS(STRFIND(BKNAME,'零售业',1)>0,'991023',
IFS(STRFIND(BKNAME,'建材家具',1)>0,'991024',
IFS(STRFIND(BKNAME,'综合',1)>0,'991025',
IFS(STRFIND(BKNAME,'运输设备',1)>0,'991026',
IFS(STRFIND(BKNAME,'通用设备',1)>0,'991027',
IFS(STRFIND(BKNAME,'医疗卫生',1)>0,'991028',
IFS(STRFIND(BKNAME,'纺织业',1)>0,'991029',
IFS(STRFIND(BKNAME,'能源加工',1)>0,'991030',
IFS(STRFIND(BKNAME,'批发业',1)>0,'991031',
IFS(STRFIND(BKNAME,'文体传媒',1)>0,'991032',
IFS(STRFIND(BKNAME,'仪器仪表',1)>0,'991033',
IFS(STRFIND(BKNAME,'有色金属',1)>0,'991034',
IFS(STRFIND(BKNAME,'造纸印刷',1)>0,'991035',
IFS(STRFIND(BKNAME,'券商',1)>0,'991036',
IFS(STRFIND(BKNAME,'非金属矿',1)>0,'991037',
IFS(STRFIND(BKNAME,'金属制品',1)>0,'991038',
IFS(STRFIND(BKNAME,'专用设备',1)>0,'991039',
IFS(STRFIND(BKNAME,'汽车制造',1)>0,'991040',
IFS(STRFIND(BKNAME,'其它制造',1)>0,'991041',
IFS(STRFIND(BKNAME,'建筑装饰',1)>0,'991042',
IFS(STRFIND(BKNAME,'互联网',1)>0,'991043',
IFS(STRFIND(BKNAME,'商务服务',1)>0,'991044',
IFS(STRFIND(BKNAME,'技术服务',1)>0,'991045',
IFS(STRFIND(BKNAME,'生态环境',1)>0,'991046',
IFS(STRFIND(BKNAME,'公共设施',1)>0,'991047',
IFS(STRFIND(BKNAME,'通信网络',1)>0,'991135',
IFS(STRFIND(BKNAME,'仓储物流',1)>0,'991136',
IFS(STRFIND(BKNAME,'保险',1)>0,'991255',
IFS(STRFIND(BKNAME,'其他金融',1)>0,'991256',
'000001'
))))))))))))))))))))))))))))))))))))))))))))))));
drawtextrel(0,0,HYZSCODE);