
% Descrambler
%
% Deshace la Pseudoaleatorización de los datos para evitar largas
% secuencias de "0" o "1".
%
function [ds] = desaleatorizador(s)
x=0;
y=0;
z=0;
l=length(s);
for n = 1:l,
a=xor(y,z);
ds(n)=xor(s(n),a);
z=y;
y=x;
x=s(n);
end