資源簡介
用c寫的,數據經過8psk調制后,通過awgn信道,并對收到的數據進行解調和判決,最終計算了誤比特率BER
代碼片段和文件信息
?/*
?*
?*文件名稱:8psk_func.c
?*
?*作者:chen
?*
?*日期:2008.12.17
?*
?*程序說明:?該程序用C語言實現了8psk信號通過AWGN信道,并計算誤比特率的仿真。
?*???????????通過輸入平均比特信噪比和仿真比特數,可以求得不同參數要求下的誤比特率。
?*
?*/
#include?“8psk.h“
double?GaussRandGen(double?mu?double?sigma)
{
????static?double?V1?V2?S;
????static?int?phase?=?0;
????double?X;
????
????if?(phase?==?0)?
{
????????do?
{
????????????double?U1?=?(double)rand()?/?RAND_MAX;
????????????double?U2?=?(double)rand()?/?RAND_MAX;
????????????
????????????V1?=?2?*?U1?-?1;
????????????V2?=?2?*?U2?-?1;
????????????S?=?V1?*?V1?+?V2?*?V2;
????????}?
while((S>=1)?||?(S==0));
????????
????????X?=?V1?*?sqrt(-2?*?log(S)?/?S);
????}?
else
{
X?=?V2?*?sqrt(-2?*?log(S)?/?S);
}?
????phase?=?1?-?phase;
????return?X*sigma+mu;
}//
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????4164??2008-12-17?16:40??8psk_func.c
?????文件???????1557??2008-12-18?14:07??8psk_main.c
?????文件???????1025??2008-12-18?14:06??8psk.h
-----------?---------??----------?-----??----
?????????????????6746????????????????????3
評論
共有 條評論