--- a/hedgewars/uScript.pas Thu Oct 04 21:17:21 2018 +0200
+++ b/hedgewars/uScript.pas Thu Oct 04 23:29:20 2018 +0200
@@ -3565,6 +3565,7 @@
var mybuf: PChar;
i: LongInt;
begin
+ SetRandomSeed(cSeed,true);
mybuf := physfsReader(L, f, sz);
if (mybuf <> nil) and ((sz^) > 0) then
begin