%Comparación sistema basico y sistema OFDM sin pc ambos QPSK en canal ideal clear all; N=64; u0=0.8; v_canal_mult=[1 0 0 0 0 1/exp(1) 0 0 0 0 1/exp(2)]; v_EbNo_dB=[0:15]; v_ber_qpsk_basico=[]; v_ber_qpsk_pc=[]; v_ber_qpsk_pc_alea=[]; 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_mult); 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 con PC n_max_sim=100; for n_EbNo_dB=v_EbNo_dB [n_ber]= sist_ofdm(n_EbNo_dB,u0,N,n_max_sim,n_mod_tipo,v_canal_mult); v_ber_qpsk_pc=[v_ber_qpsk_pc n_ber] end semilogy(v_EbNo_dB,v_ber_qpsk_pc,'Color','b') %n_mod_tipo=2 MODULACION QPSK OFDM con PC con aleatorizador n_max_sim=100; for n_EbNo_dB=v_EbNo_dB [n_ber]= sist_ofdm_alea(n_EbNo_dB,u0,N,n_max_sim,n_mod_tipo,v_canal_mult); v_ber_qpsk_pc_alea=[v_ber_qpsk_pc_alea n_ber] end semilogy(v_EbNo_dB,v_ber_qpsk_pc_alea,'Color','r') legend ('sistema basico','sistema OFDM sin alea', 'sistema OFDM con alea','Location','SouthWest')