tchfs_zihuan.m

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

echo off
close all
clear all

%桢个数
N=10;
%信息序列
signal=round(rand(1,N*260));
%编码
for n=0:(N-1)
	%外编码
	ex_en_sig(1:267)=T_FS_EX_EN(signal([1:260]+n*260));
	%内编码
   neibian_sig(1:456)=neibianma(ex_en_sig);
   %交织前合成
   C([1:456]+n*456)=neibian_sig;
end;
%交织
u=jiaozhi(C);
%反交织
D=fanjiaozhi(u);
%解码
for n=0:(N-1)
	%分离桢
   temp_sig=D([1:456]+n*456);
   %内编码解码
	neiyi_sig=neiyima(temp_sig);
	%外编码解码
   [ex_de_sig,flag]=T_FS_EX_DE(neiyi_sig);
   %桢合成
   new_sig([1:260]+n*260)=ex_de_sig;
end;

if(length(find(new_sig~=signal))==0)
   display "good!"
else
   display "error!"
end