0001 function data = vb_trial_extractor_set_continuous_file(data, file)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017 if ~exist('data', 'var')
0018 error('data is required parameter.');
0019 end
0020
0021
0022
0023
0024 H = data.H;
0025 try
0026 if ~exist('file', 'var') || exist(file, 'file') ~= 2
0027 error('Invalid MEG/EEG-MAT file was specified.');
0028 end
0029 if strcmp(getappdata(H.continuous_file_edit, 'file'), file)
0030 return;
0031 end
0032
0033 continuous_file = vb_continuous_file_new(file);
0034 data = vb_trial_extractor_init(data.figure);
0035 data.continuous_file = continuous_file;
0036
0037
0038 data.trial_list = [];
0039 data = vb_trial_extractor_update_screen(data);
0040
0041 set(H.continuous_file_edit, 'String', file);
0042
0043
0044 MEGinfo = vb_continuous_file_get_meg_info(data.continuous_file);
0045 measurement = vb_info_get_measurement(MEGinfo);
0046
0047 data.org_data_ch_list = ...
0048 vb_continuous_file_get_ch_list(data.continuous_file, measurement);
0049
0050
0051 Ndata_ch = size(data.org_data_ch_list, 1);
0052 if Ndata_ch > 100
0053 step = ceil(Ndata_ch / 50);
0054
0055 data.view_data_ch_list = data.org_data_ch_list(1:step:Ndata_ch);
0056 else
0057 data.view_data_ch_list = data.org_data_ch_list;
0058 end
0059
0060
0061 [ex_ch_list] = vb_continuous_file_get_ch_list(data.continuous_file, 'EXTRA');
0062 Next_ch = size(ex_ch_list, 1);
0063 data.multi_channel_pattern = cell(Next_ch, 2);
0064 for k=1:Next_ch
0065 data.multi_channel_pattern{k, 1} = ex_ch_list{k};
0066 data.multi_channel_pattern{k, 2} = 0;
0067 end
0068
0069
0070 freq = vb_continuous_file_get_sample_freq(continuous_file);
0071 data.output_sample_freq = freq;
0072
0073
0074 setappdata(H.continuous_file_edit, 'file', file);
0075
0076 catch
0077 set(H.continuous_file_edit, 'String', getappdata(H.continuous_file_edit, 'file'));
0078 [msg, msg_f] = vb_get_error_msg(lasterror);
0079 errordlg(msg_f, 'Continuous MEG/EEG File.');
0080 end
0081
0082
0083
0084
0085 if nargout ~= 1
0086 error('function caller should receive vb_trial_extractor object.');
0087 end