pa_brain_parm_gui_create

  This function creates gui for brain advanced parameter.
  [USAGE]
    fig = pa_brain_parm_gui_create(<parent_fig> [,brain_parm]);
  [IN]
    parent_fig : figure handle of brain parm gui.
    brain_parm : brain parameter.
  [OUT]
    fig : figure handle of brain advanced parameter gui.


 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function fig = pa_brain_parm_gui_create(parent_fig, brain_parm)
0002 %  This function creates gui for brain advanced parameter.
0003 %  [USAGE]
0004 %    fig = pa_brain_parm_gui_create(<parent_fig> [,brain_parm]);
0005 %  [IN]
0006 %    parent_fig : figure handle of brain parm gui.
0007 %    brain_parm : brain parameter.
0008 %  [OUT]
0009 %    fig : figure handle of brain advanced parameter gui.
0010 %
0011 %
0012 % Copyright (C) 2011, ATR All Rights Reserved.
0013 % License : New BSD License(see VBMEG_LICENSE.txt)
0014 
0015 %
0016 % --- Previous check
0017 %
0018 if ~exist('parent_fig', 'var')
0019     error('parent_fig is a required parameter.');
0020 end
0021 if ~exist('brain_parm', 'var')
0022     brain_parm = vb_set_brain_parm;
0023 end
0024 
0025 %
0026 % --- Main Procedure
0027 %
0028 
0029 fig = openfig('pa_brain_advanced.fig');
0030 
0031 % save data
0032 data = struct;
0033 data.H = struct;
0034 data.H = guihandles(fig);
0035 data.H.figure = fig;
0036 data.parent_fig = parent_fig;
0037 
0038 H = data.H;
0039 
0040 % save data
0041 guidata(fig, data);
0042 
0043 % Rmax¤ò»ØÄꤹ¤ëslider¤òºîÀ®¤¹¤ë¡£
0044 val     = 1000 * brain_parm.R_max;    % [m] -> [mm]
0045 min_val = 0.0;  max_val = 100.0;
0046 slider_step(1) = 1 / (max_val - min_val); % move amount(%) arrow is clicked
0047 slider_step(2) = 10/ (max_val - min_val); % move amount(%) slider is clicked
0048 set(H.rmax_slider,... 
0049     'sliderstep', slider_step,...
0050     'Min',min_val, 'Max',max_val, 'Value', val);
0051 
0052 % Rmax¤ò»ØÄꤹ¤ëedit¤òºîÀ®¤¹¤ë¡£
0053 set(H.rmax_edit, 'String', num2str(val));
0054 
0055 if isfield(brain_parm, 'Nvertex')
0056     set(H.nvertex_edit, 'String', num2str(brain_parm.Nvertex));
0057 end
0058 
0059 % Reduce ratio¤ò»ØÄꤹ¤ëslider¤òºîÀ®¤¹¤ë¡£
0060 val     = brain_parm.reduce_ratio;
0061 min_val = 0.0;  max_val = 1;
0062 slider_step(1) = 0.1 / (max_val - min_val); % move amount(%) arrow is clicked
0063 slider_step(2) = 1.0 / (max_val - min_val); % move amount(%) slider is clicked
0064 set(H.reduce_ratio_slider, ...
0065     'sliderstep' , slider_step, ...
0066     'Min',min_val, 'Max', max_val, 'Value', val);
0067 
0068 % Reduce ratio¤ò»ØÄꤹ¤ëedit¤òºîÀ®¤¹¤ë¡£
0069 set(H.reduce_ratio_edit, 'String', num2str(val));
0070 
0071 % N_step¤ò»ØÄꤹ¤ëslider¤òºîÀ®¤¹¤ë¡£
0072 val     = brain_parm.N_step;
0073 min_val = 1;    max_val = 100.0;
0074 slider_step(1) = 1 / (max_val - min_val); % move amount(%) arrow is clicked
0075 slider_step(2) = 10/ (max_val - min_val); % move amount(%) slider is clicked
0076 set(H.nstep_slider, ...
0077     'sliderstep', slider_step,...
0078     'Min',min_val, 'Max',max_val, 'Value', val);
0079 
0080 % N_step¤ò»ØÄꤹ¤ëedit¤òºîÀ®¤¹¤ë¡£
0081 set(H.nstep_edit, 'String', num2str(val));
0082 
0083 % display¤ò»ØÄꤹ¤ëslider¤òºîÀ®¤¹¤ë¡£
0084 val = brain_parm.display;
0085 min_val = 1;    max_val = 1000;
0086 slider_step(1) = 1 / (max_val - min_val); % move amount(%) arrow is clicked
0087 slider_step(2) = 10/ (max_val - min_val); % move amount(%) slider is clicked
0088 set(H.display_slider, ...
0089     'sliderstep', slider_step,...
0090     'Min',min_val, 'Max',max_val, 'Value', val);
0091 
0092 % display¤ò»ØÄꤹ¤ëedit¤òºîÀ®¤¹¤ë¡£
0093 set(H.display_edit, 'String', num2str(val));
0094 
0095 % save data
0096 data.H = H;
0097 data.H.figure = fig;
0098 guidata(fig, data);
0099