equal
deleted
inserted
replaced
263 with Hedgehog, CurWeapon^ do |
263 with Hedgehog, CurWeapon^ do |
264 if (Count = 0) or (AmmoType = amNothing) then |
264 if (Count = 0) or (AmmoType = amNothing) then |
265 begin |
265 begin |
266 PackAmmo(Ammo, Ammoz[AmmoType].Slot); |
266 PackAmmo(Ammo, Ammoz[AmmoType].Slot); |
267 CurAmmoType:= amNothing |
267 CurAmmoType:= amNothing |
268 end |
268 end; |
|
269 if Hedgehog.BotLevel <> 0 then |
|
270 Hedgehog.Gear^.AIHints := Hedgehog.Gear^.AIHints or aihAmmosChanged; |
269 end; |
271 end; |
270 |
272 |
271 procedure PackAmmo(Ammo: PHHAmmo; Slot: LongInt); |
273 procedure PackAmmo(Ammo: PHHAmmo; Slot: LongInt); |
272 var ami: LongInt; |
274 var ami: LongInt; |
273 b: boolean; |
275 b: boolean; |