VisNavGUI.m

function VisNavGUI(savedParamsFile)
% GUI to analyze electrophys and behavioural data. VisNavGUI can be called with or
% without a path to a previously saved preference file. The preference file
% should contain a structure with parmeters related to loading and
% analyzing the data. See CreateParamsStructure for details on the field of
% this parameter structure.
% To make easier the transfer of data from callback to callbacks VisNavGUI
% uses handle objects called Tstructure which is nothing but a handle
% with properties that can be added dynamically using the addprop method.
% Therefore, Tstructure behaves pretty much like a structure except that
% there is a pointer to it.

if nargin < 1
    savedParamsFile = [];
end

%***************** Create and fill the parameter structure P ************************%

P = Tstructure('Params');
P = CreateParamsStructure(P, savedParamsFile);

%*********************** Create the data structure EXP ******************************%

EXP = Tstructure('Data');
EXP = CreateEXPStructure(EXP);

%************************* Create the main GUI window *******************************%
%3 pages created right away
%Later change this so that the number of cereated page depends on the
%type of data that are loaded

GUI = TMultigraph('VisNav');
GUI.addPage;
GUI.addPage;

%********************** Rename pages and create dialogs ****************************%
%3 dialogs created right away
%Later change this so that the dialogs are created depending on the type of
%data that are loaded

GUI.RenamePage(P.PlotParamsMaps.Page,P.PlotParamsMaps.PageTitle);
GUI.Hdividepage(P.PlotParamsMaps.Page, 2, [1 9]);
SpatialMapsDialog = Tdialog(GUI.window{P.PlotParamsMaps.Page,P.PlotParamsMaps.DialogWindow});

GUI.RenamePage(P.PlotParamsDecoder.Page,P.PlotParamsDecoder.PageTitle);
GUI.Hdividepage(P.PlotParamsDecoder.Page, 2, [1 9]);
DecodingDialog = Tdialog(GUI.window{P.PlotParamsDecoder.Page,P.PlotParamsDecoder.DialogWindow});

GUI.RenamePage(P.PlotParamsBehavior.Page,P.PlotParamsBehavior.PageTitle);
GUI.Hdividepage(P.PlotParamsBehavior.Page, 2, [1 9]);
BehaviorDialog = Tdialog(GUI.window{P.PlotParamsBehavior.Page,P.PlotParamsBehavior.DialogWindow});


%***************** UIcontrols of the top menus of the main figure ************************%

uimenu('Parent',GUI.FileMenu,'Label','load VR session',...
       'Callback', @(source,event)GUI_LoadVRMenu_Callback(source, event, GUI, EXP, P, SpatialMapsDialog, DecodingDialog, BehaviorDialog));
uimenu('Parent',GUI.FileMenu,'Label','save file',...
       'Callback',@(source,event)GUI_SaveMenu_Callback(source,event,EXP, P));
uimenu('Parent',GUI.FileMenu,'Label','load processed file',...
       'Callback',@(source,event)GUI_LoadProcessedMenu_Callback(source, event, GUI, EXP, P, SpatialMapsDialog, DecodingDialog, BehaviorDialog));

uimenu('Parent',GUI.AnalysisMenu,'Label','Analysis Options','Callback',@(source,event)GUI_AnalysisOptions_Callback(source,event,P));
uimenu('Parent',GUI.AnalysisMenu,'Label','Compute 1D maps','Callback',@(source,event)GUI_Compute1Dmaps_Callback(source,event,P));
uimenu('Parent',GUI.AnalysisMenu,'Label','Compute 2D maps','Callback',@(source,event)GUI_Compute2Dmaps_Callback(source,event,P));
uimenu('Parent',GUI.AnalysisMenu,'Label','Run Bayesian decoder','Callback',@(source,event)GUI_BayesDecoder_Callback(source,event,P));

uimenu('Parent',GUI.PlotMenu,'Label','Save Figure','Callback',@(source,event)GUI_SaveFigure_Callback(source,event));
uimenu('Parent',GUI.PlotMenu,'Label','Save Plot','Callback',@(source,event)GUI_SavePlot_Callback(source,event));
uimenu('Parent',GUI.PlotMenu,'Label','Add colorbar','Callback',@(source,event)GUI_Colorbar_Callback(source,event));
end


%************************* Callback functions of the top menus ***************************** %

function GUI_LoadVRMenu_Callback(source, event, GUI, EXP, P, SpatialMapsDialog, DecodingDialog, BehaviorDialog)
%
%S = FAFF(arg);
% LoadandRun(EXP, animalname, iseries, iexplist, processedfiles);
% if ~Fprocessed
% end

S.animalname = 'M151104A_JF';
S.series = 126;
S.explist = 101:105;
for iexp = 1:5
    S.Nav_path{iexp,1} = ['C:\Users\justj\Documents\DATA\M151104\behavior\126\10' num2str(iexp) filesep 'VRdata_M151104A_JF_126_session_10' num2str(iexp) '_trial001.mat'];
    S.Nav_path{iexp,2} = ['C:\Users\justj\Documents\DATA\M151104\behavior\126\10' num2str(iexp) filesep 'Synch_VR_M151104A_JF_126_session_10' num2str(iexp) '_trial001.mat'];
    
    S.Spk_path{iexp,1} = ['C:\Users\justj\Documents\DATA\M151104\ephys\126\10' num2str(iexp) filesep 'Spkdata_M151104A_JF_126_10' num2str(iexp) '.mat'];
    S.Spk_path{iexp,2} = ['C:\Users\justj\Documents\DATA\M151104\ephys\126\10' num2str(iexp) filesep 'Synch_BR_M151104A_JF_126_10' num2str(iexp) '.mat'];
    
    S.Lfp_path{iexp,1} = [];
    S.Lfp_path{iexp,2} = [];
    
    S.Vis_path{iexp,1} = [];
    S.Vis_path{iexp,2} = [];
    
    S.Eye_path{iexp,1} = [];
    S.Eye_path{iexp,2} = [];
end

LoadData_VisNav(EXP, P, S);
figstr = [num2str(P.LoadParams.LoadParams.animal) ' ' num2str(P.LoadParams.LoadParams.iseries)];
GUI.updateTitle(figstr);
InstallSpatialMapsDialog(GUI, EXP, P, SpatialMapsDialog);
InstallDecodingDialog(GUI, EXP, P, DecodingDialog);
InstallBehaviorDialog(GUI, EXP, P, BehaviorDialog);
end

function GUI_SaveMenu_Callback(source,event,EXP,P)
end

function GUI_LoadProcessedMenu_Callback(source, event, GUI, EXP, P, SpatialMapsDialog, DecodingDialog, BehaviorDialog)
dirname = '';
[filename, dirname] = uigetfile(dirname);

S = load([dirname filename]);
exp = TVRData;
exp.Copyobj(S.EXP);
CreateDataStructure(exp, EXP);

figstr = [num2str(EXP.animal) ' ' num2str(EXP.series)];
GUI.updateTitle(figstr);
InstallSpatialMapsDialog(GUI, EXP, P, SpatialMapsDialog);
% InstallDecodingDialog(GUI, EXP, P, DecodingDialog);
% InstallBehaviorDialog(GUI, EXP, P, BehaviorDialog);
end

function GUI_AnalysisOptions_Callback(source,event,P)
AnalysisOptionsDialog = Tdialog([],'Analysis Options',[0.3 0.1 0.4 0.8]);
end