1/6
文檔分類:通信/電子

東南大學短距離無線通信信道編解碼仿真實驗報告.docx


下載后只包含 1 個 DOCX 格式的文檔,沒有任何的圖紙或源代碼,查看文件列表

特別說明:文檔預覽什么樣,下載就是什么樣。

下載所得到的文件列表
東南大學短距離無線通信信道編解碼仿真實驗報告.docx
文檔介紹:
考慮BSC信道,令錯誤概率 通過仿真分別確定無編碼、碼率1/3重復碼以及(7,4)漢明碼的BER
clearall
clc
K=10000;
N=3*K;
G=[1 1 0 1 0 0 0; 0 1 1 0 1 0 0; 1 1 1 0 0 1 0; 1 0 1 0 0 0 1;];
H=[1 0 0 1 0 1 1; 0 1 0 1 1 1 0; 0 0 1 0 1 1 1;];
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%±àÂë
x0=randi([0,1],K,1)';
y0=repmat(x0,3,1);
y0=reshape(y0,1,numel(y0));
fori=1:K/4
z0(7*i-6:7*i)=mod(x0(4*i-3:4*i)*G,2);
end
%%%%%%%%%%%%%%%%%%%%%%%%´«Êä
c=rand(1,7*N/4);
for ii=1:6
p=ii*0.02;
x1=zeros(1,K);
fori=1:K
if c(i)<p
x1(i)=-x0(i)+1;
else
x1(i)=x0(i);
end
end
y1=zeros(1,N);
fori=1:N
if c(i)<p
y1(i)=-y0(i)+1;
else
y1(i)=y0(i);
end
end
z1=zeros(1,7*K/4);
fori=1:7*K/4
if c(i)<p
z1(i)=-z0(i)+1;
else
z1(i)=z0(i);
end
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%ÒëÂë
x2=x1;
y2=zeros(1,K);
fori=1:K
if y1(3*i-2)+y1(3*i-1)+y1(3*i)<2
y2(i)=0;
else
y2(i)=1;
end
end
z2=zeros(1,7*K/4);
mask=[0 0 0 0 0 0 0];
fori=1:K/4
zz=mod(z1(7*i-6:7*i)*H',2);
zzz=zz(1)*4+zz(2)*2+zz(3)*1;
switch(zzz)
case 4
mask=[1 0 0 0 0 0 0];
case 2
mask=[0 1 0 0 0 0 0];
case 1
mask=[0 0 1 0 0 0 0];
case 6
mask=[0 0 0 1 0 0 0];
case 3
mask=[0 0 0 0 1 0 0];
case 7
mask=[0 0 0 0 0 1 0];
case 5
mask=[0 0 0 0 0 0 1];
case 0
mask=[0 0 0 0 0 0 0];
end
z2(7*i-6:7*i)=double(bitxor(int8(mask),int8(z1(7*i-6:7*i))));
end
fori=1:K/4
z3(4*i-3:4*i)=z2(7*i-3:7*i);
end
內容來自淘豆網www.okledlighting.com轉載請標明出處.
相關文檔
非法內容舉報中心
文檔信息
  • 頁數6
  • 收藏數0 收藏
  • 頂次數0
  • 上傳人zxwziyou9
  • 文件大小37 KB
  • 時間2021-10-30
阿里彩票-登录