Home > m > gui > ltpdv > callbacks > ltpdv_buildSpectralPanel.m

ltpdv_buildSpectralPanel

PURPOSE ^

SYNOPSIS ^

function ltpdv_buildSpectralPanel(panH, mainfig)

DESCRIPTION ^

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function ltpdv_buildSpectralPanel(panH, mainfig)
0002 
0003 
0004 Gproperties = getappdata(mainfig, 'Gproperties');
0005 
0006 % List of functions
0007 preFcns = {'psd';...
0008            'lpsd'; ...
0009            'tfe'; ...
0010            'ltfe'; ...
0011            'cohere'; ...
0012            'lcohere'; ...
0013            'cpsd'; ...
0014            'lcpsd'; ...
0015            'linedetect'; ...
0016            'rms'; ...
0017                       };
0018 
0019 % Margins
0020 pmarg = 0.025;
0021 
0022 % Text string
0023 ll = pmarg;
0024 lh = 0.05;
0025 lb = 1-pmarg-lh;
0026 lw = 0.3;
0027 sth = uicontrol(panH,'Style','text',...
0028    'String','Functions',...
0029    'Units', 'normalized', ...
0030    'BackgroundColor', Gproperties.Gcol, ...
0031    'Fontsize', 14, ...
0032    'Position',[ll lb lw lh]);
0033 
0034 % Params panel
0035 pl = pmarg + 0.3 + pmarg;
0036 pb = 0.1;
0037 pw = 1-pl-pmarg;
0038 ph = 1 - pb - pmarg;
0039 
0040 paramh = uipanel('Parent',panH,'Title','Parameters',...
0041    'Units', 'normalized', ...
0042    'BackgroundColor', 0.8*[0.99 0.92 0.82], ...
0043    'Fontsize', 14, ...
0044    'Tag', 'LTPDVspectralparampan', ...
0045    'Position',[pl pb pw ph]);
0046 
0047 % Function list
0048 ll = pmarg;
0049 lb = pmarg;
0050 lw = 0.3;
0051 lh = 1-2*pmarg - 0.05;
0052 lh = uicontrol(panH, 'Style', 'listbox', ...
0053    'String', preFcns,...
0054    'BackgroundColor', 'w', ...
0055    'Value',1, 'Units', 'normalized', ...
0056    'Fontsize', 14, ...
0057    'Tag', 'LTPDVspectralfcnlist', ...
0058    'Position',[ll lb lw lh], ...
0059    'Callback', {@ltpdv_spectral_fcnlist, paramh, mainfig});
0060 
0061 % Build params
0062 ltpdv_spectral_fcnlist(lh, paramh, mainfig);
0063 
0064 % Process button
0065 phght = 0.05;
0066 pbott = pmarg;
0067 pwidt = 0.2;
0068 pleft = 1-pmarg-pwidt;
0069 pbh = uicontrol(panH,'Style','pushbutton',...
0070    'String','Process',...
0071    'Callback', {@ltpdv_fcn_run, 'spectral', panH, mainfig}, ...
0072    'Units', 'normalized', ...
0073    'Position',[pleft pbott pwidt phght]);
0074 
0075 
0076

Generated on Mon 08-Sep-2008 13:18:47 by m2html © 2003