%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
