tfsk.asv

来自「Agilent N5182A信号源自己产生psk fsk ofdm等信号的mat」· ASV 代码 · 共 27 行

% NN=randsrc(1,50,[0 1 ]);   
% NN=randsrc(1,40,[0 1 2 3 ]);  
NN=randsrc(1,40,[0 1 2 3 4 5 6 7]);        %随机码元 
[B,A]=size(NN);
M=8;                                        %进制数
DIS=2000;                                   %频差
N=600;                                      %每个码元采样点数
fs=960000;                                   %采样频率
R=fs/N;                                     %码元速率
display '码元速率';
R
Y=FSKMOD(NN,M,DIS,N,fs);

r=fft(Y)/(N*length(NN));
r=fftshift(r); 
f=linspace(-fs/2,fs/2,N*length(NN));
plot(f,20*log10(abs(r))); 
axis([-fs/2,fs/2,-100,20]);                  %频谱图

waveform=change(real(Y),imag(Y),N*length(NN));%变换格式
filename2 = 'C:\Temp\Fsk';
[FID, message] = fopen(filename2,'w');       % Open a file to write data
if FID == -1 error('Cannot Open File'); end
fwrite(FID,waveform,'unsigned short');       % write to the file
fclose(FID);