www.pudn.com > space-timecodingBrankaVuceticJinhongYuan.rar > STBC_main.m, change:2006-12-26,size:1006b

%frame length = 130 symbols 
fr_length=130; 
 
%SNR upto 20 dBs 
EbNo=[0:2:20]; 
 
%N, M: number of transmit and receive antennas 
 
no_tx_antennas=2; 
no_rx_antennas=1; 
channel_model='Rayleigh'; 
Num=1000; 
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_uncoded,'--') 
hold on 
semilogy(EbNo,BER,'-*') 
hold on 
modulation='QPSK '; 
no_tx_antennas=3; 
no_rx_antennas=1; 
[FER FER_uncoded SER SER_uncoded BER BER_uncoded]=stbc31(channel_model,fr_length,Num,no_tx_antennas,no_rx_antennas,modulation); 
semilogy(EbNo,BER,'-o') 
hold on  
no_tx_antennas=4; 
no_rx_antennas=1; 
[FER FER_uncoded SER SER_uncoded BER BER_uncoded]=stbc41(channel_model,fr_length,Num,no_tx_antennas,no_rx_antennas,modulation); 
semilogy(EbNo,BER,'-<') 
hold off 
xlabel('SNR [dB]') 
ylabel('BER') 
axis([min(EbNo) max(EbNo) 1e-5 1e0]) 
legend('uncoded','2T x 1Rx','3T x 1Rx','4T x 1Rx',1) 
grid on