完整的QPSK-MSK-QAM-OFDM调制解调m程序.rar

完整的QPSK-MSK-QAM-OFDM调制解调m程序

clear all
global dt t f df N T %全局变量
close all 
N=2^20; 
dt=0.001; %ms 
df=1/（N*dt）; %KHz 
T=N*dt; %截短时间 
Bs=N*df/2; %系统带宽 
t=linspace（-T/2T/2N）; %时域横坐标 
f=linspace（-BsBsN）+eps; %频域横坐标 
fm=1; %模拟基带信号频率为1kHz 
fc=6; %正弦载波信号频率为6kHz 
mt=cos（2*pi*fm*t）; %模拟基带信号 
m（mt>0）=1;  %发送比特
m（mt<0）=0;
c=cos（2*pi*fc*t）; %正弦载波信号 
s=m.*c; %DSB-SC AM已调信号 
S=T2F（s）; 
n=awgn（s20）; %AWGN信道噪声
r=s+n; %接受信号 
y=r.*c; 
Lpfil=LPF（fc）; %低通滤波器 
Y=T2F（y）; 
yrt=real（F2T（Lpfil.*Y））; 
yr=yrt-mean（yrt）;
yr（yr>0）=1;  %发送比特
yr（yr<0）=0;
subplot（311） 
plot（tm‘LineWidth‘1.2）
title（‘输入信号‘）;
axis（[-1+1-0.21.2*max（m）]） 
xlabel（‘t （ms）‘）
ylabel（‘s（t） （V）‘） 
subplot（312） 
plot（ts‘LineWidth‘1.2） 
title（‘2ASK调制后波形‘）;
axis（[-1+11.2*min（c）1.2*max（c）]） 
xlabel（‘t （ms）‘）
ylabel（‘s（t） （V）‘） 
subplot（313）
plot（tyr‘LineWidth‘1.2） 
axis（[-1+1-0.21.2*max（yr）]）
title（[‘2ASK解调后波形‘]） 
xlabel（‘t （ms）‘） 
ylabel（‘s（t） （V）‘）

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       1040  2007-10-08 19:25  ASKmod.m

     文件        151  2007-10-08 19:26  F2T.m

     文件        163  2007-10-08 19:26  LPF.m

     文件        829  2007-10-08 19:29  MSKmod.m

     文件        783  2007-10-08 19:36  OFDMmod.m

     文件        248  2007-10-08 19:31  QAMmod.m

     文件        199  2007-10-08 19:27  QPSKmod.m

     文件        154  2007-10-08 19:26  T2F.m

----------- ---------  ---------- -----  ----

                 3567                    8