BPSK,qpsk.16-qam 64-qam 32-qam BER v/s SNR Simulation for AWGN channel and

sir ple send me BPSK,qpsk.16-qam 64-qam 32-qam BER v/s SNR Simulation for AWGN channel and

wimax 802.16e physical layer BPSK,qpsk.16-qam 64-qam 32-qam BER v/s SNR Simulation for AWGN channel and releiying noise

Answer 1

[zekarias mulugeta]

clc

clear

echo on

Ts =1;

fc = 1;

M = 4;

Eb = 1;

p = 0.5;

A = sqrt((3*Eb*Logtwo(M))/(2*(M-1)));

a(1,1) = -1;

a(2,1) = 1;

a(3,1) = -1;

a(4,1) = 1;

b(1,1) = -1;

b(2,1) = -1;

b(3,1) = 1;

b(4,1) = 1;

%% Plot the signals

Plotsignals(A, Ts, fc, a, b)

%% To plot the QAM signal constellation diagram

pause

close

PlotSignalSpace(M, Eb, Ts, A, fc, a, b)

for i = 1:1:M

Constellation(i).hor = quadl('xhsi', 0,Ts, [], [], i, A, Ts, fc, a, b);

Constellation(i).ver = quadl('xvsi', 0,Ts, [], [], i, A, Ts, fc, a, b);

end

%% To plot simulation results.

pause

close

j = 0;

N = 10000;

for SNR = 0 : 6

j = j + 1;

xSNR(j) = SNR;

[probSymbol, probBits] = DCS(N, SNR, Eb, p, Constellation, M);

yProbSymbol(j) = probSymbol;

yProbBits(j) = probBits;

yTheory(j) = PsQAM(M, SNR, Eb);

yBPSK(j) = alpha(SNR, 1);

end

semilogy(xSNR, yProbSymbol, 'bo', xSNR, yTheory, '-rx', xSNR, yProbBits, 'ks', xSNR, yBPSK, '-m');

legend('Simulation: Symbol', 'Theory: Symbol', 'Simulation: Binary Digit', 'Theory: Binary Digit');

xlabel('SNR(dB)')

ylabel('Probability of error')

grid on

%% Press any key to plot the performance of QAM

pause

close

PlotQAM