设调信号为载波的中心频率为1000Hz试写出SSB信号的滤波法调制与相干法解调的MATLAB仿真程序；

滤波法调制：

% 信号参数
fs = 8000; % 采样频率
fc = 1000; % 载波频率
fm = 200; % 调制信号频率
t = 0:1/fs:1; % 时间序列

% 调制信号
x = sin(2*pi*fm*t);

% 载波信号
c = cos(2*pi*fc*t);

% 上变频
ssb = x.*c;

% 滤波
[b,a] = butter(6,0.1); % 低通滤波器
ssb_filtered = filter(b,a,ssb);

% 画图
figure;
subplot(3,1,1);
plot(t,x);
title('调制信号');
subplot(3,1,2);
plot(t,c);
title('载波信号');
subplot(3,1,3);
plot(t,ssb_filtered);
title('SSB信号');

相干法解调：

% 信号参数
fs = 8000; % 采样频率
fc = 1000; % 载波频率
fm = 200; % 调制信号频率
t = 0:1/fs:1; % 时间序列

% 调制信号
x = sin(2*pi*fm*t);

% 载波信号
c = cos(2*pi*fc*t);

% 上变频
ssb = x.*c;

% 下变频
ssb_down = ssb .* cos(2*pi*fc*t);

% 滤波
[b,a] = butter(6,0.1); % 低通滤波器
ssb_filtered = filter(b,a,ssb_down);

% 画图
figure;
subplot(3,1,1);
plot(t,x);
title('调制信号');
subplot(3,1,2);
plot(t,c);
title('载波信号');
subplot(3,1,3);
plot(t,ssb_filtered);
title('解调后的信号');