interleave.m

该文件夹为空时块码－卷积码级联系统的仿真程序

function permute=interleave(code,s)
% s=Ncpc/2
% Ncbps: Interleaver block size

Ncbps=length(code);
permute=zeros(1,Ncbps);
k=0:1:Ncbps-1;
% Step 1
m=(Ncbps/16)*mod(k,16)+floor(k/16);

% Step 2
j=s*floor(m/s)+mod(m+Ncbps-floor(16*m/Ncbps),s);
permute(j+1)=code;