send.asv

来自「Abstract：Noise frequency modulation(FM)j」· ASV 代码 · 共 48 行

function send()

% 初始化设置
fft_size = 256;
%数值越大表明采样点越多，线条越平滑
num_carriers = 64; %子载波数应当<= fft_size/4

% input_typt = filetype;  %输入文件类型

% 发送端
disp('传送');
fid=fopen('pcode.bin');            % 串码长度为409200个 
Code=fread(fid);
Code=Code(1:64*256);
% read             % 完成不同输入类型文件的读入

% 串并转换
cb_chunks=reshape(Code,[64,256]);
num_chunks=64;

data_in_pol=bin2
% 调制
for i=1:64
    len = length(cb_chunks);  % Number of symbols
    M=16;                     % Size of alphabet
    msg = cb_chunks(i,:);
    txpsk = pskmod(msg,M);
end


% 执行ifft来产生输入数据的时域波形
td_sets = zeros(num_chunks,fft_size);
for j =1:num_chunks
     td_sets(j,1:fft_size) = real(ifft(txpsk(j,1:fft_size)));
end


% 并串转换
bc_chunks = reshape(td_sets,[1,64*256]);

save td_sets td_sets;
save bc_chunks bc_chunks;
phasenoise = randn(len,1)*.015;
rxpsk = txpsk.*exp(j*2*pi*phasenoise);
scatterplot(rxpsk)