QPSK_AWGN.rar_QPSK AWGN matlab_QPSK awgn_qpsk 理论 对比_qpsk代码_qpsk理

clear all; clc; M = 4; x = randint(100000,1,M); % 随机序列 s= pskmod(x,M); % 调制 SNR = -10:1:10; % 信噪比范围 for n = 1:length(SNR) r = awgn(s,SNR(n),'measured'); % 加高斯噪声 r1 = pskdemod(r,M); % 解调 [nErrors, BER(n)] = biterr(x(1:end),r1(1:end));%计算仿真误比特率 end for i=1:length(SNR) SNR1(i)=10^(SNR(i)/10); % 信噪比 BERtheory(i)=1-(1-0.5*erfc(sqrt(SNR1(i)/2)))^2; BERtheory(i)=BERtheory(i)/2; end %BERtheory = berawgn(SNR,'psk',M,'diff');%计算理论误比特率 figure semilogy(SNR,BERtheory,'b-');%不同颜色画出误比特率曲线对比 hold on semilogy(SNR,BER,'r');%不同颜色画出误比特率曲线对比 legend(' 理论BER','实际 BER');%曲线名称 grid on xlabel('SNR (dB)'); ylabel('BER');%横纵坐标 title('QPSK通过AWGN信道');%题目