apsk_opring.m

实现了高斯噪声下APSK的BER仿真

%Apsk星座设计2个环，16-APSK（4+12-APSK）
%此程序与文献 （非线性卫星信道中APSK信号星座优化设计研究 ）符合
L=2;
n1=4;
n2=12;
%rou为相对的半径
rou=[1:0.1:5];
%限制条件
r1=2./sqrt(1+3*rou.^2);
for iii=1:length(rou)

    r2(iii)=rou(iii)*r1(iii)
end

%计算每个环上的最小距离
dring1=2*r1*sin(pi/n1);
dring2=2*r2*sin(pi/n2);
%两个环的初始相位偏移
sit1=pi/n1;
sit2=pi/n2;
k=[0:1:n2-1];
kk=[0:1:n1-1];
fai=zeros(1,n2*n1);
%开始搜索所有的相位差
for i=1:n1

    for ii=1:n2
       fai(n2*(i-1)+ii)=abs((sit2-sit1)+(2*pi*((ii-1)/12-(i-1)/4)));  
   end
end
%求最小的相位差
faimin=min(fai);
%1 2 环之间的最小欧式距离
for iiii=1:length(rou)

    dring12(iiii)=sqrt(r1(iiii)^2+r2(iiii)^2-2*r1(iiii)*r2(iiii)*cos(faimin));
end

for di=1:length(rou)
    A=[dring1(di),dring2(di),dring12(di)];
    dmin(di)=min(A);
end

plot(rou,dmin,'-*');
%[gg,hh]=ginput(1);