# HG changeset patch
# User nemo
# Date 1345650162 14400
# Node ID f415b3e0f3b96c91ef7e7bc01577c1fc652ae1b7
# Parent  364cd923db43c569b5ddfdaec686df9101625c1d
Burn a random number in the override.  Make sure cirbuf is reset.

diff -r 364cd923db43 -r f415b3e0f3b9 hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Tue Aug 21 21:46:05 2012 -0400
+++ b/hedgewars/uGears.pas	Wed Aug 22 11:42:42 2012 -0400
@@ -641,7 +641,8 @@
 if (GameFlags and gfArtillery) <> 0 then
     cArtillery:= true;
 for i:= GetRandom(10)+30 downto 0 do
-    begin                                                                                                                                       rx:= GetRandom(rightX-leftX)+leftX;
+    begin
+    rx:= GetRandom(rightX-leftX)+leftX;
     ry:= GetRandom(LAND_HEIGHT-topY)+topY;
     rdx:= _90-(GetRandomf*_360);
     rdy:= _90-(GetRandomf*_360);
diff -r 364cd923db43 -r f415b3e0f3b9 hedgewars/uLand.pas
--- a/hedgewars/uLand.pas	Tue Aug 21 21:46:05 2012 -0400
+++ b/hedgewars/uLand.pas	Wed Aug 22 11:42:42 2012 -0400
@@ -285,7 +285,10 @@
         4: SelectTemplate:= CavernTemplates[getrandom(Succ(High(CavernTemplates)))];
         5: SelectTemplate:= WackyTemplates[getrandom(Succ(High(WackyTemplates)))];
 // For lua only!
-        6: SelectTemplate:= min(max(LuaTemplateNumber,0),High(EdgeTemplates));
+        6: begin
+           SelectTemplate:= min(max(LuaTemplateNumber,0),High(EdgeTemplates));
+           GetRandom(2) // burn 1
+           end;
     end;
 
     WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter));
diff -r 364cd923db43 -r f415b3e0f3b9 hedgewars/uRandom.pas
--- a/hedgewars/uRandom.pas	Tue Aug 21 21:46:05 2012 -0400
+++ b/hedgewars/uRandom.pas	Wed Aug 22 11:42:42 2012 -0400
@@ -65,7 +65,7 @@
 procedure SetRandomSeed(Seed: shortstring);
 var i: Longword;
 begin
-n:= 54;
+initModule;
 
 if Length(Seed) > 54 then
     Seed:= copy(Seed, 1, 54); // not 55 to ensure we have odd numbers in cirbuf