欢迎来到天天文库
浏览记录
ID:20840682
大小:115.91 KB
页数:3页
时间:2018-10-17
《【matlab编程代做】8QAM通过AWGNchannel后的误码率.pdf》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、%***********SIMULATIONOF8QAMthroughaAWGNchannel************%%Writer:XiaochenWANG%******************************************************************clc;clear;closeall;%%parameterN=1000;M=8;j=1i;sym8QAM=[22+2j2-2j2j-2j-2+2j-2-2j-2];F=1e2;Fs=2e3;%%sendbitbitstream=binornd(1,0.5,log2
2、(M),N);symbolstream=zeros(1,N);%%8QAMmapperforn1=1:Npack=bitstream(:,n1).';ifpack==[000]symbolstream(n1)=2;elseifpack==[001]symbolstream(n1)=2+2j;elseifpack==[010]symbolstream(n1)=2-2j;elseifpack==[011]symbolstream(n1)=2j;elseifpack==[100]symbolstream(n1)=-2j;elseifpack==[101]sym
3、bolstream(n1)=-2+2j;elseifpack==[110]symbolstream(n1)=-2-2j;elsesymbolstream(n1)=-2;endendscatterplot(symbolstream);%%carriersampledots=round(Fs/F);I=cos(2*pi*F/Fs*[1:N*(sampledots)]);Q=sin(2*pi*F/Fs*[1:N*(sampledots)]);sig=sqrt(2)*(I+1i*Q);symbolstream4=repmat(symbolstream,sampl
4、edots,1);symbolstream4=reshape(symbolstream4,1,numel(symbolstream4));send=symbolstream4.*sig;%%PSDfigure;plot(10*log10(abs(fftshift(fft(send,1024)))));%%AWGNRECVnn=1;forsnr=1:.01:10recv=awgn(send,snr);recvsym=recv.*(I-1i*Q);ifsnr==9scatterplot(recvsym);endrecvsymdp=recvsym(1:samp
5、ledots:end);rbit=zeros(log2(M),N);forn2=1:Ndis=abs(recvsymdp(n2)-sym8QAM);mindis=max(dis);fork=0:7ifdis(k+1)=1);rbit(2,n2)=(mod(mindisk,4)/2>=1);rbit(3,n2)=mod(mindisk,2);enderr1=xor(rbit,bitstream);err=sum(sum(err1));e
6、rrs(nn)=snr;errp(nn)=err/N;nn=nn+1;endfigure;plot(errs,log10(errp))
此文档下载收益归作者所有