3(1)正交解调.m

使用matlab实现包络检波

 t=0:0.001:1;
x1=sin(2*pi*5*t);
subplot(2,5,1);
plot(t,x1);
x2=sin(2*pi*8*t);
subplot(2,5,2);
plot(t,x2);
x=x1+x2;
subplot(2,5,3);%信号图
plot(t,x);
xl=fft(x);
subplot(2,5,4);%信号频谱
plot(abs(xl));
j=sqrt(-1);
sl=x.*exp(j*2*pi*200*t);%已调信号
subplot(2,5,5)
plot(t,sl);
sll=fft(sl);
subplot(2,5,6)
plot(abs(sll));

sl=awgn(sl,50);
subplot(2,5,7)
plot(t,real(sl));%加噪声后图
q=sl.*exp(-j*2*pi*200*t);
[b,a]=butter(1,2*200/1000,'low');
q=filter(b,a,q);
subplot(2,5,8)
plot(t,real(q));%正交解调后图
ql=fft(q);
subplot(2,5,9)
plot(abs(ql));%解调后频谱