hedgewars/uGears.pas
changeset 7426 55b49cc1f33a
parent 7412 9e5aa3c8dc62
child 7477 26706bf32ecf
--- a/hedgewars/uGears.pas	Tue Jul 24 18:53:42 2012 -0400
+++ b/hedgewars/uGears.pas	Wed Jul 25 10:56:14 2012 -0400
@@ -211,7 +211,7 @@
         RemoveGearFromList(curHandledGear);
         // since I can't think of any good reason this would ever be separate from a remove from list, going to keep it inside this block
         if curHandledGear^.Message and gmAddToList <> 0 then InsertGearToList(curHandledGear);
-        curHandledGear^.Message:= curHandledGear^.Message and not (gmRemoveFromList or gmAddToList)
+        curHandledGear^.Message:= curHandledGear^.Message and (not (gmRemoveFromList or gmAddToList))
         end;
     if curHandledGear^.Active then
         begin
@@ -634,8 +634,7 @@
 
 if (GameFlags and gfArtillery) <> 0 then
     cArtillery:= true;
-
-for i:= 0 to GetRandom(10)+30 do
+for i:= GetRandom(10)+30 downto 0 do
     begin                                                                                                                                       rx:= GetRandom(rightX-leftX)+leftX;
     ry:= GetRandom(LAND_HEIGHT-topY)+topY;
     rdx:= _90-(GetRandomf*_360);