stbc_mimo_ofdm 源程序.docVIP

%STBC_MIMO_OFDM.m %这是一个基于空时分组编码的MIMO_OFDM通信系统的仿真设计。 %此系统包括QPSK调制解调，IFFT调制，空时编解码，基于训 %练符号的信道估计等通信模块。 clear all close all clc %+++++++++++++++++++++++++++变量++++++++++++++++++++++++++++++ i=sqrt(-1); IFFT_bin_length=512; %傅立叶变换抽样点数目 carrier_count=100; %子载波数目 symbols_per_carrier=66; %符号数/载波 cp_length=10; %循环前缀长度 addprefix_length=IFFT_bin_length+cp_length; M_psk=4; bits_per_symbol=log2(M_psk); %位数/符号 %[x1 x2;-x2* x1*] 二天线发送矩阵 % O=[1 2;-2+j 1+j]; %[x1 -x2 -x3;x2* x1* 0;x3* 0 x1*;0 -x3* x2*] 三天线发送矩阵 O=[1 -2 -3;2+j 1+j 0;3+j 0 1+j;0 -3+j 2+j]; co_time=size(O,1); Nt=size(O,2); %发射天线数目 Nr=2; %接收天线数目 %+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ %+++++++++++++++++++++++++++发射机++++++++++++++++++++++++++++++ disp(--------------start-------------------); num_X=1; for cc_ro=1:co_time for cc_co=1:Nt num_X=max(num_X,abs(real(O(cc_ro,cc_co)))); end end co_x=zeros(num_X,1); for con_ro=1:co_time for con_co=1:Nt %用于确定矩阵“O”中元素的位置，符号以及共轭情况 if abs(real(O(con_ro,con_co)))~=0 delta(con_ro,abs(real(O(con_ro,con_co))))=sign(real(O(con_ro,con_co))); epsilon(con_ro,abs(real(O(con_ro,con_co))))=con_co; co_x(abs(real(O(con_ro,con_co))),1)=co_x(abs(real(O(con_ro,con_co))),1)+1; eta(abs(real(O(con_ro,con_co))),co_x(abs(real(O(con_ro,con_co))),1))=con_ro; coj_mt(con_ro,abs(real(O(con_ro,con_co))))=imag(O(con_ro,con_co)); end end end eta=eta.; eta=sort(eta); eta=eta.; % 坐标： (1 to 100) + 14=(15:114) carriers = (1: carrier_count) + (floor(IFFT_bin_length/4) - floor(carrier_count/2)); % 坐标 ：256 - (15:114) + 1= 257 - (15:114) = (242:143) conjugate_carriers=IFFT_bin_length-carriers+2;