function cp0602_symbol_error_probability

% --------------------------
% Step Zero - Initialization
% --------------------------

Eb_N0 = logspace(0.5,2);      % Range of Eb/N0: 5-20 dB


% -------------------------------------------------
% Step One - Evaluation of Symbol Error Probability
% -------------------------------------------------


    OOK=(1/2)*erfc(sqrt(Eb_N0/4));
    

% ---------------------------
% Step Two - Graphical Output
% ---------------------------

M_ary_BEP = [OOK']'  % Building a single matrix
                              %  for all vectors
F=figure(1);
set(F,'Position',[100 190 650 450]);
PT=semilogy(10*log10(Eb_N0),M_ary_BEP);
set(PT,'LineWidth',[1]);
hold on
L= legend('2-OOK');
set(L,'FontSize',10);
set(PT,'LineWidth',[1]);
X=xlabel('E_b/N_0');
set(X,'FontSize',12);
Y=ylabel('Pr_e');
set(Y,'FontSize',12);
AX=gca;
set(AX,'FontSize',12);
axis([5 20 1e-6 1e-1]);
set(AX,'XTick', [5 7.5 10 12.5 15 17.5 20 ]);