get_sbi_sensor_name

get_sensor_name(sqddat,sysid,outfile)
sqddat : SBI directory
sysid  : data ID  e.x. '100045a'
outfile : sensor name file (ASCII)
        left column   : sensor number in active channel(e.g. bexp, pick, etc)
        middle column : original sensor number
        right column  : sensor name

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function get_sbi_sensor_name(sqddat,sysid,outfile)
0002 %get_sensor_name(sqddat,sysid,outfile)
0003 %sqddat : SBI directory
0004 %sysid  : data ID  e.x. '100045a'
0005 %outfile : sensor name file (ASCII)
0006 %        left column   : sensor number in active channel(e.g. bexp, pick, etc)
0007 %        middle column : original sensor number
0008 %        right column  : sensor name
0009 %
0010 % Copyright (C) 2011, ATR All Rights Reserved.
0011 % License : New BSD License(see VBMEG_LICENSE.txt)
0012 [okix,chname] = readSBI_sensor(sqddat,sysid);
0013 
0014 fid = fopen(outfile,'w');
0015 
0016 nch = length(okix);
0017 for i = 1:nch
0018   fprintf(fid,[num2str(i),'\t',num2str(okix(i)),'\t',chname{i}]);
0019   fprintf(fid,'\n');
0020 end
0021 
0022 fclose(fid);