mqam.m

matlab code for OFDM

% Mapping de Gray sur constellation 16QAM
%----------------------------------------

function s = MQAM(word)

% g閚閞ation de la constellation 16-QAM
qam = [-3+3*i -1+3*i 1+3*i 3+3*i...
       -3+i -1+i 1+i 3+i...
       -3-i -1-i 1-i 3-i...
       -3-3*i -1-3*i 1-3*i 3-3*i];

codeint = [3 2 0 1 7 6 4 5 15 14 12 13 11 10 8 9];

% mapping :
% conversion du mot re鐄 binaire en entier
valint = 0;
for k=1:length(word)
    valint = valint + word(k)*2^(length(word)-k);
end

% recherche de l'index de l'entier parmi les 閠iquettes
index = find(codeint == valint);

% attribution du symbole correspondant
s = qam(index);