t_fs_ex_de.m

9.6kbit/s 全速率数据业务信道(TCH/F9.6)仿真

%TCH/FS信道的外编码解码
function [d,tag]=T_FS_EX_DE(u)
%%%%%%%%%%%%%%%%%%%%%%
%反重排和去尾比特
temp=zeros(1,53);
for k=1:25
    temp(2*k-1)=u(k);
    temp(2*k)=u(186-k);
end
temp(51:53)=ones(1,3);
temp(54:56)=u(92:94);

d=zeros(1,260);
for k=0:90
    d(2*k+1)=u(k+1);
    d(2*k+2)=u(185-k);
end
d(183:260)=u(190:267);

before=[0,0,0];
after=[0,0,0];
for i=1:56   %循环计算奇偶校验位
   after(1)=mod(temp(i)+before(3),2);
   after(2)=mod(before(1)+before(3),2);
   after(3)=before(2);
   before=after;
end

p1=after;
if(p1==0)  %如果译码所得奇偶校验为0，说明未检查出错
   tag=0;  %无错误
else
   tag=1;  %有错误
end