BPSK_Sim.m

%SANJEET KUMAR
%M.Tech(Telecommunication) 
%NIT Calicut

snr1=0:1:10;
snr2=0:0.1:10;
r=zeros(1,length(snr1));
for i=1:length(snr1)
r(i)=r(i)+proberr(snr1(i)); % simulated error rate
end;
d=zeros(1,length(snr2));
for i=1:length(snr2),
SNR=exp(snr2(i)*log(10)/10);
d(i)=d(i)+qfunc(sqrt(2*SNR)); % theoretical error rate.
end;
figure;
semilogy(snr1,r,'r*'); % estimation probability of error
hold
semilogy(snr2,d); % Theoretical probability of error
title('Binary antipodal communication system');
xlabel('SNR in dB');
ylabel('prob. of error');