将下列代码中的基带8-PSK更换为4-PSK：clear all nsymbol=10000; %每种信噪比下的发送符号数 T=1; %符号周期 fs=100; %每个符号的采样点数 ts=1/fs; %采样时间间隔 t=0:ts:T-ts; %时间向量 fc=10; %载波频率 c=sqrt(2/T)*exp(j*2*pi*fc*t); %载波信号 c1=sqrt(2/T)*cos(2*pi*fc*t); %同相载波 c2=-sqrt(2/T)*sin(2*pi*fc*t); %正交载波 M=8; %8-PSK graycode=[0 1 2 3 6 7 4 5]; %Gray编码规则 EsN0=0:15; %信噪比，Es/N0 snr1=10.^(EsN0/10); %信噪比转换为线性值 msg=randint(1,nsymbol,M); %消息数据 msg1=graycode(msg+1); %Gray映射 msgmod=pskmod(msg1,M).'; %基带8-PSK调制 tx=real(msgmod*c); %载波调制 tx1=reshape(tx.',1,length(msgmod)*length(c)); spow=norm(tx1).^2/nsymbol; %求每个符号的平均功率 for indx=1:length(EsN0) sigma=sqrt(spow/(2*snr1(indx))); %根据符号功率求噪声功率 rx=tx1+sigma*randn(1,length(tx1)); %加入高斯白噪声 rx1=reshape(rx,length(c),length(msgmod)); r1=(c1*rx1)/length(c1); %相关运算 r2=(c2*rx1)/length(c2); r=r1+j*r2; y=pskdemod(r,M); %PSK解调 decmsg=graycode(y+1); [err,ber(indx)]=biterr(msg,decmsg,log2(M)); %误比特率 [err,ser(indx)]=symerr(msg,decmsg); %误符号率 end ser1=2*qfunc(sqrt(2*snr1)*sin(pi/M)); %理论误符号率 ber1=1/log2(M)*ser1; %理论误比特率 semilogy(EsN0,ber,'-ko',EsN0,ser,'-k*',EsN0,ser1,EsN0,ber1,'-k.'); title('8-PSK载波调制信号在AWGN信道下的性能') xlabel('Es/N0');ylabel('误比特率和误符号率') legend('误比特率','误符号率','理论误符号率','理论误比特率')

将基带8-PSK更换为4-PSK，可以按照以下步骤修改代码：

1. 将变量M的值从8改为4，表示4-PSK调制。

2. 将graycode变量的值从[0 1 2 3 6 7 4 5]改为[0 1 3 2]，表示4-PSK的Gray编码规则。

3. 将msgmod变量的值从pskmod(msg1,M).'改为pskmod(msg1,M,'gray').'

4. 将相关运算r1和r2的计算方式从c1*rx1和c2*rx1改为c*conj(rx1)和c*imag(rx1)，分别表示对载波信号c进行共轭和虚部运算。

修改后的代码如下：

clear all
nsymbol=10000;         %每种信噪比下的发送符号数
T=1;                        %符号周期
fs=100;                     %每个符号的采样点数
ts=1/fs;                    %采样时间间隔
t=0:ts:T-ts;                %时间向量
fc=10;                      %载波频率
c=sqrt(2/T)*exp(j*2*pi*fc*t);   %载波信号
c1=sqrt(2/T)*cos(2*pi*fc*t);    %同相载波
c2=-sqrt(2/T)*sin(2*pi*fc*t);   %正交载波      
M=4;                              %4-PSK
graycode=[0 1 3 2];             %4-PSK Gray编码规则
EsN0=0:15;                         %信噪比，Es/N0
snr1=10.^(EsN0/10);                  %信噪比转换为线性值
msg=randint(1,nsymbol,M);            %消息数据
msg1=graycode(msg+1);               %Gray映射
msgmod=pskmod(msg1,M,'gray').';    %基带4-PSK调制
tx=real(msgmod*c);                    %载波调制
tx1=reshape(tx.',1,length(msgmod)*length(c));    
spow=norm(tx1).^2/nsymbol;              %求每个符号的平均功率
for indx=1:length(EsN0)
    sigma=sqrt(spow/(2*snr1(indx)));       %根据符号功率求噪声功率
    rx=tx1+sigma*randn(1,length(tx1));      %加入高斯白噪声
    rx1=reshape(rx,length(c),length(msgmod));      
    r=c*conj(rx1);                %相关运算
    y=pskdemod(r,M,'gray');                     %PSK解调
    decmsg=graycode(y+1);
    [err,ber(indx)]=biterr(msg,decmsg,log2(M));     %误比特率
    [err,ser(indx)]=symerr(msg,decmsg);            %误符号率
end
ser1=qfunc(sqrt(2*snr1)*sin(pi/M));             %理论误符号率
ber1=ser1/log2(M);                           %理论误比特率
semilogy(EsN0,ber,'-ko',EsN0,ser,'-k*',EsN0,ser1,'-k',EsN0,ber1,'-k.');
title('4-PSK载波调制信号在AWGN信道下的性能')
xlabel('Es/N0');ylabel('误比特率和误符号率')
legend('误比特率','误符号率','理论误符号率','理论误比特率')