维特比软信息译码——高斯信道/瑞丽信道

%蒙特卡罗仿真（Rayleigh信道，软判决，2FSK）
%
Eb=2; ? ? %每比特的能量,能量越大，卷积译码的误码率越小
k=1;
G=[1 0 1;1 1 1];
input=[1 0 1 0 1 1 1 0];
dsource=cnv_encd(G,k,input);
N=length(dsource);
% n=size(G,1); ? ?%得到码字长度
% Ec=k*Eb/n; ? ? ?%得到码元能量
channel_output=zeros(1,2*N);

% FSK调制
Tb=1;
f1=1000/Tb;
f2=f1+1/Tb;
%f2=1500/Tb;
phi=pi/4;
NN=500;
t=0:Tb/(NN-1):Tb;
u1=cos(2*pi*f1*t); ? %若发送0，则已调信号为u1
u2=cos(2*pi*f2*t); ? %若发送1，则已调信号为u2

% 通过Rayleigh信道
chan = rayleighchan(1/1000,0)?

for j=1:N
? ? if(dsource(j)==0)
? ? ? ? r=cos(2*pi*f1*t+phi);
? ? ? ? y= filter(chan,r); ? ? %衰落
? ? else
? ? ? ? r=cos(2*pi*f2*t+phi);
? ? ? ? y= filter(chan,r); ? ? %衰落
? ? end;
? ? %计算相关输出
? ? ? ? ? ?v1=sin(2*pi*f1*t);
? ? ? ? ? ?v2=sin(2*pi*f2*t);
? ? ? ? ? ?r1c(1)=y(1)*u1(1);
? ? ? ? ? ?r1s(1)=y(1)*v1(1);
? ? ? ? ? ?r2c(1)=y(1)*u2(1);
? ? ? ? ? ?r2s(1)=y(1)*v2(1);
? ? ? ? ? ? ?for k=2:NN
? ? ? ? ? ? ? r1c(k)=r1c(k-1)+y(k)*u1(k);
? ? ? ? ? ? ? r1s(k)=r1s(k-1)+y(k)*v1(k);
? ? ? ? ? ? ? r2c(k)=r2c(k-1)+y(k)*u2(k);
? ? ? ? ? ? ? r2s(k)=r2s(k-1)+y(k)*v2(k);
? ? ? ? ? ? ?end;
? ? ?%判决变量?
? ? ?r1=r1c(NN)^2+r1s(NN)^2;
? ? ?r2=r2c(NN)^2+r2s(NN)^2;?
% ? ? ?if(abs(r1)>abs(r2)) ? ? ?%判决?
% ? ? ? ? ?res(j)=0;
% ? ? ?else
% ? ? ? ? ?res(j)=1;
% ? ? ?end;
? ? ?channel_output(1,2*j-1)=abs(r1);
? ? ?channel_output(1,2*j)=abs(r2); ? ? %输如到然判决译码器
end;
%软判决维特比译码
k=1;
[decoder_output,survivor_state,cumulated_metric]=soft_2FSK_viterbi(G,k,channel_output);
D33