job_plot_meg_show_meginfo

 Show information of MEG data.

 [syntax]
 job_plot_meg_show_meginfo(inst_id)

 [history]
 2008-09-02 Taku Yoshioka
 2011-03-14 taku-y
  [debug] If field 'MEG ID' does not exist, empty '' is shown. 

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

0001 function job_plot_meg_show_meginfo(inst_id)
0002 % Show information of MEG data.
0003 %
0004 % [syntax]
0005 % job_plot_meg_show_meginfo(inst_id)
0006 %
0007 % [history]
0008 % 2008-09-02 Taku Yoshioka
0009 % 2011-03-14 taku-y
0010 %  [debug] If field 'MEG ID' does not exist, empty '' is shown.
0011 %
0012 % Copyright (C) 2011, ATR All Rights Reserved.
0013 % License : New BSD License(see VBMEG_LICENSE.txt)
0014 
0015 global vbmeg_inst; 
0016 
0017 if isempty(vbmeg_inst.plotmeg{inst_id}.MEGinfo), 
0018   str = 'MEG data have not been loaded yet.';
0019 else
0020   MEGinfo = vbmeg_inst.plotmeg{inst_id}.MEGinfo;
0021   vb_struct2vars(MEGinfo,{'MEG_ID','SampleFreq','Nchannel','Nrepeat', ...
0022                       'device'});
0023   str = sprintf(['MEG ID = %s \n' ...
0024                  'Sampling Frequency = %d [Hz]\n' ...
0025                  'Number of sensors = %d \n' ...
0026                  'Number of trials = %d \n' ...
0027                  'Device = %s'], MEG_ID, SampleFreq, Nchannel, Nrepeat, ...
0028                 device);
0029 end
0030 
0031 h = msgbox(str,'MEG/EEG information');
0032 set(h,'Units','points');
0033 pos = get(h,'Position');
0034 pos(3:4) = [250 125];
0035 set(h,'Position',pos);
0036 h = get(h,'Children');
0037 set(h(2),'Units','normalized');
0038 pos = get(h(2),'Position');
0039 pos(1) = 0.4;
0040 pos(3) = 1-pos(1)*2;
0041 set(h(2),'Position',pos);
0042 hh = get(h(1),'Children');
0043 set(hh(1),'FontName','Helvetica');
0044 set(hh(1),'FontSize',13.5);