hedgewars/uWorld.pas
changeset 2361 f980f40e83f5
parent 2360 d4d545da9dbe
child 2372 f3e7a066c2b8
--- a/hedgewars/uWorld.pas	Wed Sep 09 01:55:37 2009 +0000
+++ b/hedgewars/uWorld.pas	Wed Sep 09 02:41:17 2009 +0000
@@ -123,7 +123,7 @@
 	dec(y, 33);
 	DrawSprite(sprAMSlotName, x, y, 0);
 	for i:= cMaxSlotIndex downto 0 do
-		if (Ammo^[i, 0].Count > 0) then
+		if ((i = 0) and (Ammo^[i, 1].Count > 0)) or ((i <> 0) and (Ammo^[i, 0].Count > 0)) then
 			begin
 			if (cScreenHeight - CursorPoint.Y >= y - 33) and (cScreenHeight - CursorPoint.Y < y) then Slot:= i;
 			dec(y, 33);