dq5commonrng

while true do
	seed1 = (memory.readbyte(0x7E075B)+4)
	seed2 = memory.readbyte(0x7E075C)
	count = memory.readbyte(0x7E075D)
	offset = 0xFF

	for j = 1, 5 do

	offset = 0xFF

	for i = 1, 8 do

	resist = seed2
	resist = bit.bxor(resist, offset)
	carry = math.floor(seed1 * 2 / 256)
	seed1 = seed1 * 2 % 256
	seed2 = (seed2 * 2) % 256 + carry
	offset = offset * 2 % 256
	resist = resist * 2
	if resist > 255 then
		seed1 = bit.bxor(seed1, 0x21)
		seed2 = bit.bxor(seed2, 0x10)
	end
	end

	offset = 0xFF

	for i = 1, 8 do

	resist = seed2
	resist = bit.bxor(resist, offset)
	carry = math.floor(seed1 * 2 / 256)
	seed1 = seed1 * 2 % 256
	seed2 = (seed2 * 2) % 256 + carry
	offset = offset * 2 % 256
	resist = resist * 2
	if resist > 255 then
		seed1 = bit.bxor(seed1, 0x21)
		seed2 = bit.bxor(seed2, 0x10)
	end
	end

	count = count + 1

	gui.text(10,10*(j+4),((seed1+1)%256).." "..seed2.." "..((seed1+1+count)%256))

	if j == 3 then
		seed3 = seed1
		seed4 = seed2
		count2 = count
	end

	end

	seed3 = seed3 + 2

	for j = 1, 5 do

	offset = 0xFF

	for i = 1, 8 do

	resist = seed4
	resist = bit.bxor(resist, offset)
	carry = math.floor(seed3 * 2 / 256)
	seed3 = seed3 * 2 % 256
	seed4 = (seed4 * 2) % 256 + carry
	offset = offset * 2 % 256
	resist = resist * 2
	if resist > 255 then
		seed3 = bit.bxor(seed3, 0x21)
		seed4 = bit.bxor(seed4, 0x10)
	end
	end

	offset = 0xFF

	for i = 1, 8 do

	resist = seed4
	resist = bit.bxor(resist, offset)
	carry = math.floor(seed3 * 2 / 256)
	seed3 = seed3 * 2 % 256
	seed4 = (seed4 * 2) % 256 + carry
	offset = offset * 2 % 256
	resist = resist * 2
	if resist > 255 then
		seed3 = bit.bxor(seed3, 0x21)
		seed4 = bit.bxor(seed4, 0x10)
	end
	end

	count2 = count2 + 1

	gui.text(10,10*(j+10),((seed3+1)%256).." "..seed4.." "..((seed3+1+count2)%256))

	end
	gui.text(10,30,memory.readbyte(0x7E075B).." "..memory.readbyte(0x7E075C).." "..((memory.readbyte(0x7E075B)+memory.readbyte(0x7E075D))%256).." "..memory.readbyte(0x7E075D))

	emu.frameadvance()
end