%TCH/FS信道的循環譯碼
function d=T_FS_EX_DE(u)          %返回譯碼結果
% function [tag]=T_FS_EX_DE(u)    %返回標志位
%反重排和去尾比特
d2=zeros(1,53);
d2(1:2:49)=u(1:25);
d2(2:2:50)=u(185:-1:161);
d2(51:53)=1;
d2(54:56)=u(92:94); 
d(1:50)=d2(1:50);                 %譯碼結果d
d(51:2:181)=u(26:91);
d(52:2:182)=u(160:-1:95);
% % 截短循環譯碼                  %檢驗p(1),p(2),p(3)是否還原為0
% rold(1:3)=0;
% rnew(1:3)=0;
% for i=1:56
%    rnew(1)=mod(d2(i)+rold(3),2);
%    rnew(2)=mod(rold(1)+rold(3),2);
%    rnew(3)=rold(2);
%    rold=rnew;
%    
% end
% p1=rnew;
% if(p1==0)
%    tag=0;  %沒有錯誤
% else
%    tag=1;  %有錯誤
% end