qpsk.m

来自「QPSK调制仿真程序」· M 代码 · 共 43 行

43 行

From: <由 Microsoft Internet Explorer 5 保存>
Subject: 
Date: Tue, 6 Jan 2009 20:01:36 +0800
MIME-Version: 1.0
Content-Type: text/html;
	charset="gb2312"
Content-Transfer-Encoding: 7bit
Content-Location: http://www.mathworks.com/matlabcentral/fx_files/18406/1/quad.m
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2900.5726" name=GENERATOR></HEAD>
<BODY><PRE>f=1000000;
len=length(b);
t=0:1/999:1;
qcar=[];icar=[];  %initialize in-phase and quadrature carriers
ic=[];qc=[];   %initialize in-phase and quadrature components;
for n=1:2:len
    if b(n)==0 &amp; b(n+1)==0;
    temp=-1/sqrt(2)*ones(1,1000); 
    temp1=-1/sqrt(2)*ones(1,1000);
    elseif b(n)==0 &amp; b(n+1)==1;
    temp=-1/sqrt(2)*ones(1,1000);
    temp1=1/sqrt(2)*ones(1,1000);
    elseif b(n)==1 &amp; b(n+1)==0;
    temp=1/sqrt(2)*ones(1,1000);
    temp1=-1/sqrt(2)*ones(1,1000);
    elseif b(n)==1 &amp; b(n+1)==1;
    temp=1/sqrt(2)*ones(1,1000);
    temp1=1/sqrt(2)*ones(1,1000);
end
i=cos(2*pi*f*t);
q=sin(2*pi*f*t);
ic=[ic temp];
qc=[qc temp1];
icar=[icar i];
qcar=[qcar q];
end
qpsk=ic.*icar+qc.*qcar
plot(qpsk);</PRE></BODY></HTML>

qpsk.m - 源码说明

本页面展示了「QPSK调制仿真程序」中的 qpsk.m 源码文件，采用 M 编程语言编写，共 43 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与QPSK相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?