GSM的仿真源码,比较详细,分为模块和全信道两部分

				%交织度为8的交织
				function u=INTER_WEAVE_8(d,flag)
				if nargin==1
				   flag=1;
				end
				N=length(d)/456;
				C=reshape(d,456,N);
				C=C';
				u=zeros(4*N+4,114);
				for n=1:N
					for k=0:455
				   	b=mod(k,8)+4*(n-1);
				   	j=2*mod(49*k,57)+floor(mod(k,8)/4);
				      u(b+1,j+1)=C(n,k+1);
				   end
				end
				u=reshape(u',1,4*114*(N+1));