two2four.m

16QAM的MATLAB调制解调仿真

function[y,yn]=two2four(x,m);
%
%BBI 2000
if nargin<2;m=32;end;
if nargin<1;x=[1 0 1 0 1 0 0 1 1 1 0 1 0 0 0 0 1 1];end
T=[0 1 ;2 3 ];n=length(x);ii=1;
for i=1:2:n-1;
  xi=x(i:i+1)+1;yn(ii)=T(xi(1),xi(2));ii=ii+1;
end;
yn=yn-1.5;y=yn;
for i=1:m-1 ; y=[y;yn] ;end ; y=y(:)';
%
if nargout<1;
subplot(211);plot(pulse(x));v=axis;axis([v(1:2) -.5 1.5]);
subplot(212);plot(y);v=axis;axis([v(1:2) -2 2]);
end;
end;