e_ins.m

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

%
% Callback function for "Insert file" 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(1);
x=round(x);

cwd=pwd;
[fname pathname]=uigetfile('*.dat','load segment from file');

S=sprintf('cd %s',cwd);
eval(S);

S=sprintf('Insert %s%s into the point',pathname,fname);
disp(S);
S=sprintf('load %s%s',pathname,fname);
eval(S);

S=sprintf('Loading data into %s%s',pathname,fname);
disp(S);
S=sprintf('load %s%s',pathname,fname);
eval(S);
name=basename(fname);

seg1=SPEECH(1:x);
seg2=eval(name);
seg3=SPEECH(x:LEN);

D1=size(seg1);
D2=size(seg2);

if (D1(1) == 1 & D2(2) == 1) | (D2(1) == 1 & D1(2) == 1)
	seg2=seg2';
end

SPEECH=[seg1;seg2;seg3];
LEN=length(SPEECH);
LEFT = 1;
RIGHT = LEN;
plot(SPEECH);
SPEECH_OLD=SPEECH;