rayleigh-awgn-bpsk.txt

用MATLAB仿真瑞利信道下的BPSK系统的误码率 和信噪比的关系曲线。

% 瑞利信道-BPSK
clear;
chan = rayleighchan(1/10000,100);%产生瑞利信道
M = 2; 
x = randint(10000,1,M);  % 随机序列
s= pskmod(x,M);  % 调制
chan.StoreHistory = true;%记忆信道特征
y = filter(chan,s); % 信号通过信道
y = y.*exp(-1*j*angle(chan.PathGains));%相位补偿

SNR = 0:2:20; % 信噪比范围
for n = 1:length(SNR)
  r = awgn(y,SNR(n),'measured'); % 加高斯噪声
  r1 = pskdemod(r,M); % 解调
  [nErrors, BER(n)] = biterr(x(2:end),r1(2:end));%计算仿真误比特率
end

BERtheory = berfading(SNR,'psk',M,1);%计算理论误比特率

semilogy(SNR,BERtheory,'b-',SNR,BER,'r*');%不同颜色画出误比特率曲线对比
legend('Theoretical BER','Empirical BER');%曲线名称
xlabel('SNR (dB)'); ylabel('BER');%横纵坐标
title('Binary PSK over Rayleigh Fading Channel');%题目