e_cut.m

这是一个用于语音信号处理的工具箱

%
% Callback function for "Delete segment" button in main_edit window
% Author : Minkyu Lee
% Date : 2-FEB-1995
% 
% Modified by Karthik  on 05/25/97
% Modified by D. G. Childers



PV=[269 236 519 300];
s2 = 'Input Signal';


% Open analysis window
while exist('ana_wav_win_h')==1
   try1 = 'get(ana_wav_win_h,''position'');';
   eval(try1,catch2);
   if check ==0
      clear ana_wav_win_h;
      check = 1;
      break;
   end
   s1 = get(ana_wav_win_h,'Name');
   if ~strcmp(s1,s2)
      clear ana_wav_win_h;
      break;
   end
   figure(ana_wav_win_h);
   break;
end;

if exist('ana_wav_win_h')~=1;
   ana_wav_win_h=figure('Position',PV,...
      'Resize','off',...
      'Numbertitle','off',...
      'Name',s2);
end;
if exist('left_line_h') == 1
   clear left_line_h  right_line_h
end


[x,y,button]=ginput(2);
x = round(x);
y = round(y);
v=(x(1):x(2));

if x(1) > x(2)
	tmp=x(1);
	x(1)=x(2);
	x(2)=tmp;
end

seg1=SPEECH(1:x(1));
seg2=SPEECH(x(2):LEN);
SPEECH=[seg1; seg2];
LEN=length(SPEECH);
LEFT = 1;
RIGHT = LEN;
figure(ana_wav_win_h);
plot(SPEECH);
SPEECH_OLD=SPEECH;