ss_mlsrs.asv

gold序列产生的源程序

function [seq]=ss_mlsrs(connections);
%[seq]=ss_mlsrs(connetions)
%SS_MLSRS generates the maximal length shift-register sequence when the
%shift-register connections are given as input to the function.A"zero" 
%means not connected.whereas a "one" represents a connection.
m=length(connections);
L=2^m-1; %length of the shift register sequence requested
registers=[zeros(1,m-1) 1]; %initial register contents
seq(1)=registers(m);%first element of the sequence
for i=2:L,
    new_reg_cont(1)=connections(1)*seq(i-1);
    for j=2:m,
        new_reg_cont(j)=registers(j-1)+connections(j)*seq(i-1);
    end;
    registers=new_reg_cont;%current register contents
    seq(i)=registers(m);%the next element of the sequence
end;