% A quick program to demo some signal processing using speech sounds
% 8/22/97 - rms

%Record
%pause
%'Speak now:'
%x = recordsound(2,11025);
%pause

% Make sure that x is 22050 samples long

l = length(x)
	if l<22050
	  x = [x zeros(1,(22050-l))];
	elseif l> 22050
	  x = x(1,1:22050);
	  end
	  

%Playback
sound(x,11025);
pause

% sptool


%Display on spectrogram
specgram(x,256,11025);


