crossvar.m

function varargout = crossvar(varargin)
% CROSSVAR Application M-file for crossvar.fig
%    FIG = CROSSVAR launch crossvar GUI.
%    CROSSVAR('callback_name', ...) invoke the named callback.

% Last Modified by GUIDE v2.0 30-May-2002 12:51:30

global sv
global xv

if nargin == 0  % LAUNCH GUI

	fig = openfig(mfilename);

	% Generate a structure of handles to pass to callbacks, and store it. 
	handles = guihandles(fig);
    
    % Finds out whether crosscorg or spikes is calling it,
    if ~isempty(xv) 
        xcinuse=xv.inuse; 
    else
        xcinuse=[];
    end
    if ~isempty(xcinuse)
        set(handles.FirstMenu,'String',xv.vars);
        set(handles.HoldMenu,'String',num2cell(xv.heldvar(3).values)');
    else
        set(handles.FirstMenu,'String',sv.vars);
        set(handles.HoldMenu,'String',num2cell(sv.heldvar(3).values)');
    end
	set(handles.FirstMenu,'Value',3);
	
	guidata(fig, handles);

	% Wait for callbacks to run and window to be dismissed:
	uiwait(fig);

	if nargout > 0
		varargout{1} = fig;
	end

elseif ischar(varargin{1}) % INVOKE NAMED SUBFUNCTION OR CALLBACK

	try
		if (nargout)
			[varargout{1:nargout}] = feval(varargin{:}); % FEVAL switchyard
		else
			feval(varargin{:}); % FEVAL switchyard
		end
	catch
		disp(lasterr);
	end

end


%| ABOUT CALLBACKS:
%| GUIDE automatically appends subfunction prototypes to this file, and 
%| sets objects' callback properties to call them through the FEVAL 
%| switchyard above. This comment describes that mechanism.
%|
%| Each callback subfunction declaration has the following form:
%| <SUBFUNCTION_NAME>(H, EVENTDATA, HANDLES, VARARGIN)
%|
%| The subfunction name is composed using the object's Tag and the 
%| callback type separated by '_', e.g. 'slider2_Callback',
%| 'figure1_CloseRequestFcn', 'axis1_ButtondownFcn'.
%|
%| H is the callback object's handle (obtained using GCBO).
%|
%| EVENTDATA is empty, but reserved for future use.
%|
%| HANDLES is a structure containing handles of components in GUI using
%| tags as fieldnames, e.g. handles.figure1, handles.slider2. This
%| structure is created at GUI startup using GUIHANDLES and stored in
%| the figure's application data using GUIDATA. A copy of the structure
%| is passed to each callback.  You can store additional information in
%| this structure at GUI startup, and you can change the structure
%| during callbacks.  Call guidata(h, handles) after changing your
%| copy to replace the stored original so that subsequent callbacks see
%| the updates. Type "help guihandles" and "help guidata" for more
%| information.
%|
%| VARARGIN contains any extra arguments you have passed to the
%| callback. Specify the extra arguments by editing the callback
%| property in the inspector. By default, GUIDE sets the property to:
%| <MFILENAME>('<SUBFUNCTION_NAME>', gcbo, [], guidata(gcbo))
%| Add any extra arguments after the last argument, before the final
%| closing parenthesis.


% --------------------------------------------------------------------
function varargout = FirstMenu_Callback(h, eventdata, handles, varargin)

global sv                                                       
global xv

xcinuse=0;
if ~isempty(xv) xcinuse=xv.inuse; end
if (xcinuse)
    xv.HeldVariable=get(h,'Value');                                                 
    set(findobj('Tag','HoldMenu'),'String',num2cell(xv.heldvar(xv.HeldVariable).values)');
else
    sv.HeldVariable=get(h,'Value');                                                 
    set(findobj('Tag','HoldMenu'),'String',num2cell(sv.heldvar(sv.HeldVariable).values)');
end

% --------------------------------------------------------------------
function varargout = HoldMenu_Callback(h, eventdata, handles, varargin)

global sv      
global xv

xcinuse=0;
if ~isempty(xv) xcinuse=xv.inuse; end
if (xcinuse)
    xv.HeldValue=get(h,'Value');
else
    sv.HeldValue=get(h,'Value');
end
% --------------------------------------------------------------------
function varargout = Pushbutton1_Callback(h, eventdata, handles, varargin)
   
close(gcf);