diff -r 1aba77b2e4ac -r 076d00110223 hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Wed Nov 29 20:35:56 2017 -0500
+++ b/hedgewars/uScript.pas	Wed Nov 29 20:38:26 2017 -0500
@@ -3059,7 +3059,7 @@
 var mybuf: PChar;
     i: LongInt;
 begin
-    SetRandomSeed(cSeed,false);
+    SetRandomSeed(cSeed,true);
     mybuf := physfsReader(L, f, sz);
     if (mybuf <> nil) and ((sz^) > 0) then
         begin