pb_vPrimeGUI.m 9.09 KB
Newer Older
Jesse Heckman's avatar
Jesse Heckman committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
function varargout = pb_vPrimeGUI(varargin)
   % PB_VPRIMEGUI MATLAB code for pb_vPrimeGUI.fig
   %      PB_VPRIMEGUI, by itself, creates a new PB_VPRIMEGUI or raises the existing
   %      singleton*.
   %
   %      H = PB_VPRIMEGUI returns the handle to a new PB_VPRIMEGUI or the handle to
   %      the existing singleton*.
   %
   %      PB_VPRIMEGUI('CALLBACK',hObject,eventData,handles,...) calls the local
   %      function named CALLBACK in PB_VPRIMEGUI.M with the given input arguments.
   %
   %      PB_VPRIMEGUI('Property','Value',...) creates a new PB_VPRIMEGUI or raises the
   %      existing singleton*.  Starting from the left, property value pairs are
   %      applied to the GUI before pb_vPrimeGUI_OpeningFcn gets called.  An
   %      unrecognized property name or invalid value makes property application
   %      stop.  All inputs are passed to pb_vPrimeGUI_OpeningFcn via varargin.
   %
   %      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
   %      instance to run (singleton)".
   %
   % See also: GUIDE, GUIDATA, GUIHANDLES

   % Edit the above text to modify the response to help pb_vPrimeGUI

   % Last Modified by GUIDE v2.5 10-Sep-2018 11:28:27

   % Begin initialization code - DO NOT EDIT
   gui_Singleton = 1;
   gui_State = struct('gui_Name',       mfilename, ...
                      'gui_Singleton',  gui_Singleton, ...
                      'gui_OpeningFcn', @pb_vPrimeGUI_OpeningFcn, ...
                      'gui_OutputFcn',  @pb_vPrimeGUI_OutputFcn, ...
                      'gui_LayoutFcn',  [] , ...
                      'gui_Callback',   []);
   if nargin && ischar(varargin{1})
       gui_State.gui_Callback = str2func(varargin{1});
   end

   if nargout
       [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
   else
       gui_mainfcn(gui_State, varargin{:});
   end
   % End initialization code - DO NOT EDIT
end


% --- Executes just before pb_vPrimeGUI is made visible.
function pb_vPrimeGUI_OpeningFcn(hObject, eventdata, handles, varargin)
   % This function has no output args, see OutputFcn.
   % hObject    handle to figure
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)
   % varargin   command line arguments to pb_vPrimeGUI (see VARARGIN)

   % Choose default command line output for pb_vPrimeGUI
   handles.output = hObject;

   % Update handles structure
   guidata(hObject, handles);
   set(handles.editLoad,'string',cd);
Jesse Heckman's avatar
Jesse Heckman committed
62
63
   
   if isunix; cd('/Users/jjheckman/Documents/Data'); end
Jesse Heckman's avatar
Jesse Heckman committed
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147

   % UIWAIT makes pb_vPrimeGUI wait for user response (see UIRESUME)
   % uiwait(handles.figure1);
end


% --- Outputs from this function are returned to the command line.
function varargout = pb_vPrimeGUI_OutputFcn(hObject, eventdata, handles) 
   % varargout  cell array for returning output args (see VARARGOUT);
   % hObject    handle to figure
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)

   % Get default command line output from handles structure
   varargout{1} = handles.output;
end


% --- Executes on selection change in popExperimenter.
function popExperimenter_Callback(hObject, eventdata, handles)
   % hObject    handle to popExperimenter (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)

   % Hints: contents = cellstr(get(hObject,'String')) returns popExperimenter contents as cell array
   %        contents{get(hObject,'Value')} returns selected item from popExperimenter
end

