qam8.asv

星座图QAM4.大家参考参考啊！有更好的请邮箱联系

clear all
QAM8=[ ];
for w=1:3;
    a=(-2+w)*(12*sqrt(2)-16)
    for r=1:2:2
        b=(-2+r)*(12*sqrt(2)-16)
        c=a+b*j
        QAM8=[QAM8,c]
    end
end
plot(QAM8,'*')
dB=8;
p=10^(dB/10);


NN=10000;
err=0;

for t=1:NN
    
    s=unidrnd(8);

    x=QAM8(s);
    h=1/2*randn(1,1)+sqrt(-1)*1/2*randn(1,1);
    w=1/2*randn(1,1)+sqrt(-1)*1/2*randn(1,1);
    
    y=p*h*x+w;
    
    dd=100;
    
    T=0;
    MM=100;
    for t=1:8
        z=QAM8(t);
        f=abs(y-p*h*z);
        if f<MM
            MM=f;
            T=t;
        else MM=MM;
            T=T;
        end
    end
    
    xx=QAM8(T);
   
    aa=abs(x-xx);
    if  aa == 0
        err=err;
    else err=err+1;
    end
    
end

pro_err=err/NN