send.m

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

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             % 完成不同输入类型文件的读入

i=1;
 for i=1:length(Code)              % 码变换 —— 将0,1变换为双极性1,-1
        if Code(i)==1
            pol_Code(i)=-1;
        else 
            pol_Code(i)=1;
        end
%         i=i+1;
    end
% 串并转换
cb_chunks=reshape(pol_Code,[64,256]);


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

num_chunks=64;
% 执行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;