equal
deleted
inserted
replaced
3683 HHGear^.Message := HHGear^.Message and (not (gmUp or gmPrecise or gmLeft or gmRight)); |
3683 HHGear^.Message := HHGear^.Message and (not (gmUp or gmPrecise or gmLeft or gmRight)); |
3684 HHGear^.State := HHGear^.State or gstMoving; |
3684 HHGear^.State := HHGear^.State or gstMoving; |
3685 |
3685 |
3686 Gear^.X := HHGear^.X; |
3686 Gear^.X := HHGear^.X; |
3687 Gear^.Y := HHGear^.Y; |
3687 Gear^.Y := HHGear^.Y; |
3688 // For some reason I need to reapply followgear here, something else grabs it otherwise. |
|
3689 // This is probably not needed anymore |
|
3690 if not CurrentTeam^.ExtDriven then |
|
3691 FollowGear := HHGear; |
|
3692 |
3688 |
3693 if not isUnderWater and hasBorder and ((HHGear^.X < _0) |
3689 if not isUnderWater and hasBorder and ((HHGear^.X < _0) |
3694 or (hwRound(HHGear^.X) > LAND_WIDTH)) then |
3690 or (hwRound(HHGear^.X) > LAND_WIDTH)) then |
3695 HHGear^.dY.isNegative:= false; |
3691 HHGear^.dY.isNegative:= false; |
3696 |
3692 |