hedgewars/GSHandlers.inc
changeset 8990 e64a1a851b69
parent 8987 47cf32305d99
child 8992 5b0be812dcdb
equal deleted inserted replaced
8989:ae97ab6dcc70 8990:e64a1a851b69
  3272         doStepHedgehogMoving(HHGear);
  3272         doStepHedgehogMoving(HHGear);
  3273 
  3273 
  3274     if // (Gear^.Health = 0)
  3274     if // (Gear^.Health = 0)
  3275         (HHGear^.Damage <> 0)
  3275         (HHGear^.Damage <> 0)
  3276         //or CheckGearDrowning(HHGear)
  3276         //or CheckGearDrowning(HHGear)
  3277         or (cWaterLine + 512 < hwRound(HHGear^.Y))
  3277         or (cWaterLine + cVisibleWater * 4 < hwRound(HHGear^.Y))
  3278         or (TurnTimeLeft = 0)
  3278         or (TurnTimeLeft = 0)
  3279         // allow brief ground touches - to be fair on this, might need another counter
  3279         // allow brief ground touches - to be fair on this, might need another counter
  3280         or (((GameTicks and $1FF) = 0) and (not HHGear^.dY.isNegative) and (TestCollisionYwithGear(HHGear, 1) <> 0))
  3280         or (((GameTicks and $1FF) = 0) and (not HHGear^.dY.isNegative) and (TestCollisionYwithGear(HHGear, 1) <> 0))
  3281         or ((Gear^.Message and gmAttack) <> 0) then
  3281         or ((Gear^.Message and gmAttack) <> 0) then
  3282             begin
  3282             begin