cleanup1.m

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

disp(' ');
disp('SCRIPT: cleanup1.m **************************************************');
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%	cleanup1.m
% 
%	jmw
%	3/25/94
%
%	removes files that contain the results from the segmentation and
%	labeling programs.
%
%	It also recombines the *_Labels and the *_NewSegdata files into
%	one big file: *_SegNLabels
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% load *_NewSegdata and rename variables for further use and storage

file_string = sprintf('temp/%s_NewSegdata', name);
s=sprintf('loading ./%s from hard disk ...',file_string);
disp(s);
s=sprintf('load %s', file_string);
eval(s);

% rename variables
seg_cnt = new_seg_cnt;
seg_frame = new_seg_frame;
seg_range = new_seg_range;
seg_type = new_seg_type;

% load *_Labels 

file_string = sprintf('temp/%s_Labels', name);
s=sprintf('loading ./%s from hard disk ...',file_string);
disp(s);
s=sprintf('load %s', file_string);
eval(s);
pause(1);		% allow time to load

% save results in one big file: *_SegNLabels

file_string = sprintf('%s_SegNLabels', name);
s=sprintf('saving ./%s to hard disk ...',file_string);
disp(s);
s1=sprintf('save temp/%s seg_cnt seg_frame seg_range seg_type choice_1 choice_2 reliability_1 reliability_2 ', file_string);
eval(s1);

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if (0) 	% switch to 0 if you want to save files for further research ...

file_string = sprintf('%s_BARscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s.mat', file_string);
eval(s);

file_string = sprintf('%s_BBNdata.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_Ftrk.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_SMVscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_SONscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_UFRscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_USTscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_VCscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_VFRscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_VWLscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_NASscore.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_Segdata.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_BNDdata.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_NewSegdata.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

file_string = sprintf('%s_Labels.mat', name);
s=sprintf('removing ./%s from hard disk ...',file_string);
disp(s)
s=sprintf('!del ./%s', file_string);
eval(s);

end;  % end if(0)

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% clean up time

clear choice_1            new_seg_range       s2                  
clear choice_2            new_seg_type        seg_cnt             
clear file_string         reliability_1       seg_frame           
clear reliability_2       seg_range           
clear new_seg_cnt         s                   seg_type            
clear new_seg_frame       s1