Code covered by the BSD License  

Highlights from
colea

from colea by Philip Loizou
This program can be used to edit speech waveforms

getkb
function getkb

%global fno

chra=get(gcf,'CurrentCharacter');

%abs(c)

if strcmp(chra,'q') % == 'q' | c == 'Q'

 delete(gcf);
 close all;
 clear all;
 %quitall;
 return;
end

Contact us at files@mathworks.com