qam8.m

完整的OFDM仿真程序

%该程序用来模拟信号8QAM调制

function [y]=qam8(x)
% y= 8psk(x)
% x 为经过信源调制后信息bit符号
% y 为经过信道编码（8psk）调制后的符号
%                             |   
%                             4
%                       3     |    2
%             －－－－7－－－－－－－－1－－－        
%                       8     |    5   
%                             6 
%                             |   
%
%星座图表
%星座映射采用Gray码，能够改善系统性能
% Gray:mapping_matrix=[1 2 4 3 7 8 6 5]=[000 001 011 010 110 111 101 100]
%实际映射矩阵[000 001 010 011 100 101 110 111]=[1 2 3 4 5 6 7 8]

%得到星座图映射矩阵
mapping=[1,sqrt(2)/2+sqrt(2)/2*j,-sqrt(2)/2+sqrt(2)/2*j,j,sqrt(2)/2-sqrt(2)/2*j,-j,-1,-sqrt(2)/2-sqrt(2)/2*j]; 
% 取得输入二进制序列长度
len=length(x)/3;
%对输入bit流进行星座映射，得到8psk调制符号
y=zeros(1,len);
for I=1:len 
    temp=x(3*(I-1)+1)*4+x(3*(I-1)+2)*2+x(3*I);
    y(I)=mapping(temp+1);
end