hedgewars/CCHandlers.inc
changeset 3943 9835060e5c01
parent 3935 5ca27a0e9a63
child 3968 b73bf885e127
--- a/hedgewars/CCHandlers.inc	Sun Oct 10 17:13:20 2010 +0200
+++ b/hedgewars/CCHandlers.inc	Sun Oct 10 12:08:16 2010 -0400
@@ -162,6 +162,11 @@
     TryDo(Gear^.Health > 0, 'Invalid hedgehog health', true);
     PHedgehog(Gear^.Hedgehog)^.Team:= CurrentTeam;
     if (GameFlags and gfSharedAmmo) <> 0 then CurrentHedgehog^.AmmoStore:= Clan^.ClanIndex
+    else if (GameFlags and gfPerHogAmmo) <> 0 then
+        begin
+        AddAmmoStore;
+        CurrentHedgehog^.AmmoStore:= StoreCnt - 1
+        end
     else CurrentHedgehog^.AmmoStore:= TeamsCount - 1;
     CurrentHedgehog^.Gear:= Gear;
     CurrentHedgehog^.Name:= id;