dtmftest.m

很多matlab的源代码

fs=8000;      %<--sampling reate for all functions
L=80;
dtmf.keys=...
    ['1','2','3','A';
     '4','5','6','B';
     '7','8','9','C';
     '*','0','#','D'];
keys_button=...
    ['1','2','3';
     '4','5','6';
     '7','8','9';
     '*','0','#'];
ff_cols=[1209,1336,1477,1633];
ff_rows=[697;770;852;941];
tone_cols = ones(4,1)*ff_cols;
tone_rows = ff_rows*ones(1,4);
freqs = [697,770,852,941,1209,1336,1477,1633];
tk=['6','2','2','8','3','2','1','1'];

figure('position',[50 50 700 500],'name','DTMF信号检测');
text_number=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','left',...
        'position',[60 250 200 40],...
        'string',strcat('输入电话号码：',tk));
text_number_detected=uicontrol('style','text',...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','left',...
        'FontSize',12,...
        'position',[60 230 200 40]);
L_text=uicontrol('style','text',...
        'position',[260 470 160 20],...
        'FontSize',12,...
        'HorizontalAlignment','left',...
        'BackGroundColor',[0.8 0.8 0.8],...
        'string','滑动平均滤波器的长度：');
L_edit=uicontrol('style','edit',...
        'FontSize',12,...
        'position',[400 470 40 20]);
clear_button=uicontrol('style','push',...
        'position',[200 330 80 20],...
        'string','清空电话号码',...
        'FontSize',12,...
        'callback',['tk='''';','order=1;','subplot(2,2,3);','specgram(zeros(1,400));','set(text_number,''string'',''输入电话号码：'')']);
f_1=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[10 460 30 20],...
        'string','697');
f_2=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[10 420 30 20],...
        'string','770');
f_3=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[10 380 30 20],...
        'string','852');
f_4=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[10 340 30 20],...
        'string','941');    
f_5=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[50 300 30 20],...
        'string','1209');    
f_6=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[90 300 30 20],...
        'string','1336');
f_7=uicontrol('style','text',...
        'FontSize',12,...
        'BackGroundColor',[0.8 0.8 0.8],...
        'HorizontalAlignment','right',...
        'position',[130 300 30 20],...
        'string','1477');    
    
%Generate xx wave
xx=dtmfdial(tk,fs);
soundsc(xx,fs);
subplot(2,2,3);
specgram(xx,400,fs);    
xLabelPos=0.10;
btnWid=0.15;
top=0.9;
str_command='set(text_number,''string'',strcat(''输入电话号码：'',tk));order=order+1;';
str_command=[str_command 'xx = dtmfdial(tk,fs);specgram(xx,400,fs);'];
key1=uicontrol( ...
            'Style','pushbutton', ...
            'Position',[50 450 40 40], ...
            'FontSize',12,...
            'String','1', ...
            'Callback',['tk(order)=''1'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key2=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[90 450 40 40], ...
            'String','2', ...
            'Callback',['tk(order)=''2'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key3=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[130 450 40 40], ...
            'String','3', ...
            'Callback',['tk(order)=''3'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key4=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[50 410 40 40], ...
            'String','4', ...
            'Callback',['tk(order)=''4'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key5=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[90 410 40 40], ...
            'String','5', ...
            'Callback',['tk(order)=''5'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key6=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[130 410 40 40], ...
            'String','6', ...
            'Callback',['tk(order)=''6'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key7=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[50 370 40 40], ...
            'String','7', ...
            'Callback',['tk(order)=''7'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key7=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[90 370 40 40], ...
            'String','8', ...
            'Callback',['tk(order)=''8'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key9=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[130 370 40 40], ...
            'String','9', ...
            'Callback',['tk(order)=''9'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key10=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[50 330 40 40], ...
            'String','*', ...
            'Callback',['tk(order)=''*'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key11=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[90 330 40 40], ...
            'String','0', ...
            'Callback',['tk(order)=''0'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);
key12=uicontrol( ...
            'Style','pushbutton', ...
            'FontSize',12,...
            'Position',[130 330 40 40], ...
            'String','#', ...
            'Callback',['tk(order)=''#'';','eval(str_command);','soundsc(dtmfdial(''1'',fs),fs);']);

str1='L=str2num(get(L_edit,''string''));';
str2='keys=dtmfrun(xx,L,fs);';
str3='set(text_number_detected,''string'',strcat(''接收电话号码：'',keys));';
L_button=uicontrol('style','push',...
        'position',[460 470 40 20],...
        'FontSize',12,...
        'string','检测',...
        'callback',[str1,str2,str3]);
L_button=uicontrol('style','push',...
        'position',[520 470 40 20],...
        'FontSize',12,...
        'string','说明',...
        'callback','dtmfhlp');
    
subplot(2,2,3);
specgram(xx,400,fs);