%---------------------------------------------------------------------
% Degradation due to near far problem with two users and CDMA
%---------------------------------------------------------------------

EbNodB = [0 3 5 10];
EbNo   = 10 .^(EbNodB/10);

N = 32;
K = 2;
RelPow = [0.1 0.2 0.5 1.0 2.0 5.0 10.0 20.0 50.0 100.0];
A(1)   = 1;
Temp = [ 10*log10(RelPow')] 
for k=1:length(EbNo)
    SNR = EbNo(k);
    for i=1:length(RelPow)
        A(2) = RelPow(i);
        MAImult = sum(A(2:end))/ A(1) / (K-1);
        Deg(i) = 1 + (K-1)/N*SNR * MAImult;
    end
    plot(10*log10(RelPow'), 10*log10(Deg)); hold on
    Temp = [Temp 10*log10(Deg')]
end

hold off
grid
xlabel('A2/A1 (dB)')
ylabel('Degradation (dB)')