askfsk仿真代码

这是基于MATLAB的关于ask,fsk的仿真代码

clear all
close all
i=10;
j=5000;
t=linspace（05j）;
fc=10;
fm=i/5;
B=2*fc;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%产生基带信号
a=round（rand（1i））;%随机序列
figure（2）
plot（rand（1i））
st=t;
for n=1:10
    if a（n）<1;
        for m=j/i*（n-1）+1:j/i*n
            st（m）=0;
        end
    else
        for m=j/i*（n-1）+1:j/i*n
            st（m）=1;
        end
    end
end
figure（1）;
subplot（421）;
plot（tst）;
axis（[05-12]）;
title（‘基带信号‘）;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%载波
s1=cos（2*pi*fc*t）;
subplot（422）;
plot（s1）;
title（‘载波信号‘）;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%调制
e_2ask=st.*s1;
subplot（423）;
plot（te_2ask）;
title（‘已调信号‘）;
noise =rand（1j）;
e_2ask=e_2ask+noise;%加入噪声
subplot（424）;
plot（te_2ask）;
title（‘加入噪声的信号‘）;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%相干解调
at=e_2ask.*cos（2*pi*fc*t）;
at=at-mean（at）;
subplot（425）;
plot（tat）;
title（‘相乘后信号‘）;
[faf] = T2F（tat）;%通过低通滤波器
[tat] = lpf（faf2*fm）;
subplot（426）;
plot（tat）;
title（‘解调后波形‘）;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%抽样判决
for m=0:i-1;
if at（1m*500+250）+0.5<0.5;
    for j=m*500+1:（m+1）*500;
        at（1j）=0;
    end
else
    for j=m*500+1:（m+1）*500;
        at（1j）=1;
    end
end
end
subplot（427）;
plot（tat）;
axis（[05-12]）;
title（‘抽样判决后波形‘）
        

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       1371  2008-07-10 21:29  调制解调（askpskfsk）仿真\ASK.m

     文件       2553  2008-07-10 16:00  调制解调（askpskfsk）仿真\DPSK.m

     文件        351  2008-07-04 15:07  调制解调（askpskfsk）仿真\F2T.m

     文件       1907  2008-07-10 15:11  调制解调（askpskfsk）仿真\FSK.m

     文件        451  2008-09-05 08:17  调制解调（askpskfsk）仿真\jd.m

     文件        469  2008-09-04 21:42  调制解调（askpskfsk）仿真\lpf.m

     文件       1618  2008-07-10 15:54  调制解调（askpskfsk）仿真\PSK.m

     文件        483  2008-07-04 15:07  调制解调（askpskfsk）仿真\T2F.m

     目录          0  2011-03-30 16:32  调制解调（askpskfsk）仿真

----------- ---------  ---------- -----  ----

                 9203                    9