secfile.m

来自「用于非线性时间序列分析的软件包。可用于计算：时间延迟重构」· M 代码 · 共 37 行

function filename = secfile(filelist)

% tstool/secfile
% filename = secfile(filelist)
%
% this GUI is always called when a second
% filename is needed to execute a callback for tstool
% the name of the selected file is returned

load secfile                           

filename = '';

a = figure('Color',[0.8 0.8 0.8], ...
	'Colormap',mat0, ...
	'Position',[697 443 483 185], ...
	'Resize', 'off', ...
	'MenuBar','none', ...
	'NumberTitle','off', ...
	'Name','Select signal file', ...
	'Tag','SecondaryFileSelectBox');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[0 0 386.4 148], ...
	'String', filelist, ...
	'Style','listbox', ...
	'Tag','Listbox1', ...
	'Callback','filelist = get(gcbo, ''String''); set(gcbo, ''UserData'', filelist{get(gcbo, ''Value'')}); uiresume', ...
	'Value',1);


uiwait
filename = get(b, 'UserData');
close(gcf)