yuanshi.m

根据TCH/FS信道的技术标准

%无内编码函数
function[sig_err_rate] =yuanshi(snr_in_dB)
%桢个数
N=100;
%噪声功率
E=1;
snr=10^(snr_in_dB/10);
sgma=sqrt((E/snr)/2);

%信息序列d
d=round(rand(1,N*267));
u=d;
%%%%%%%%%%%%%%%%%%%%%
%经信道加高斯燥声
%噪声功率
E=1;
snr=10^(snr_in_dB/10);
sgma=sqrt((E/snr)/2);
u=2*u-1;
u=sign(u+sgma*randn(size(u))+eps);
u=(u+1)/2;
m=u;
sig_err_rate=(length(find(d~=m)))/length(d);