pi4dqpsk_rx.m

《Wireless Communications and Networking》（《无线通信和网络》）配套MATLAB源码。该书涵盖了第一、二、和三代蜂窝通信系统从物理层到网络层的关键特性。

function [a] = pi4dqpsk_rx(Rn, N)
%receiver
   temp(1) = Rn(1);
   for k= 1:N/2-1
      temp(k+1) = Rn(k+1)*conj(Rn(k));
   end
   for k = 1:N/2
      if (imag(temp(k))< 0)
         a(2*k-1) = 1;
      else
         a(2*k-1) = 0;
      end
      if (real(temp(k))<0)
         a(2*k) = 1;
      else
         a(2*k) = 0;
      end
   end
return;