cp0203_ofdm_qpsk1.m

用ofdm方法产生超宽带uwb信号

function [bits,S,SI,SQ,Stx,fc,fp,T0,TP,TG,N]=cp0203_OFDM_qpsk
tc=T0/N;
ntcp=floor(TP/tc);
n=(-ntcp+1:1:N);
nT=length(n);
[bits]=cp0201_bits(numbits);
[S,Sc,Ss]=cp0203_qpsk_mod(bits);
nb=ceil(length(S)/N);%OFDM block
S0=zeros(2,nb*N);
S0(1:length(S))=S;%zero padding
dt=1.0/fc;
if ntcp>0
    tc=(T0+TP)/NT;
end
tonesamples=floor(tc/dt);
toneres=floor((TG-TP)/dt;
symsamp=(tonesamples*NT)+toneres;
totsamp=symsamp+nb;
X=[zeros(1,totsamp)'];
for b=1:nb
    c=S0((1+(b-1)*N):(N+(b-1)*N));
    A=length(c);
    a1=floor(A/2);
    a2=A-a1;
    FS=2*A;
    Czp=zeros(FS,1);
    Czp(1:a1)-[c(1:a1).'];
    Czp(FS-a2+1:FS)=[c(A-a2+1:A).'];
    C=ifft(Czp);
    
    if ntcp>0
        C1=zeros(length(C)+2*ntcp,1);
        C1(1: