semilla = 675248 for i = 1 to 5 print i, ": ", Random() next i end sub Random() semilla = floor(mod(((semilla*semilla)/1e3), 1e6)) return int(semilla) end sub