Name: Anonymous 2013-01-26 3:43
my shiny new PRNG ^^ wtcha think /prog/?
function [dataout, dataKey] = genIIsched(numBytes)
dataKey = keyBlock();
Xorn = xornBuilder;
for(iter = 1:3)
dataKey = keySched(dataKey);
jarS(iter,:) = dataKey(9,:);
endfor;
expVec(1:256) = 1;
dataout(1:ceil(numBytes/65536)*65536) = int16(0);
for (iter = 0:ceil(numBytes/65536)-1)
dataKey = keySched(dataKey);
bA = dataKey(9,:);
dataKey = keySched(dataKey);
bB = dataKey(9,:);
blockA = bA(expVec, :);
blockB = bB(expVec, :)';
dataout(iter*65536+1:(iter+1)*65536) = jarS(3, Xorn( (jarS(1,blockA(:)) .- 1) .* 256 .+ jarS(2,blockB(:)) ));
endfor;
endfunction;