rom.m

来自「GMSK 调制方式 通信专业学生通用 功能很强大」· M 代码 · 共 25 行

%%产生ROM表程序%%
b=[-1,-1,-1,-1,-1;-1,-1,-1,-1,1;-1,-1,-1,1,-1;-1,-1,-1,1,1;-1,-1,1,-1,-1;-1,-1,1,-1,1;-1,-1,1,1,-1;-1,-1,1,1,1;-1,1,-1,-1,-1;-1,1,-1,-1,1;-1,1,-1,1,-1;-1,1,-1,1,1;-1,1,1,-1,-1;-1,1,1,-1,1;-1,1,1,1,-1;-1,1,1,1,1;1,-1,-1,-1,-1;1,-1,-1,-1,1;1,-1,-1,1,-1;1,-1,-1,1,1;1,-1,1,-1,-1;1,-1,1,-1,1;1,-1,1,1,-1;1,-1,1,1,1;1,1,-1,-1,-1;1,1,-1,-1,1;1,1,-1,1,-1;1,1,-1,1,1;1,1,1,-1,-1;1,1,1,-1,1;1,1,1,1,-1;1,1,1,1,1;]
for l=1:4
    for n=1:32
        sum0=0;
        for jj=-2:1:2
            temp=faifai((jj-2)*T,0,jj,0.0000036923,0.3);
            sum0=sum0+b(n,jj+3)*temp;
        end
        fai0=sum0*pi+(l-1)*pi/2;
        for i=1:8
            t=T/8*i;
            sum0=0;
            for jj=-2:1:2
                sum0=sum0+b(n,jj+3)*faifai(0,t,jj,0.0000036923,0.3);
            end
      
            deta_fai=pi*sum0;
            fai(l,n,i)=fai0+deta_fai;
            sinfai(l,n,i)=sin(fai(l,n,i));
            cosfai(l,n,i)=cos(fai(l,n,i));
        end
    end
end