% --- Executes during object creation, after setting all properties.
function popExperimenter_CreateFcn(hObject, eventdata, handles)
   % hObject    handle to popExperimenter (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    empty - handles not created until after all CreateFcns called

   % Hint: popupmenu controls usually have a white background on Windows.
   %       See ISPC and COMPUTER.
   if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
       set(hObject,'BackgroundColor','white');
   end
end


function editLoad_Callback(hObject, eventdata, handles)
   % hObject    handle to editLoad (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)

   % Hints: get(hObject,'String') returns contents of editLoad as text
   %        str2double(get(hObject,'String')) returns contents of editLoad as a double
end

% --- Executes during object creation, after setting all properties.
function editLoad_CreateFcn(hObject, eventdata, handles)
   % hObject    handle to editLoad (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    empty - handles not created until after all CreateFcns called

   % Hint: edit controls usually have a white background on Windows.
   %       See ISPC and COMPUTER.
   if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
       set(hObject,'BackgroundColor','white');
   end
end

% --- Executes on button press in buttonRun.
function buttonRun_Callback(hObject, eventdata, handles)
   % hObject    handle to buttonRun (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)
   expf = get(handles.editLoad,'string');
   [ext,~] = pb_fext(expf);
   if isempty(ext)
      msgbox({'Non-valid file selected.';'Please select an expfile before starting an experiment.'});
   else
      clc;
      fprintf(['<strong>Experiment has started.</strong>\n\n']);
      
      % select experimental parameters
      contents          = get(handles.popExperimenter,'string');
      Exp.experimenter  = contents{get(handles.popExperimenter,'Value')};
      Exp.SID           = get(handles.editPart,'string');
      Exp.expfile       = get(handles.editLoad,'string');
      Exp.recording     = get(handles.editRec,'string');

Jesse Heckman's avatar
Jesse Heckman committed
148
      disp(['Experimenter: ' Exp.experimenter newline 'Expfile: ' Exp.expfile newline 'Subject ID: ' Exp.SID newline 'Recording: ' Exp.recording newline]);
Jesse Heckman's avatar
Jesse Heckman committed
149
150

      pb_vRunExp(Exp,handles);
Jesse Heckman's avatar
Jesse Heckman committed
151
152
153
154
155
156
157
158
   end
end

% --- Executes on button press in buttonClose.
function buttonClose_Callback(hObject, eventdata, handles)
   % hObject    handle to buttonClose (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)
Jesse Heckman's avatar
Jesse Heckman committed
159
160

   close(handles.figure1);
Jesse Heckman's avatar
Jesse Heckman committed
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
end

% --- Executes on button press in buttonLoad.
function buttonLoad_Callback(hObject, eventdata, handles)
   % hObject    handle to buttonLoad (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)
   
   editTxt = get(handles.editLoad,'string');
   [ext, ~] = pb_fext(editTxt);
   if isempty(ext); cdir = editTxt; else; fol = dir(editTxt); cdir = fol.folder; end
   
   [fn, path] = pb_getfile('dir',cdir,'ext','*.exp','title','Load exp-file..' );
   if fn ~= 0
      expfile = [path fn];
      set(handles.editLoad,'string',expfile);
   end
end


function editPart_Callback(hObject, eventdata, handles)
   % hObject    handle to editPart (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)

   % Hints: get(hObject,'String') returns contents of editPart as text
   %        str2double(get(hObject,'String')) returns contents of editPart as a double

   % --- Executes during object creation, after setting all properties.
end

function editPart_CreateFcn(hObject, eventdata, handles)
   % hObject    handle to editPart (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    empty - handles not created until after all CreateFcns called

   % Hint: edit controls usually have a white background on Windows.
   %       See ISPC and COMPUTER.
   if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
       set(hObject,'BackgroundColor','white');
   end
end

function editRec_Callback(hObject, eventdata, handles)
   % hObject    handle to editRec (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    structure with handles and user data (see GUIDATA)

   % Hints: get(hObject,'String') returns contents of editRec as text
   %        str2double(get(hObject,'String')) returns contents of editRec as a double

end

% --- Executes during object creation, after setting all properties.
function editRec_CreateFcn(hObject, eventdata, handles)
   % hObject    handle to editRec (see GCBO)
   % eventdata  reserved - to be defined in a future version of MATLAB
   % handles    empty - handles not created until after all CreateFcns called

   % Hint: edit controls usually have a white background on Windows.
   %       See ISPC and COMPUTER.
   if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
       set(hObject,'BackgroundColor','white');
   end
end