equal
deleted
inserted
replaced
410 CurAmmoGear^.Message:= gm_Destroy; |
410 CurAmmoGear^.Message:= gm_Destroy; |
411 exit |
411 exit |
412 end |
412 end |
413 else |
413 else |
414 begin |
414 begin |
415 if not (hwRound(Gear^.Y) < cWaterLine) then |
415 if (hwRound(Gear^.Y) >= cWaterLine) then |
416 begin |
416 begin |
417 t:= max(Gear^.Damage, Gear^.Health); |
417 t:= max(Gear^.Damage, Gear^.Health); |
418 Gear^.Damage:= t; |
418 Gear^.Damage:= t; |
419 AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtHealthTag, t, _0, _0, 0)^.Hedgehog:= Gear^.Hedgehog; |
419 AddGear(hwRound(Gear^.X), min(hwRound(Gear^.Y),cWaterLine+cVisibleWater+32), gtHealthTag, t, _0, _0, 0)^.Hedgehog:= Gear^.Hedgehog; |
420 uStats.HedgehogDamaged(Gear) |
420 uStats.HedgehogDamaged(Gear) |
421 end; |
421 end; |
422 |
422 |
423 team:= PHedgehog(Gear^.Hedgehog)^.Team; |
423 team:= PHedgehog(Gear^.Hedgehog)^.Team; |
424 if CurrentHedgehog^.Gear = Gear then |
424 if CurrentHedgehog^.Gear = Gear then |