gusucode.com > matlab通信工程仿真源码（张德丰等编著）程序书籍 > matlab_code/matlab通信工程仿真源码（张德丰等编著）/第8章/fftseq.m

    function [M,m,df]=fftseq(m,tz,df)
fz=1/tz;              %采样频率
if nargin==2          %判断输入参数的个数是否符合要求
    n1=0;
else
    n1=fz/df;         %根据参数个数决定是否使用频率缩放
end
n2=length(m);
n=2^(max(nextpow2(n1),nextpow2(n2)));%以(max(nextpow2(n1),nextpow2(n2)))比特传递信道
M=fft(m,n);         %进行离散傅里叶变换
m=[m,zeros(1,n-n2)];
df=fz/n;