%--------------------------------------------------------------------------   
%   這是一個腳本，
%   作用是畫出 OOK,PPM,DPP 誤碼率比較圖
%   Create a figure
%   To compare the erro of DPPM,PPM and OOK
%--------------------------------------------------------------------------

disp('16-DPPM   16-PPM    OOK')
disp('隨機序列長度    N=1024')
disp('信噪比         0-16 dB')
disp('計算中...')
%
N=1024;
%N=2048;
%
input_seq=randseq(N);
%

i=1;           
for SNR=0:0.2:16
    x(i)=SNR;
    erro_dppm(i)=code_erro(input_seq,SNR,'dppm');
    erro_ppm(i)=code_erro(input_seq,SNR,'ppm');
    erro_ook(i)=code_erro(input_seq,SNR,'ook');
    i=i+1;
end

% create a figure

figure('Name','DPPM、PPM和OOK的誤碼率比較','NumberTitle','off')
xlabel('SNR  信噪比 (dB)')
ylabel('Error 誤碼率 ')
title('DPPM,PPM和OOK判決信噪比--誤碼率')
axis([0 16 0 0.6])

hold all

% DPPM

plot(x,erro_dppm,':*')

% PPM

plot(x,erro_ppm,':d')

% OOK

plot(x,erro_ook,':v')

%
disp('計算中結束。')
%
% end