author | Wuzzy <Wuzzy2@mail.ru> |
Sat, 29 Jun 2019 22:52:14 +0200 | |
changeset 15225 | f55c1c895797 |
parent 15224 | 26b4e864b341 |
child 15226 | 8705ee93f8b3 |
--- a/hedgewars/uGearsHandlersMess.pas Sat Jun 29 22:03:44 2019 +0200 +++ b/hedgewars/uGearsHandlersMess.pas Sat Jun 29 22:52:14 2019 +0200 @@ -1123,11 +1123,14 @@ end; procedure doStepBee(Gear: PGear); +var wrapped: boolean; begin AllInactive := false; Gear^.X := Gear^.X + Gear^.dX; Gear^.Y := Gear^.Y + Gear^.dY; - WorldWrap(Gear); + wrapped:= WorldWrap(Gear); + if wrapped then + HomingWrap(Gear); Gear^.dY := Gear^.dY + cGravity; CheckGearDrowning(Gear); CheckCollision(Gear);