diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index b0e9e01feb36fd0bf5cbfb7e46c6c67b5134d917..0231bc8c5858249a2d24586d2772aacd879cb359 100644 (file)
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
p.Obj.lerp(gLerpFactor, fX, fY);
px := fX + PLAYER_RECT_CX;
- py := fY + PLAYER_RECT_CY+p.Obj.slopeUpLeft;
+ py := fY + PLAYER_RECT_CY+nlerp(p.SlopeOld, p.Obj.slopeUpLeft, gLerpFactor);
if (g_dbg_scale = 1.0) and (not g_dbg_ignore_bounds) then
begin
procedure SystemCommands(P: SSArray);
var
cmd: string;
+ a: Integer;
begin
cmd := LowerCase(P[0]);
case cmd of
e_LogWriteln('resolution not changed');
sys_EnableVSync(gVSync);
end;
+ 'r_maxfps':
+ begin
+ if Length(p) = 2 then
+ begin
+ gMaxFPS := StrToIntDef(p[1], gMaxFPS);
+ if gMaxFPS > 0 then
+ gFrameTime := 1000 div gMaxFPS
+ else
+ gFrameTime := 0;
+ end;
+ e_LogWritefln('r_maxfps %d', [gMaxFPS]);
+ end;
'g_language':
begin
if Length(p) = 2 then