Florian Kaltenberger
6c11825d2e
git-svn-id: http://svn.eurecom.fr/openair4G/trunk@4603 818b1a75-f10b-46b9-bf7c-635c3b92a50f
29 lines
775 B
Matlab
29 lines
775 B
Matlab
% Author: Mirsad Cirkic
|
|
% Organisation: Eurecom (and Linkoping University)
|
|
% E-mail: mirsad.cirkic@liu.se
|
|
|
|
|
|
function [carrierdata, s]=genrandpskseq(N,M,amp)
|
|
|
|
if(mod(N,640)~=0)
|
|
error('The sequence length must be divisible with 640.');
|
|
end
|
|
s = zeros(N,1);
|
|
MPSK=exp(sqrt(-1)*([1:M]*2*pi/M+pi/M));
|
|
|
|
% OFDM sequence with 512 FFT using randomly
|
|
% generated 4-QAM and 128 cyclic prefix
|
|
carrierdata=zeros(120,301);
|
|
for i=0:(N/640-1)
|
|
datablock=MPSK(ceil(rand(301,1)*M));
|
|
for j=1:301
|
|
carrierdata(i+1,j)=datablock(j);
|
|
end
|
|
fblock=[0 datablock(1:150) zeros(1,210) datablock(151:301)];
|
|
ifblock=ifft(fblock,512)*sqrt(512);;
|
|
% Adding cycl. prefix making the block of 640 elements
|
|
block = [ifblock(end-127:end) ifblock];
|
|
s([1:640]+i*640)=floor(amp*block);
|
|
end
|
|
|
|
end |