Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/HHHandlers.inc
changeset 3407 dcc129c4352e
parent 3402 b1fbf50da522
child 3415 1ca22b3493e9 
--- a/hedgewars/HHHandlers.inc	Sun May 02 20:30:23 2010 +0000
+++ b/hedgewars/HHHandlers.inc	Sun May 02 22:00:50 2010 +0000
@@ -304,7 +304,7 @@
         
         if (Ammo^[CurSlot, CurAmmo].NumPerTurn >= MultiShootAttacks) then
             begin
-            s:= inttostr(Ammo^[CurSlot, CurAmmo].NumPerTurn + 1 - MultiShootAttacks);
+            s:= inttostr(Ammo^[CurSlot, CurAmmo].NumPerTurn - MultiShootAttacks + 1);
             AddCaption(format(trmsg[sidRemaining], s), cWhiteColor, capgrpAmmostate);
             end;
         
@@ -454,7 +454,7 @@
         with Ammo^[CurSlot, CurAmmo] do
           begin
           if (Gear^.Message and gm_Left  ) <> 0 then
-             Pos:= (Pos + Ammoz[AmmoType].PosCount - 1) mod Ammoz[AmmoType].PosCount
+             Pos:= (Pos - 1 + Ammoz[AmmoType].PosCount) mod Ammoz[AmmoType].PosCount
           else
           if (Gear^.Message and gm_Right ) <> 0 then
              Pos:= (Pos + 1) mod Ammoz[AmmoType].PosCount
hedgewars