X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_window.pas;h=6491048c5f94e6406461aea3bdc99c8403fa4671;hb=a4da798da0df5a8d54bdfe1d9563e1b254b697e7;hp=002e51aa92284fa9db8cdaf39da94dcc8174dc71;hpb=dbf81afaefeb52e53d2b8af3a782277229c5adaa;p=d2df-sdl.git diff --git a/src/game/g_window.pas b/src/game/g_window.pas index 002e51a..6491048 100644 --- a/src/game/g_window.pas +++ b/src/game/g_window.pas @@ -55,8 +55,6 @@ var flag: Boolean; wNeedTimeReset: Boolean = false; wMinimized: Boolean = false; - wMaximized: Boolean = false; - wLoadingProgress: Boolean = false; wLoadingQuit: Boolean = false; procedure ResetTimer (); @@ -70,27 +68,13 @@ var {$ENDIF} procedure ProcessLoading (forceUpdate: Boolean=false); -var {$IFNDEF HEADLESS} -// ev: TSDL_Event; +var stt: UInt64; {$ENDIF} begin -// FillChar(ev, sizeof(ev), 0); - wLoadingProgress := true; - -// while (SDL_PollEvent(@ev) > 0) do -// begin -// EventHandler(ev); -// if (ev.type_ = SDL_QUITEV) then break; -// end; - //e_PollJoysticks(); - -// if (ev.type_ = SDL_QUITEV) or (gExit = EXIT_QUIT) then -// begin -// wLoadingProgress := false; -// exit; -// end; + if sys_HandleInput() = True then + Exit; {$IFNDEF HEADLESS} if not wMinimized then @@ -124,8 +108,6 @@ begin begin if (NetMode = NET_CLIENT) and (NetState <> NET_STATE_AUTH) then g_Net_Client_UpdateWhileLoading(); end; - - wLoadingProgress := false; end; @@ -246,9 +228,6 @@ end; function SDLMain (): Integer; var idx: Integer; - {$IF not DEFINED(HEADLESS)} - ltmp: Integer; - {$ENDIF} arg: AnsiString; mdfo: TStream; {$IFDEF ENABLE_HOLMES} @@ -343,14 +322,20 @@ begin end; end; +{$IFNDEF USE_SYSSTUB} PrintGLSupportedExtensions; glLegacyNPOT := GLExtensionSupported('GL_ARB_texture_non_power_of_two') or GLExtensionSupported('GL_OES_texture_npot'); +{$ELSE} + glLegacyNPOT := False; +{$ENDIF} e_logWritefln('NPOT textures: %s', [glLegacyNPOT]); gwin_dump_extensions := false; Init; Time_Old := sys_GetTicks(); + g_Net_InitLowLevel(); + // Êîìàíäíàÿ ñòðîêà if (ParamCount > 0) then g_Game_Process_Params(); @@ -365,6 +350,8 @@ begin while not ProcessMessage() do begin end; Release(); + + g_Net_DeinitLowLevel(); result := 0; end;