www.pudn.com > space-timecodingBrankaVuceticJinhongYuan.rar > main_Almoudi.m, change:2006-12-24,size:1262b

%frame length = 130 symbols 
fr_length=130; 
 
%SNR upto 20 dBs 
EbNo=[0:2:30]; 
 
%N, M: number of transmit and receive antennas 
 
no_tx_antennas=2; 
no_rx_antennas=1; 
channel_model='Rayleigh'; 
Num=100; 
modulation='BPSK '; 
[FER FER_uncoded SER SER_uncoded BER BER_uncoded]=stbc21(channel_model,fr_length,Num,no_tx_antennas,no_rx_antennas,modulation) 
figure; 
semilogy(EbNo,BER,'-*') 
hold on 
no_tx_antennas=1; 
no_rx_antennas=2; 
[FER FER_uncoded SER SER_uncoded BER BER_uncoded]=stbc12(channel_model,fr_length,Num,no_tx_antennas,no_rx_antennas,modulation) 
semilogy(EbNo,BER,'-+') 
hold on  
no_tx_antennas=2; 
no_rx_antennas=2; 
[FER FER_uncoded SER SER_uncoded BER BER_uncoded]=stbc22(channel_model,fr_length,Num,no_tx_antennas,no_rx_antennas,modulation) 
semilogy(EbNo,BER,'-o') 
hold on  
no_tx_antennas=1; 
no_rx_antennas=4; 
[FER FER_uncoded SER SER_uncoded BER BER_uncoded]=stbc14(channel_model,fr_length,Num,no_tx_antennas,no_rx_antennas,modulation) 
semilogy(EbNo,BER,'-<') 
hold on 
BER=10.^(-0.10*EbNo); 
BER(1)=10^(-0.3); 
BER(2)=10^(-0.4); 
BER(3)=10^(-0.5); 
semilogy(EbNo,BER,'--') 
hold off 
xlabel('SNR [dB]') 
ylabel('BER') 
legend('Alamouti(2T x 1Rx)','MRC(1T x 2Rx)','Alamouti(2T x 2Rx)','MRC(1T x 4Rx)','no diversity',1) 
grid on