clear?all
clc

%========================QPSK系統仿真主函數===========================
%???????姓名?楊璐????學號?12041259?????信息科學與技術學院
%============================設定參數==================================

SNRdB=0:0.2:6????????????%信噪比????
code=1;?????????????????%手動改寫，code=1時，對信源進行編碼，code=0時，無編碼
K=5;????????????????????%萊斯分布參數，手動進行改寫，分析信道誤碼率性能

%?=======================QPSK系統高斯信道仿真=============================
echo?on;
for?i=1:length（SNRdB）
????
????[pb1ps1]=QPSK_Awgn_ch（SNRdB（i）code）;?????????????
????awgn_simu_bit_ber（i）=pb1;
????awgn_simu_symbol_ber（i）=ps1;
????disp（[ps1pb1]）;
????echo?off;
????
end;
%========================QPSK系統瑞利衰落信道仿真======================
echo?on;
for?i=1:length（SNRdB）
????[pbps]=QPSK_Rayleigh_ch（SNRdB（i）code）;?????????%?比特誤碼率
????ray_simu_bit_ber（i）=pb;
????ray_simu_symbol_ber（i）=ps;
????disp（[pspb]）;
????echo?off;??
end;
%?==========================QPSK系統Racian衰落信道仿真================
echo?on;
for?i=1:length（SNRdB）
????[pb2ps2]=QPSK_Rician_ch（SNRdB（i）Kcode）;?????????????
????rician_simu_bit_ber（i）=pb2;
????rician_simu_symbol_ber（i）=ps2;
????disp（[ps2pb2]）;
????echo?off;
end;
%?=============QPSK系統理論誤碼率性能====================================
echo?on;
????awgn_theo_bit_ber?=?berawgn（SNRdB‘psk‘4‘nondiff‘）;%高斯信道
????ray_theo_bit_ber?=?berfading（SNRdB‘psk‘41）;???????%瑞利衰落信道
????rician_theo_bit_ber?=?berfading（SNRdB‘PSK‘41K）;??%萊斯衰落信道
????echo?off;
%=============誤碼率理論曲線和仿真曲線==================================
semilogy（SNRdBawgn_theo_bit_ber‘r‘SNRdBawgn_simu_bit_ber‘r*‘SNRdBray_theo_bit_ber‘b‘SNRdBray_simu_bit_ber‘b*‘SNRdBrician_theo_bit_ber‘g‘SNRdBrician_simu_bit_ber‘g*‘）;
if（code==1）
title（‘QPSK格雷編碼誤碼率曲線‘）;
end;
if（code==0）
title（‘QPSK無編碼誤碼率曲線‘）;
end;
xlabel（‘Eb/No‘）;ylabel（‘BER‘）;
legend（‘理論AWGN‘‘仿真AWGN‘‘理論Rayleigh‘‘仿真Rayleigh‘‘理論Rician‘‘仿真Rician‘）;
%================================end====================================

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????3324??2012-11-21?02:18??半分析半仿真的方法\QPSK_Awgn_ch.m
?????文件????????3358??2012-11-21?02:18??半分析半仿真的方法\QPSK_Rayleigh_ch.m
?????文件????????3566??2012-11-21?02:18??半分析半仿真的方法\QPSK_Rician_ch.m
?????文件????????2129??2012-11-28?21:13??半分析半仿真的方法\mian.m
?????目錄???????????0??2013-11-04?16:14??半分析半仿真的方法\