%?Alamouti_2x1_ant_selection.m
clear?all;?clf
%%%%%%?Parameter?Setting?%%%%%%%%%
N_frame=100;?N_packet=100;?%Number?of?frames/packet?&?Number?of?packets
b=2;?M=2^b;
mod_obj=modem.qammod（‘M‘M‘SymbolOrder‘‘Gray‘‘InputType‘‘bit‘）;
demod_obj?=?modem.qamdemod（mod_obj）;
%?MIMO?Parameters
T_TX=4;?NT=2;?NR=1;
N_pbits=NT*b*N_frame;?N_tbits=N_pbits*N_packet;
fprintf（‘====================================================\n‘）;
fprintf（‘?Ant_selection?transmission‘）;
fprintf（‘\n?%d?x?%d?MIMO\n?%d?QAM‘?NTNRM）;
fprintf（‘\n?Simulation?bits?:?%d‘N_tbits）;
fprintf（‘\n====================================================\n‘）;
SNRdBs?=?[0:2:20];?sq2=sqrt（2）;
for?i_SNR=1:length（SNRdBs）
SNRdB=?SNRdBs（i_SNR）;
noise_var?=?NT*0.5*10^（-SNRdB/10）;?sigma?=?sqrt（noise_var）;
rand（‘seed‘1）;?randn（‘seed‘1）;?N_ebits?=?0;
%%%%%%%%%%%%%?Transmitter?%%%%%%%%%%%%%%%%%%
for?i_packet=1:N_packet
msg_bit?=?randint（N_pbits1）;?%?Bit?generation
s?=?modulate（mod_objmsg_bit）;
Scale?=?modnorm（s‘avpow‘1）;?%?Normalization?factor
S=reshape（Scale*sNT1N_frame）;
Tx_symbol=[S（11:）?-conj（S（21:））;
????????????S（21:）?conj（S（11:））];
%%%%%%%%%%%%%?Channel?and?Noise?%%%%%%%%%%%%%
H?=?（randn（NRT_TX）+j*randn（NRT_TX））/sq2;
for?TX_index=1:T_TX
????ch（TX_index）=norm（H（:TX_index）‘fro‘）;%求二范數
end
????[valIndex]?=?sort（ch‘descend‘）;%降序排列，val是新向量，index是在之前向量中的索引
????Hs?=?H（:Index（[1?2]））;
????norm_H2=norm（Hs‘fro‘）^2;?%?H?selected?and?its?norm2
for?i=1:N_frame
????Rx（::i）?=?Hs*Tx_symbol（::i）?+?sigma*（randn（NR2）+j*randn（NR2））;
end
%%%%%%%%%%%%%?Receiver?%%%%%%%%%%%%%%%%%%
for?i=1:N_frame
y（1i）?=?（Hs（1）‘*Rx（:1i）+Hs（2）*Rx（:2i）‘）/norm_H2;
y（2i）?=?（Hs（2）‘*Rx（:1i）-Hs（1）*Rx（:2i）‘）/norm_H2;
end
S_hat?=?reshape（y/ScaleNT*N_frame1）;
msg_hat?=?demodulate（demod_objS_hat）;
N_ebits?=?N_ebits?+?sum（msg_hat~=msg_bit）;
end
BER（i_SNR）?=?N_ebits/N_tbits;
end
semilogy（SNRdBsBER‘-k^‘?‘LineWidth‘2）;?hold?on;?grid?on;
xlabel（‘SNR[dB]‘）?ylabel（‘BER‘）;
legend（‘Ant-selection?transmission‘）;
title（‘BER?performance?of?Alamouti?STBC?scheme?with?antenna?selection‘）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????2135??2015-07-06?20:24??CSI\Alamouti_2x1_ant_selection.m

?????文件???????2155??2015-07-06?15:31??CSI\Alamouti_2x1_precoding.asv

?????文件???????2155??2015-07-06?15:35??CSI\Alamouti_2x1_precoding.m

?????文件????????435??2015-07-06?10:47??CSI\codebook_generator.m

?????文件???????1833??2015-07-06?16:06??CSI\pre_equalization_vs_equalization.asv

?????文件???????1840??2015-07-06?16:50??CSI\pre_equalization_vs_equalization.m

?????文件???????1795??2015-07-06?16:56??CSI\pre_ZF_equalization.m

?????目錄??????????0??2015-07-06?19:54??CSI

-----------?---------??----------?-----??----

????????????????12348????????????????????8