wumalvno.m

含有交织码编码与解码

function[f]=wumalvno(m,l)
%函数用于计算误码率
%f为输出在每700个噪声码中有m个错码时的纠错率
%m为输入每700各噪声码中错误码的个数
a=randint(1,l);%a为1行360列的矩阵
T=bianma(a);     %编码(120*7矩阵)
T=reshape(T,1,l/3*7);
T=tufa(T,m);%加噪声得120*7
t=reshape(T,l/3,7);
T=jiucuo(t);%对循环编码进行一位纠错解码
T=reshape(T,7,l/3);
T=T';%行列变换
A1=jiema(T); %解码
a1=reshape(A1,l,1);
a1=a1';%行列变换，得到a1为纠错解码后的输出码
n=xor(a1,a)*ones(l,1); %n为误码个数
f=n/l; %f为误码率