equal
deleted
inserted
replaced
4617 if Gear^.Health <> JETPACK_FUEL_INFINITE then |
4617 if Gear^.Health <> JETPACK_FUEL_INFINITE then |
4618 Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], ansistring(inttostr(i))), cWhiteColor, fntSmall) |
4618 Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], ansistring(inttostr(i))), cWhiteColor, fntSmall) |
4619 end; |
4619 end; |
4620 |
4620 |
4621 if (HHGear^.Message and (gmAttack or gmUp or gmLeft or gmRight) <> 0) and |
4621 if (HHGear^.Message and (gmAttack or gmUp or gmLeft or gmRight) <> 0) and |
4622 (HHGear^.Message and gmPrecise = 0) then |
4622 (HHGear^.Message and gmPrecise = 0) and |
|
4623 ((Gear^.State and gsttmpFlag) <> 0) then |
|
4624 begin |
4623 Gear^.State := Gear^.State and (not gsttmpFlag); |
4625 Gear^.State := Gear^.State and (not gsttmpFlag); |
|
4626 HHGear^.dX := Gear^.dX; |
|
4627 end; |
4624 |
4628 |
4625 if HHGear^.Message and gmPrecise = 0 then |
4629 if HHGear^.Message and gmPrecise = 0 then |
4626 HHGear^.Message := HHGear^.Message and (not (gmUp or gmLeft or gmRight)); |
4630 HHGear^.Message := HHGear^.Message and (not (gmUp or gmLeft or gmRight)); |
4627 HHGear^.State := HHGear^.State or gstMoving; |
4631 HHGear^.State := HHGear^.State or gstMoving; |
4628 |
4632 |
4680 Message := Message and (not (gmAttack or gmUp or gmPrecise or gmLeft or gmRight)); |
4684 Message := Message and (not (gmAttack or gmUp or gmPrecise or gmLeft or gmRight)); |
4681 |
4685 |
4682 if (dY < _0_1) and (dY > -_0_1) then |
4686 if (dY < _0_1) and (dY > -_0_1) then |
4683 begin |
4687 begin |
4684 Gear^.State := Gear^.State or gsttmpFlag; |
4688 Gear^.State := Gear^.State or gsttmpFlag; |
4685 dY := dY - _0_2 |
4689 dY := dY - _0_2; |
|
4690 Gear^.dX:= dX; |
4686 end |
4691 end |
4687 end |
4692 end |
4688 end; |
4693 end; |
4689 |
4694 |
4690 //////////////////////////////////////////////////////////////////////////////// |
4695 //////////////////////////////////////////////////////////////////////////////// |