diff --git a/src/game/g_options.pas b/src/game/g_options.pas
index 5caaf40f9520fe1659381f53515e480b10f11934..623c10a5bb8c11b797914a9457529b2d51eede6e 100644 (file)
--- a/src/game/g_options.pas
+++ b/src/game/g_options.pas
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*)
-{$MODE DELPHI}
+{$INCLUDE ../shared/a_modes.inc}
unit g_options;
interface
uses
- g_language;
+ g_language, g_weapons;
type
TPlayerControl = record
KeyPrevWeapon: Word;
KeyOpen: Word;
KeyStrafe: Word;
- KeyWeapon: array [0..9] of Word;
+ KeyWeapon: array [WP_FIRST..WP_LAST] of Word;
KeyRight2: Word;
KeyLeft2: Word;
KeyPrevWeapon2: Word;
KeyOpen2: Word;
KeyStrafe2: Word;
- KeyWeapon2: array [0..9] of Word;
+ KeyWeapon2: array [WP_FIRST..WP_LAST] of Word;
end;
TGameControls = record
procedure g_Options_Write_Net_Server(FileName: String);
procedure g_Options_Write_Net_Client(FileName: String);
+const DF_Default_Megawad_Start = 'megawads/DOOM2D.WAD:\MAP01';
+
var
gGameControls: TControls;
gScreenWidth: Word = 800;
gsSDLBufferSize: Integer = 2048;
gSFSDebug: Boolean = False;
gSFSFastMode: Boolean = False;
+ gDefaultMegawadStart: AnsiString = DF_Default_Megawad_Start;
+ gBerserkAutoswitch: Boolean = True;
implementation
uses
e_log, e_input, g_window, g_sound, g_gfx, g_player, Math,
- g_map, g_net, g_netmaster, SysUtils, CONFIG, g_game, g_main, e_textures,
+ g_map, g_net, g_netmaster, SysUtils, CONFIG, g_game, g_main, e_texture,
g_items, GL, GLExt, wadreader, e_graphics;
procedure g_Options_SetDefault();
gSFSFastMode := config.ReadBool('Game', 'SFSFastMode', False);
wadoptFast := gSFSFastMode;
e_FastScreenshots := config.ReadBool('Game', 'FastScreenshots', True);
+ gDefaultMegawadStart := config.ReadStr('Game', 'DefaultMegawadStart', 'megawads/DOOM2D.WAD:\MAP01');
+ gBerserkAutoswitch := config.ReadBool('Game', 'BerserkAutoswitch', False);
// Ãåéìïëåé â ñâîåé èãðå
gcMap := config.ReadStr('GameplayCustom', 'Map', '');
config.WriteBool('Game', 'SFSDebug', gSFSDebug);
config.WriteBool('Game', 'SFSFastMode', gSFSFastMode);
config.WriteBool('Game', 'FastScreenshots', e_FastScreenshots);
+ config.WriteStr('Game', 'DefaultMegawadStart', gDefaultMegawadStart);
+ config.WriteBool('Game', 'BerserkAutoswitch', gBerserkAutoswitch);
config.WriteStr ('GameplayCustom', 'Map', gcMap);
config.WriteStr ('GameplayCustom', 'GameMode', gcGameMode);