- 1、本文档共10页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
数字频带系统matlab程序
实验八
clear all;
close all;
echo on;
t0=3;%信号时长
dt1=0.001 %系统时域采样间隔
fs=1/dt1;%系统采样频率
df=0.2; %所需的频率分辨率
t=0:dt1:t0;
% 产生模拟调制信号
m=[ones(1,t0/(3*dt1)),-2*ones(1,t0/(3*dt1)),zeros(1,t0/(3*dt1)+1)];
%画出调制信号波形及频谱
clf
figure(1);
subplot(121);
plot(t,m(1:length(t)));% 画出调制信号波形
R=4.2;
axis([0 t0 -R/2 R/2]);
xlabel(t);
ylabel(调制信号);
subplot(122);
[M,m,df1,f]=T2F4(m,dt1,df,fs);%求出调制信号频谱
plot(f,fftshift(abs(M)))% 画出调制信号频谱
xlabel(f);
ylabel(调制信号频谱);
axis([-5,5,0,2.5]);
%A/D
%低通抽样定理
t=0:dt1:t0;
xt=m;
[f,xf]=T2F(t,xt);
dt=0.01;
%抽样信号,抽样频率为fs
fs=10;
sdt=1/fs;
st=[];
for t1=sdt:sdt:t0+sdt
st=[st m(ceil(t1/dt1))];
end
t1=0:sdt:t0;
[f1,sf]=T2F(t1,st);
figure(2);
subplot(211);
t=0:dt1:t0;
plot(t,xt(1:length(t)));
axis([0 t0 -2.5 2.5]);
title(原始信号);
subplot(212);
stem(t1,st);
title(抽样信号);
axis([0 t0 -2.5 2.5]);
%基带信号形成器
figure(3);
subplot(211);
plot(t,xt(1:length(t)));
title(原始模拟信号);
axis([0 t0 -2.5 2.5]);
out1=pcm_encode(st);
out=2*out1-1;%将编码结果由单极性不归0转换为双极性不归0码
dt=0.1;
y=[];
for k=1:length(out)
y=[y ones(1,1/dt)*out(k)];
end
subplot(212);
t=0:t0/(length(y)-1):t0;
plot(t,y);
xlabel(t);
title(PCM编码结果);
axis([0 t0 -1.5 1.5]);
A=1; %载波振幅
fc=2; %载波频率(Hz)
snr=15; %信噪比dB
N_sample=8;% 基带信号中每个码元的的采样点数
N=length(out1); % 码元数为编码码元数
Ts=1; % 码元宽度
df=0.01;%频率分辨率
B=1/Ts;
f_start=fc-B;
f_cutoff=fc+B;
fs=fc*N_sample%系统采样频率,即考虑载波后,一个码元内的采样点数
ts=Ts/fs; % 系统采样间隔
t=0:ts:N*Ts-ts;
Lt=length(t);
d=out;
dd=sigexpand(out1,fc*N_sample);
gt=ones(1,fc*N_sample); % NRZ波形
d_NRZ=conv(dd,gt);
d_NRZ1=d_NRZ(1:Lt);
d_NRZ1=mabianhuan(d_NRZ1,fs);%进行2DPSK调制的码变换,获得相对码
figure(4);
out=2*d_NRZ1-1;%将相对码由单极性不归0转换为双极性不归0码
y=[];
dt=0.1;
for k=1:length(out)
y=[y ones(1,1/dt)*out(k)];
end
subplot(211);
t=0:t0/(length(y)-1):t0;
plot(t,y);
xlabel(t);
title(相对码);
axis([0 t0 -1.5 1.5]);
d_sjx=2*d_NRZ1-1;%生成的双极性NRZ信号
d_sjx1=d_sjx(1:Lt);
subplot(212);
[d_sjx1f,d_sjx1,df1,f]=T2F4(d_sjx1,ts,df,fs);%求出双极性NRZ信号功率谱
plot(f,10*log10(abs(fftshift(d_sjx1f).^2/length(f))));% 画出双极性NRZ信号功率谱
axis([-3*B 3*B -100
文档评论(0)