- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
数字信号处理:用matlab编程实现AM调制音乐信号的同步解调
clear all; close all;clc
[x,fs,bit]=wavread(F:\费玉清-一剪梅 00_01_23-00_01_28.wav);
x=x(:,1);
% sound(x,fs);
N=length(x);
figure
subplot(2,1,1);
plot(x)
F1=fft(x,N);
grid on
title(原始音乐信号时域波型)
xlabel(Time)
ylabel(Magnitude)
w1=2/N*[0:N-1];
subplot(2,1,2);
plot(w1,abs(F1))
grid on
title(原始音乐信号频域波型)
xlabel(Frequency/Hz)
ylabel(Magnitude)
n=0:N-1;
x1=cos(n*0.95);
figure
subplot(2,2,1);
plot(x1)
title(余弦信号时域波型)
xlabel(Time)
ylabel(Magnitude)
F2=fft(x1,N);
subplot(2,2,2);
plot(w1,abs(F2))
grid on
title(余弦信号频域波型)
xlabel(Frequency/Hz)
ylabel(Magnitude)
X=x.*x1;
subplot(2,2,3);
plot(X)
F3=fft(X,N);
grid on
title(高频调制后音乐信号时域波型)
xlabel(Time)
ylabel(Magnitude)
subplot(2,2,4);
plot(w1,abs(F3))
grid on
title(高频调制后音乐信号频域波型)
xlabel(Frequency/Hz)
ylabel(Magnitude)
X1=X.*x1;
F4=fft(X1,N);
figure
subplot(2,1,1);plot(X1);
grid on
title(解制后音乐信号时域波型)
xlabel(Time)
ylabel(Magnitude)
subplot(2,1,2);plot(w1,abs(F4));
grid on
title(解制后音乐信号频域波型)
xlabel(Frequency/Hz)
ylabel(Magnitude)
Rp=1;Rs=15;
[N1,Wc]=buttord(0.2,0.3,Rp,Rs);
[B,A]=butter(N1,Wc);
[H,W]=freqz(B,A);
figure
subplot(1,1,1);
plot(W/pi,abs(H));
grid on
title(数字巴特沃斯滤波器)
xlabel(Digital Frequency/pi)
ylabel(Magnitude)
y=filter(B,A,X1);
% sound(y,fs);
figure
subplot(2,1,1)
plot(y);
grid on
title(巴特沃斯滤波后音乐信号时域波型)
xlabel(Time)
ylabel(Magnitude)
y=fft(y,N);
subplot(2,1,2)
plot(w1,abs(y));
grid on
title(滤波后音乐信号频域波型)
xlabel(Frequency/Hz)
ylabel(Magnitude)
N2=33;wc=0.3*pi;
hd=ideal(N2,wc);
w2=boxcar(N2);
w3=blackman(N2);
h1=hd.*w2;
h2=hd.*w3;
M=512;
fh1=fft(h1,M);
w2=2/M*[0:M-1];
fh2=fft(h2,M);
figure
plot(w2,abs(fh1))
grid on
title(矩形窗滤波器)
xlabel(Frequency)
ylabel(Magtitude)
y1=conv(X1,h1);
sound(y1,fs)
figure
subplot(2,1,1);plot(y1);
grid on
title(矩形窗滤波后的音乐信号时域波形)
xlabel(Time)
ylabel(Magtitude)
y1=fft(y1,M);
subplot(2,1,2);plot(w2,abs(y1));
grid on
title(矩形窗滤波后的音乐信号频域波形)
xlabel(Frequency)
ylabel(Magtitude)
figure
plot(w2,abs(fh2))
grid on
title(布莱克曼窗滤波器)
xlabel(Frequency)
ylabel(Magtitude)
y2=conv(X1,h2);
% sound(y2,fs)
figure
subplot(2,1,1);p
您可能关注的文档
- 国外教师教你怎样查资料.ppt
- 多点触控放大缩小.docx
- 圆与方程--知识与公式.doc
- 外研版选修六module6 Introduction and reading.ppt
- 大学英语网上作业答案.doc
- 天津教师招聘考试音乐学科必知的名词解释一.doc
- 外研版新教材一年级下册M8U1There is a pair of shoes.ppt
- 安装文件如何打包SQL数据库?.doc
- 实验指导书:实验7 继承与多态(一).docx
- 工程制图知识点(英文).doc
- 新标准大学英语总和教程 Demo Lesson SB1 Unit 2.ppt
- 新概念第三册29课Funny or not 是否可笑?.doc
- 新PK PD与抗生素b.ppt
- 新!windows phone领取liveID激活码方法.doc
- 新视野大学英语第一单元答案(精品哦!!!).doc
- 新视野视听说第四册quiz.2答案.doc
- 新视野视听说2 Unit 10Speaking_out.ppt
- 新视野大学英语第一册Unit 1 Test Yourself_ Writing %26__ Translation.ppt
- 早、午、晚要用in,at黎明、午夜、点与分.doc
- 新视野试卷-二级试卷及答案.doc
文档评论(0)