wg_save.m

来自「这是一个用于语音信号处理的工具箱」· M 代码 · 共 21 行

%
% Callback function for Save button of main_file window
% Author : Minkyu Lee
% Date : 29-Sep-1994
% Modified by Karthik on May 26 1997

cwd=pwd;
[fname pathname]=uiputfile('*.dat','Save file (ASCII)');
S=sprintf('cd %s',cwd);
eval(S);

if fname ~= 0
   S=sprintf('Saving data into %s (ASCII format)',fname);
   disp(S);
   S=sprintf('save %s%s SPEECH -ascii',pathname,fname);
   eval(S);
else
   fname=o_fname;
   pathname=o_pname;
end