save_for.m

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

% save_for.m
% created by D. G. Childers August, 1998


cwd=pwd;
[fname pathname]=uiputfile('*form.for','Save data to a file');
S=sprintf('Saving data into %s%s',pathname,fname);
disp(S);
S=sprintf('save %s%s formtrk_4 -ascii',pathname,fname);
eval(S);
S=sprintf('cd %s',cwd);
eval(S);