X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_window.pas;h=5f372f36526ca64b58316537104a2d05095f5bdc;hb=5472594f32e33da0c66606ec9eebc8f798ef6b54;hp=29f79e480c403d6e6779e61f2a87f72a71fed84d;hpb=ac201b02f10ef558087d50f6b03b4519ab567558;p=d2df-sdl.git diff --git a/src/game/g_window.pas b/src/game/g_window.pas index 29f79e4..5f372f3 100644 --- a/src/game/g_window.pas +++ b/src/game/g_window.pas @@ -1,3 +1,18 @@ +(* Copyright (C) DooM 2D:Forever Developers + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + *) {$MODE DELPHI} unit g_window; @@ -44,8 +59,10 @@ var wLoadingProgress: Boolean = False; wLoadingQuit: Boolean = False; {wWinPause: Byte = 0;} +{$IFNDEF WINDOWS} ticksOverflow: Int64 = -1; lastTicks: Uint32 = 0; // to detect overflow +{$ENDIF} const // TODO: move this to a separate file @@ -551,11 +568,11 @@ begin if wNeedTimeReset then begin - Time_Delta := (27777 div 1000); + Time_Delta := 28{(27777 div 1000)}; wNeedTimeReset := False; end; - t := Time_Delta div (27777 div 1000); + t := Time_Delta div 28{(27777 div 1000)}; if t > 0 then begin flag := True; @@ -587,7 +604,7 @@ begin // Âðåìÿ ïðåäûäóùåãî îáíîâëåíèÿ: if flag then begin - Time_Old := Time - (Time_Delta mod (27777 div 1000)); + Time_Old := Time - (Time_Delta mod 28{(27777 div 1000)}); if (not wMinimized) then begin Draw();