clear 
clc
N=320;
SNR=5;
p_noise=1/(10^(SNR/10));
Rin=1;Rmid=2;Rout=3;
while 1 %選擇模式
   mode=input(' Please choose 16APSK / 32APSK (0/1): default 0  ');
   if isempty(mode) 
       mode = 0;
   end
   if  mode==1|| mode==0 break;
   end
end
if mode==0
    index=4;
else index=5;
end
source = rand(1,N*index)>.5;  %rand值大于0.5產(chǎn)生1，小于0.5產(chǎn)生0
[mod_in_out,p_noise]=APSK_mod_in(source,index,p_noise,Rin,Rmid,Rout);
channel_out=APSK_channel(mod_in_out,p_noise);
result=APSK_mod_de(channel_out,index,Rin,Rmid,Rout);
e=error_rate(result,source);
source,mod_in_out,channel_out,result,e