# HG changeset patch # User unc0rr # Date 1525295261 -7200 # Node ID a79c1206bacdcf07af9cf8c6ada7746b1baac22d # Parent 030b085b182f4289917387adc0b20eef472b536e Call GetNext twice as many times to distribute seed across the whole buffer even for single byte seeds diff -r 030b085b182f -r a79c1206bacd hedgewars/uRandom.pas --- a/hedgewars/uRandom.pas Wed May 02 15:29:21 2018 -0400 +++ b/hedgewars/uRandom.pas Wed May 02 23:07:41 2018 +0200 @@ -79,7 +79,7 @@ for i:= t to 54 do cirbuf[i]:= $A98765 + 68; // odd number -for i:= 0 to 1023 do +for i:= 0 to 2047 do GetNext; end;