equal
deleted
inserted
replaced
6328 begin |
6328 begin |
6329 if HH^.Gear <> nil then |
6329 if HH^.Gear <> nil then |
6330 begin |
6330 begin |
6331 if (HH^.Gear^.Damage <> 0) or (HH^.Gear^.Health = 0) or |
6331 if (HH^.Gear^.Damage <> 0) or (HH^.Gear^.Health = 0) or |
6332 ((HH^.Gear^.State and (gstMoving or gstHHDeath or gstHHGone or gstDrowning)) <> 0) then |
6332 ((HH^.Gear^.State and (gstMoving or gstHHDeath or gstHHGone or gstDrowning)) <> 0) then |
|
6333 begin |
6333 Gear^.Tag:= 1; |
6334 Gear^.Tag:= 1; |
|
6335 HH^.Gear^.State:= HH^.Gear^.State and (not gstAttacking); |
|
6336 HH^.Gear^.Message:= HH^.Gear^.Message and (not gmAttack); |
|
6337 AfterAttack; |
|
6338 end; |
6334 end |
6339 end |
6335 else if HH^.GearHidden = nil then |
6340 else if HH^.GearHidden = nil then |
6336 Gear^.Tag:= 1; |
6341 Gear^.Tag:= 1; |
6337 if (Gear^.Tag = 1) and (Gear = CurAmmoGear) then |
6342 if (Gear^.Tag = 1) and (Gear = CurAmmoGear) then |
6338 CurAmmoGear:= nil; |
6343 CurAmmoGear:= nil; |