function []=multistat_gui(Volume)

col1 = [0.2 0.6 0.9];
col2 = col1*0.9;
col3 = [1 1 1];
col4 = col2*1;
col5 = col1*.8;

Volume.Multi.Status 	= 'Incorrect or incomplete MultiStat Definition';
Volume.Multi.Input 	= [];
Volume.Multi.InputSD = [];
Volume.Multi.Dfs		= [];
Volume.Multi.X.X 		= 1;
Volume.Multi.Contrast.Contrast = 1;

h0 = figure('Units','normalized', ...
   'Color',col1, ...
	'Name','MultiStat', ...
	'NumberTitle','off', ...
   'Resize','off', ...
	'Position',[0.2 0.3 0.5 0.6], ...
	'Tag','MultiStat');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', ['multistat_gui_cb;Volume=get(gcf,''UserData'');if Volume.Multi.Status(1:2) == ''OK'' delete(gcf);Volume.Multi.Batch=0;multistat_prog(Volume); else errordlg(Volume.Multi.Status,''Error'');end;'], ...   
   'ListboxTop',0, ...
	'Position',[0.87 0.04 0.10 0.04], ...
	'String','Accept', ...
	'Style','pushbutton', ...
	'Tag','Push1');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', ['multistat_gui_cb;Volume=get(gcf,''UserData'');if Volume.Multi.Status(1:2) == ''OK'' delete(gcf);Volume.Multi.Batch=1;multistat_prog(Volume); else errordlg(Volume.Multi.Status,''Error'');end;'], ...   
   'ListboxTop',0, ...
	'Position',[0.87 0.10 0.10 0.04], ...
	'String','Batch', ...
	'Style','pushbutton', ...
	'Tag','Push1');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'Volume=get(gcf,''UserData'');delete(gcf);set(Volume.fig,''Visible'',''on'');return;', ...
   'ListboxTop',0, ...
	'Position',[0.87 0.16 0.10 0.04], ...
	'String','Back', ...
	'Style','pushbutton', ...
   'Tag','Push1');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'CallBack', 'multistat_gui_cb;', ...
	'ListboxTop',0, ...
	'Position',[0.07 0.85 0.83 0.05], ...
	'String','Definition File', ...
   'Tag','DefineFile', ...
   'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'CallBack', 'multistat_gui_cb;', ...
	'ListboxTop',0, ...
	'Position',[0.07 0.79 0.83 0.05], ...
	'String','Image Definition File', ...
   'Tag','ImageDefineFile', ...
   'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.3 0.93 0.35 0.06], ...
	'String','MultiStat', ...
	'Style','text', ...
	'Tag','StaticText3');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'multistat_gui_cb;', ...
   'ListboxTop',0, ...
	'Position',[0.07 0.72 0.15 0.03], ...
	'String','Input File Names', ...
	'Style','pushbutton', ...
	'Tag','InputFile', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.25 0.72 0.65 0.03], ...
	'Style','text', ...
	'String', '', ...
	'Tag','InputFileName');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'multistat_gui_cb;', ...
   'ListboxTop',0, ...
	'Position',[0.07 0.65 0.15 0.03], ...
	'String','Input SD Names', ...
	'Style','pushbutton', ...
	'Tag','InputSDFile', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.25 0.65 0.65 0.03], ...
	'Style','text', ...
	'String', '', ...
	'Tag','InputSDFileName');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'multistat_gui_cb;', ...
   'ListboxTop',0, ...
	'Position',[0.07 0.58 0.15 0.03], ...
	'String','Input File Dfs', ...
	'Style','pushbutton', ...
   'Tag','InputFileDfs', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
   'Position',[0.25 0.58 0.39 0.03], ...
	'Style','text', ...
	'String', '', ...
	'Tag','InputFileDfsList');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'multistat_gui_cb;', ...
   'ListboxTop',0, ...
	'Position',[0.65 0.58 0.15 0.03], ...
	'String','Input File FWHM', ...
	'Style','text', ...
	'Tag','StaticText1');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col3, ...
	'ListboxTop',0, ...
	'Position',[0.82 0.58 0.10 0.03], ...
	'Style','edit', ...
	'String', '6', ...
   'Tag','InputFWHM');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'multistat_gui_cb;', ...
   'ListboxTop',0, ...
	'Position',[0.07 0.51 0.15 0.03], ...
	'String','X Matrix', ...
	'Style','pushbutton', ...
	'Tag','X', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.25 0.51 0.65 0.03], ...
	'Style','text', ...
	'String', '1', ...
   'Tag','XMatrix');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col5, ...
	'CallBack', 'multistat_gui_cb;', ...
   'ListboxTop',0, ...
	'Position',[0.07 0.44 0.15 0.03], ...
	'String','Contrast', ...
	'Style','pushbutton', ...
	'Tag','Contrast', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.25 0.44 0.65 0.03], ...
	'Style','text', ...
	'String', '1', ...
   'Tag','ContrastList');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.07 0.37 0.15 0.03], ...
	'String','Output File Base', ...
	'Style','text', ...
	'Tag','StaticText1', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col3, ...
	'ListboxTop',0, ...
	'Position',[0.25 0.37 0.65 0.03], ...
	'Style','edit', ...
	'String', '', ...
   'Tag','OutputFileBase');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'CallBack', 'fmridesign_gui_cb;', ...
	'ListboxTop',0, ...
	'Position',[0.45 0.30 0.10 0.05], ...
	'String','Which Statistics', ...
	'Style','text', ...
	'Tag','StaticText1', ...
   'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.15 0.25 0.12 0.03], ...
	'String','T-Stat', ...
	'Style','checkbox', ...
	'Tag','Tstat', ...
	'Value',1);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.35 0.25 0.12 0.03], ...
	'String','Effect', ...
	'Style','checkbox', ...
	'Tag','Effect', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.55 0.25 0.12 0.03], ...
	'String','SDEffect', ...
	'Style','checkbox', ...
	'Tag','SdEffect', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.75 0.25 0.12 0.03], ...
   'String','SD Ratio', ...
	'Style','checkbox', ...
	'Tag','SdRatio', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.30 0.18 0.16 0.05], ...
	'String','FWHM Variance Ratio', ...
	'Style','text', ...
	'Tag','StaticText1', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col3, ...
	'ListboxTop',0, ...
	'Position',[0.32 0.13 0.10 0.03], ...
	'Style','edit', ...
	'String', '15', ...
   'Tag','FWHMvaratio');

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col4, ...
	'ListboxTop',0, ...
	'Position',[0.55 0.18 0.10 0.05], ...
	'String','No Iter of REML', ...
	'Style','text', ...
	'Tag','StaticText1', ...
	'Value',0);

h1 = uicontrol('Parent',h0, ...
	'Units','normalized', ...
	'BackgroundColor',col3, ...
	'ListboxTop',0, ...
	'Position',[0.55 0.13 0.10 0.03], ...
	'Style','edit', ...
	'String', '10', ...
   'Tag','Niter');

h1 = uimenu(gcf,'Label','Related Papers');

uimenu(h1,'Label','Worsley et al. (2000)','CallBack','web(''http://www.math.mcgill.ca/keith/HBM2000/HBM2000.html'',''-browser'');');
uimenu(h1,'Label','Worsley et al. (2001)','CallBack','web(''http://www.math.mcgill.ca/keith/fmristat_paper/fmristat.pdf'',''-browser'');');

h1 = uimenu(gcf,'Label','Related WebPages');
uimenu(h1,'Label','fMRIstat Web','CallBack','web(''http://www.math.mcgill.ca/keith/fmristat/'',''-browser'');');


set(gcf,'UserData',Volume);

multistat_gui_cb;