hedgewars/uAmmos.pas
changeset 8999 b5f0fb670b38
parent 8992 5b0be812dcdb
child 9004 901ee9a8a3b4
equal deleted inserted replaced
8998:d38fb4158342 8999:b5f0fb670b38
   277                 begin
   277                 begin
   278                 PackAmmo(Ammo, Ammoz[AmmoType].Slot);
   278                 PackAmmo(Ammo, Ammoz[AmmoType].Slot);
   279                 //SwitchNotHeldAmmo(Hedgehog);
   279                 //SwitchNotHeldAmmo(Hedgehog);
   280                 if CurAmmoType = amKnife then LoadHedgehogHat(Hedgehog, Hedgehog.Hat);
   280                 if CurAmmoType = amKnife then LoadHedgehogHat(Hedgehog, Hedgehog.Hat);
   281                 if CurAmmoGear <> nil then 
   281                 if CurAmmoGear <> nil then 
   282                     SetWeapon(CurAmmoGear^.AmmoType)
   282                     CurAmmoType:= CurAmmoGear^.AmmoType
   283                 else CurAmmoType:= amNothing;
   283                 else CurAmmoType:= amNothing;
   284                 end
   284                 end
   285             end
   285             end
   286     end;
   286     end;
   287 end;
   287 end;