
%Comparación sistema basico y sistema OFDM sin pc ambos QPSK en canal ideal

clear all; 

N=64;
u0=1;
v_canal_ideal=[1];
v_EbNo_dB=[0:15];
v_ber_qpsk_basico=[];
v_ber_qpsk_sinpc=[];
n_mod_tipo=2;

%n_mod_tipo=2, MODULACION qpsk DE SISTEMA BÁSICO
n_max_sim=10000;
for n_EbNo_dB=v_EbNo_dB
    [n_ber]= sist_basico(n_EbNo_dB,n_max_sim,n_mod_tipo,v_canal_ideal);
    v_ber_qpsk_basico=[v_ber_qpsk_basico n_ber]
end
semilogy(v_EbNo_dB,v_ber_qpsk_basico,'Color','g')
xlabel('S/N (dB)')
ylabel('BER')
title('Comparación sistema básico y sistema OFDM sin pc en canal ideal')
hold on

%n_mod_tipo=2 MODULACION QPSK OFDM sin PC
n_max_sim=400;
for n_EbNo_dB=v_EbNo_dB
    [n_ber]= sist_ofdm(n_EbNo_dB,u0,N,n_max_sim,n_mod_tipo,v_canal_ideal);
    v_ber_qpsk_sinpc=[v_ber_qpsk_sinpc n_ber]
end
semilogy(v_EbNo_dB,v_ber_qpsk_sinpc,'Color','b')

legend ('sistema basico','sistema OFDM sin pc')

