dtmf.m

通过STMF

 b1=[1 -1.7077 1];
 a1=[0 0.5204 0];
 b2=[1 -1.6453 1];
 a2=[0 0.5686 0];
 b3=[1 -1.5687 1];
 a3=[0.6203 0];
 b4=[1 -1.4782 1];
 a4=[0 0.6736 0];
 b5=[1 -1.1641 1];
 a5=[0 0.8131 0];
 b6=[1 -0.9964 1];
 a6=[0 0.8671 0];
 b7=[1 -0.7986 1];
 a7=[0 0.9168 0];
 b8=[1 -0.5685 1];
 a8=[0 0.9652 0];
 h=[1,zeros(1,2047)];
y1=filter(a1,b1,h);
y2=filter(a2,b2,h);
y3=filter(a3,b3,h);
y4=filter(a4,b4,h);
y5=filter(a5,b5,h);
y6=filter(a6,b6,h);
y7=filter(a7,b7,h);
y8=filter(a8,b8,h);
b1=y1+y5;
b2=y1+y6;
b3=y1+y7;
b4=y2+y5;
b5=y2+y6;
b6=y2+y7;
b7=y3+y5;
b8=y3+y6;
b9=y3+y7;
b0=y4+y6;
NUM=input('输入的8位电话号码＝');
for m=1:8
    d=fix(NUM/10^(8-m));
    NUM=NUM-d*10^(8-m);
    if d==1
        wavplay(b1,8192);
        for i=1:2048
            z((m-1)*2048+i)=b1(i);
        end
    
    elseif d==2
        wavplay(b2,8192);
        for i=1:2048
            z((m-1)*2048+i)=b1(i);
        end
    elseif d==3
        wavplay(b3,8192);
        for i=1:2048
            z((m-1)*2048+i)=b3(i);
        end
   elseif d==4
        wavplay(b4,8192);
        for i=1:2048
            z((m-1)*2048+i)=b4(i);
        end
   elseif d==5
        wavplay(b5,8192);
        for i=1:2048
            z((m-1)*2048+i)=b5(i);
        end
   elseif d==6
        wavplay(b6,8192);
        for i=1:2048
            z((m-1)*2048+i)=b6(i);
        end
    elseif d==7
        wavplay(b7,8192);
        for i=1:2048
            z((m-1)*2048+i)=b7(i);
        end
   elseif d==8
        wavplay(b8,8192);
        for i=1:2048
            z((m-1)*2048+i)=b8(i);
        end
   elseif d==9
        wavplay(b9,8192);
        for i=1:2048
            z((m-1)*2048+i)=b9(i);
        end
   elseif d==0
        wavplay(b0,8192);
        for i=1:2048
            z((m-1)*2048+i)=b0(i);
        end
    end
end
wavwrite(z,'C:\1.wav');