X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_options.pas;h=79da12ec4439c1e57f490e504481e15ce2bf730a;hb=refs%2Fheads%2Fmaster;hp=23bb91b30ed9ae2b1aaf091ba2d48f369c8f0e66;hpb=e1f115c17f5d486849c6c113ca0ea19e3eb2a2cc;p=d2df-sdl.git

diff --git a/src/game/g_options.pas b/src/game/g_options.pas
index 23bb91b..79da12e 100644
--- a/src/game/g_options.pas
+++ b/src/game/g_options.pas
@@ -18,7 +18,7 @@ unit g_options;
 interface
 
 uses
-  g_language, g_weapons, utils;
+  g_language, g_game, g_weapons, utils;
 
 function GenPlayerName (n: Integer): String;
 
@@ -71,12 +71,12 @@ var
   gsScoreLimit: Word;
   gsMaxLives: Byte;
   gsPlayers: Byte;
-  gsGameFlags: LongWord;
+  gsGameFlags: TGameOptions;
   gsSpawnInvul: Integer = 0;
   gsItemRespawnTime: Word = 60;
   gsItemRespawnRandom: Word = 0;
-  gsRulezRespawnTime: Word = 60;
-  gsRulezRespawnRandom: Word = 0;
+  gsPowerupRespawnTime: Word = 60;
+  gsPowerupRespawnRandom: Word = 0;
   gsWarmupTime: Word = 30;
 
 implementation
@@ -87,7 +87,7 @@ uses
     SDL2,
   {$ENDIF}
   e_log, e_input, g_console, g_window, g_sound, g_gfx, g_player, Math,
-  g_map, g_net, g_netmaster, SysUtils, CONFIG, g_game, g_main, e_texture,
+  g_map, g_net, g_netmaster, SysUtils, CONFIG, g_main, e_texture,
   g_items, wadreader, e_graphics, g_touch, envvars, g_system;
 
   var
@@ -271,12 +271,11 @@ begin
   gsSpawnInvul := 0;
   gsItemRespawnTime := 60;
   gsItemRespawnRandom := 0;
-  gsRulezRespawnTime := 60;
-  gsRulezRespawnRandom := 0;
-  gsGameFlags := GAME_OPTION_ALLOWEXIT or GAME_OPTION_DMKEYS or
-    GAME_OPTION_BOTVSPLAYER or GAME_OPTION_BOTVSMONSTER or
-    GAME_OPTION_TEAMHITTRACE or GAME_OPTION_TEAMHITPROJECTILE or
-    GAME_OPTION_ALLOWDROPFLAG;
+  gsPowerupRespawnTime := 60;
+  gsPowerupRespawnRandom := 0;
+  gsGameFlags := [TGameOption.ALLOW_EXIT, TGameOption.DM_KEYS, TGameOption.BOTS_VS_PLAYERS,
+    TGameOption.BOTS_VS_MONSTERS, TGameOption.TEAM_HIT_TRACE, TGameOption.TEAM_HIT_PROJECTILE,
+    TGameOption.ALLOW_DROP_FLAG];
   gsPlayers := 1;
 
   if not gGameOn then
@@ -322,8 +321,8 @@ begin
     SpawnInvul := gsSpawnInvul;
     ItemRespawnTime := gsItemRespawnTime;
     ItemRespawnRandom := gsItemRespawnRandom;
-    RulezRespawnTime := gsRulezRespawnTime;
-    RulezRespawnRandom := gsRulezRespawnRandom;
+    PowerupRespawnTime := gsPowerupRespawnTime;
+    PowerupRespawnRandom := gsPowerupRespawnRandom;
     WarmupTime := gsWarmupTime;
     Options := gsGameFlags;
   end;