matlab有偿编程Matlab仿真经过瑞利信道的2FSK制式信号的调制与解调源代码程序.pdfVIP

下载本文档

81
0
约2.72千字
约 3页
2019-05-27 发布于辽宁
举报
版权申诉

matlab有偿编程Matlab仿真经过瑞利信道的2FSK制式信号的调制与解调源代码程序.pdf

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%功能：2FSK 调制解调，在瑞利信道下的误码率的情况 %%%程序步骤：产生随机序列-产生瑞利信道-调制-记忆信道特征 %%% -信号通过信道-相位补偿-加高斯噪声-解调 %%% -计算仿真误比特率-计算理论误比特率 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% clc clear all close all; %============随机信号===========% M = 2; N = 10000; %数据长度 x = randint(N,1,M); % 随机序列 %==========参数初始化===========% Fs = 1000; Nsamp = 10; Freq_seq = 10; %FSK 调制的频率间隔 Fdops = 50; %最大多普勒频移50Hz Ts = 1/Fs; %=============调制=============% y = fskmod(x,M,Freq_seq,Nsamp,Fs); %=============瑞利信道=========% chan = rayleighchan(Ts,Fdops); chan.StoreHistory = true; %记忆信道特征 chan.ResetBeforeFiltering = 1; ychan = filter(chan,y); ychan = ychan.*exp(-1*j*angle(chan.PathGains)); %相位补偿 SNR = 0 : 2 : 30; %信噪比的范围 %==============解调============% for k = 1 : length(SNR) r = awgn(ychan,SNR(k),measured); % 加入高斯白噪声 yout = fskdemod(r,M,Freq_seq,Nsamp,Fs); % 解调 %======计算误码比特率========% [nErrors, BER(k)] = biterr(x(2:end),yout(2:end)); end %===============作图===================% t = 1 : 100; n = 1 : 500; figure(1) subplot(311) stem(t,x(1:100),bx); set(gca,Ylim,[0 1.4]); xlabel( Time ),ylabel( Amplitude ) title(二进制随机信号),grid on subplot(312) plot(n,y(1:500),r*); set(gca,Ylim,[-0.6 1.4]); xlabel( Time ),ylabel( Amplitude ) title(2FSK 已调信号),grid on subplot(313) plot(n,ychan(1:500) ,bx); set(gca,Ylim,[-0.6 1.4]); xlabel( Time ),ylabel( Amplitude ) title(经过瑞利信道后的信号),grid on figure(2) subplot(211) stem(t,yout(1:100),b-x) xlabel( Time ),ylabel( Amplitude ) title(2FSK 解调信号),grid on subplot(212) stem(t,yout(1:100),b-x) hold on stem(t,x(1:100),r-o); legend(2FSK 解调信号,原始随机序列) xlabel( Time ),ylabel( Amplitude ) title(2FSK 解调后的信号与原随机序列对比),grid on figure(3) %计算理论误比特率 BERtheory1 = berfading(SNR,fsk,2,1, coherent); % 相干检测 BERtheory2 = berfading(SNR,fsk,2,1, noncoherent); % 非相干检测 semilogy(SNR,BERtheory1,g-x,SNR,BER,r-*,SNR,BERtheory2,b-o);