hedgewars/HHHandlers.inc
changeset 3037 ab6e949eb5cb
parent 3003 0afdba08a858
child 3065 4afa5e3e27e4
equal deleted inserted replaced
3036:c6ba6531cb4b 3037:ab6e949eb5cb
   239 begin
   239 begin
   240 with CurrentHedgehog^.Gear^,
   240 with CurrentHedgehog^.Gear^,
   241         CurrentHedgehog^ do
   241         CurrentHedgehog^ do
   242     begin
   242     begin
   243     State:= State and not gstAttacking;
   243     State:= State and not gstAttacking;
   244     if ((Ammo^[CurSlot, CurAmmo].Propz) and ammoprop_Utility) = 0 then
   244     if ((Ammo^[CurSlot, CurAmmo].Propz) and ammoprop_Effect) = 0 then
   245         begin
   245         begin
   246         Inc(MultiShootAttacks);
   246         Inc(MultiShootAttacks);
   247         
   247         
   248         if (Ammo^[CurSlot, CurAmmo].NumPerTurn >= MultiShootAttacks) then
   248         if (Ammo^[CurSlot, CurAmmo].NumPerTurn >= MultiShootAttacks) then
   249             begin
   249             begin