gen_m_seq.m

跳频图案是跳频通信成功的基础

function [seq] = gen_m_seq(connections);
%*****************************************
% connections:反馈系数
% 寄存器初始化为[0......0 1]
%*****************************************
m = length(connections);
%码长
L = 2^m-1;
%寄存器初始化[0......0 1]
registers = [zeros(1,m-1) 1];
%序列初始化
seq = zeros(1,L);
seq(1) = registers(m);
%找connections中不为零的系数
index = find(connections == 1);
for i = 2:L
    %异或
    M = 0;
    for k = 1:length(index);
        M = xor(registers(index(k)),M);
    end;
    %移位
    registers = [M,registers(1:m-1)];
    %输出
    seq(i) = registers(m);
end