equal
deleted
inserted
replaced
2614 SetLittle(dX); |
2614 SetLittle(dX); |
2615 dY := _0; |
2615 dY := _0; |
2616 State := State or gstMoving; |
2616 State := State or gstMoving; |
2617 end; |
2617 end; |
2618 DeleteGear(Gear); |
2618 DeleteGear(Gear); |
|
2619 if (GetAmmoEntry(HHGear^.Hedgehog^, TAmmoType(amParachute))^.Count >= 1) and (HHGear^.Hedgehog^.CurAmmoType <> amParachute) then |
|
2620 SetWeapon(amParachute); |
2619 isCursorVisible := false; |
2621 isCursorVisible := false; |
2620 ApplyAmmoChanges(HHGear^.Hedgehog^); |
2622 ApplyAmmoChanges(HHGear^.Hedgehog^); |
2621 exit |
2623 exit |
2622 end; |
2624 end; |
2623 |
2625 |
4015 Message := 0; |
4017 Message := 0; |
4016 Active := true; |
4018 Active := true; |
4017 State := State or gstMoving |
4019 State := State or gstMoving |
4018 end; |
4020 end; |
4019 DeleteGear(Gear); |
4021 DeleteGear(Gear); |
|
4022 if (GetAmmoEntry(HHGear^.Hedgehog^, TAmmoType(amJetpack))^.Count >= 1) and (HHGear^.Hedgehog^.CurAmmoType <> amJetpack) then |
|
4023 SetWeapon(amJetpack); |
4020 isCursorVisible := false; |
4024 isCursorVisible := false; |
4021 ApplyAmmoChanges(HHGear^.Hedgehog^); |
4025 ApplyAmmoChanges(HHGear^.Hedgehog^); |
4022 // if Gear^.Tex <> nil then FreeTexture(Gear^.Tex); |
4026 // if Gear^.Tex <> nil then FreeTexture(Gear^.Tex); |
4023 |
4027 |
4024 // Gear^.Tex:= RenderStringTex(trmsg[sidFuel] + ': ' + inttostr(round(Gear^.Health / 20)) + '%', cWhiteColor, fntSmall) |
4028 // Gear^.Tex:= RenderStringTex(trmsg[sidFuel] + ': ' + inttostr(round(Gear^.Health / 20)) + '%', cWhiteColor, fntSmall) |