4197         Message := Message and (not (gmAttack or gmUp or gmPrecise or gmLeft or gmRight));

  4197         Message := Message and (not (gmAttack or gmUp or gmPrecise or gmLeft or gmRight));

  4198 

  4198 

  4199         if (dY < _0_1) and (dY > -_0_1) then

  4199         if (dY < _0_1) and (dY > -_0_1) then

  4200             begin

  4200             begin

  4201             Gear^.State := Gear^.State or gsttmpFlag;

  4201             Gear^.State := Gear^.State or gsttmpFlag;

  4202             dY := dY - _0_2

  4203             dY := dY - _0_2

  4203             end

  4204             end

  4204         end

  4205         end

  4205 end;

  4206 end;

  4206 

  4207