am_dem.m

这是关于模拟调制的MATLAB源代码

%% am_dem.m
% 包络检测的Matlab源程序。被调信号
% 当0<t<t0/3时为+1，当t0/3<t<2*t0/3为-2，其它情况下为零.
t0=0.15;
ts=0.001; 
fc=250;   
fs=1/ts; 
a=0.85; % 调制指数
df=0.25;   
t=[0:ts:t0]; % 时间向量
% 被调信号
m=[ones(1,t0/(3*ts)),-2*ones(1,t0/(3*ts)),zeros(1,t0/(3*ts)+1)];
c=cos(2*pi*fc.*t);
m_n=m/max(abs(m));  % 归一化后的被调信号
[M,m,df1]=fftseq(m,ts,df); 
M=M/fs; 
f=[0:df1:df1*(length(m)-1)]-fs/2; 
u=(1+a*m_n).*c;
[U,u,df1]=fftseq(u,ts,df);
U=U/fs;
env=env_phas(u); % 找出包络
dem1=2*(env-1)/a; % 去掉dc分量并重新缩放
%% 画图
subplot(2,1,1);
plot(t,u(1:length(t)))
axis([0 0.15 -2.1 2.1])
title('AM调制信号')
subplot(2,1,2);
plot(t,env(1:length(t)))
axis([0 0.15 -2.1 2.1])
title('AM调制信号的包络')
pause
clf
subplot(2,1,1);
plot(t,m(1:length(t)))
axis([0 0.15 -2.1 2.1])
title('无噪声下的被调制信号m(t)')
subplot(2,1,2);
plot(t,dem1(1:length(t)))
axis([0 0.15 -2.1 2.1])
title('解调信号')