loadsp3.m

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

%  load speech file and complete figure

cwd=pwd;

global BACK_COLOR TEXT_COLOR LINE_COLOR;	

   BACK_COLOR=[1 1 1]; %white
	TEXT_COLOR=[0 0 0]; %black
   LINE_COLOR=[0 0 1]; %blue


[fname pathname]=uigetfile('*.dat','Load input file(ASCII)');
   
S=sprintf('cd %s',cwd);
eval(S);

if fname ~= 0
   S=sprintf('Loading data .....');
   disp(S);
   S=sprintf('load %s%s',pathname,fname);
   eval(S);
   
   o_fname=fname;
   o_pname=pathname;
   name=basename(fname);
   
else
   fname=o_fname;
   pathname=o_pname;
end

signal3=eval(name);

play0_pb=uicontrol('Style','Pushbutton', ...
   'String','play','Units','normalized','Position',[.88 .88 .095 .03],...
   'Callback', 'play(signal1);');
spec0_pb=uicontrol('Style','Pushbutton', ...
   'String','spectrogram','Units','normalized','Position',[.88 .84 .095 .03],...
   'Callback', 'sgram1'); 
wave0_pb=uicontrol('Style','Pushbutton', ...
   'String','waveform','Units','normalized','Position',[.88 .80 .095 .03],...
   'Callback', 'axes(ax1);plot(signal1,''color'', LINE_COLOR);title(''Speech signal - original'');');

play1_pb=uicontrol('Style','Pushbutton', ...
   'String','play','Units','normalized','Position',[.88 .63 .095 .03],...
   'Callback', 'play(signal2(LEFT:RIGHT));');
spec1_pb=uicontrol('Style','Pushbutton', ...
   'String','spectrogram','Units','normalized','Position',[.88 .59 .095 .03],...
   'Callback', 'sgram2'); 
wave1_pb=uicontrol('Style','Pushbutton', ...
   'String','waveform','Units','normalized','Position',[.88 .55 .095 .03],...
   'Callback', 'axes(ax2);plot((LEFT:RIGHT),signal2(LEFT:RIGHT),''color'', LINE_COLOR);title(''Speech signal - zoom'');');

play2_pb=uicontrol('Style','Pushbutton', ...
   'String','play','Units','normalized','Position',[.88 .38 .095 .03],...
   'Callback', 'play(signal3(LEFT:RIGHT));');
spec2_pb=uicontrol('Style','Pushbutton', ...
   'String','spectrogram','Units','normalized','Position',[.88 .34 .095 .03],...
   'Callback', 'sgram3'); 
wave2_pb=uicontrol('Style','Pushbutton', ...
   'String','waveform','Units','normalized','Position',[.88 .30 .095 .03],...
   'Callback', 'axes(ax3);plot((LEFT:RIGHT),signal3(LEFT:RIGHT),''color'', LINE_COLOR); title(''DEGG signal - zoom '')');

play3_pb=uicontrol('Style','Pushbutton', ...
   'String','play','Units','normalized','Position',[.88 .17 .095 .03],...
   'Callback', 'play(signal4(LEFT:RIGHT));');
spec3_pb=uicontrol('Style','Pushbutton', ...
   'String','spectrogram','Units','normalized','Position',[.88 .13 .095 .03],...
   'Callback', 'sgram4');
wave3_pb=uicontrol('Style','Pushbutton', ...
   'String','waveform','Units','normalized','Position',[.88 .09 .095 .03],...
   'Callback', 'axes(ax4);plot((LEFT:RIGHT),signal4(LEFT:RIGHT),''color'', LINE_COLOR);title(''DEGG signal - zoom'');');

%close_pb=uicontrol('Style','Pushbutton', ...
%   'String','close','Units','normalized','Position',[.88 .01 .095 .03],...
%   'Callback', 'close(principal);');


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%message window 
%  create message window and write message in that window also
   message_window=figure('Unit','normalized',...
           'Position',[0.05 0.2 0.7 0.2],...
           'Resize','off',...
           'Color',BACK_COLOR,...
           'Numbertitle','off',...
           'Name','Message');
axis('off'); 
ss=sprintf('Please wait.');
text(-0.05,5/6,ss,'color',[0 0 1],'FontSize',10);
ss=sprintf('After loading the EGG file the software');
text(-0.05,3/6,ss,'color',[0 0 1],'FontSize',10);
ss=sprintf('calculates the DEGG file before plotting both.');
text(-0.05,1/6,ss,'color',[0 0 1],'FontSize',10);
pause(6.);
close(message_window);
clear message_window;
pause(0.01);
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%




%calculate differentiated EGG
length_signal3=size(signal3);
for k=1:length_signal3-1
   signal4(k) =signal3(k+1)-signal3(k);
end;
signal4(length_signal3)=signal3(length_signal3);
axes(ax4);
plot(signal4,'color',LINE_COLOR);
title('DEGG signal - zoom');

% initialization
LEFT=1;
LENS=length(signal1);
RIGHT=LENS;
fram_len_init=250;
zoom_level=1;


shift_text=uicontrol('Style','text',...
   'Units','normalized','Position',[0.06 .95 .10 .05],'String','Scroll:',...
   'BackGroundColor',[0.68 0.68 0.68]);

shift_pts=uicontrol('Style','edit', ...
   'Unit','Normalized','Position',[.19 .95 .1 .05],'String',fram_len_init);

shift_left=uicontrol('Style','Pushbutton',...
   'Unit','Normalized','Position',[.15 .95 .04 .05],'Visible','off','String','<',...
   'Callback','sf_flag=1;shft');
%callback function [shft.m]

shift_right=uicontrol('Style','Pushbutton',...
   'Unit','Normalized','Position',[.29 .95 .04 .05],'Visible','off',...
   'String','>','Callback','sf_flag=-1;shft');
%callback function [shft.m]


zoom_in_out=uicontrol('Style','Pushbutton', ...
   'String','Zoom in or out','Units','normalized','Position',[.59 .95 .15 .05],'Callback', 'display_zoom');
%callback function [display_zoom.m]


axes('Position',[.05 .05 .8 .9],'Box','on','Visible','off');