Reformat (beautify) Raven sources and add GPL headers.

Subversion-branch: /branches/raven-branch
Subversion-revision: 1197

1 files changed, 954 insertions, 934 deletions

diff --git a/src/hexen/h2_main.c b/src/hexen/h2_main.c
index 3bddd3a5..4a3f31c2 100644
--- a/src/hexen/h2_main.c
+++ b/src/hexen/h2_main.c
@@ -1,934 +1,954 @@
-

-//**************************************************************************

-//**

-//** h2_main.c : Heretic 2 : Raven Software, Corp.

-//**

-//** $RCSfile: h2_main.c,v $

-//** $Revision: 1.50 $

-//** $Date: 96/01/16 13:02:28 $

-//** $Author: bgokey $

-//**

-//**************************************************************************

-

-// HEADER FILES ------------------------------------------------------------

-

-#ifdef __WATCOMC__

-#include <dos.h>

-#include <sys\types.h>

-#include <direct.h>

-#endif

-#include <stdio.h>

-#include <stdlib.h>

-#include <time.h>

-#include "h2def.h"

-#include "p_local.h"

-#include "soundst.h"

-

-// MACROS ------------------------------------------------------------------

-

-#define CONFIG_FILE_NAME "hexen.cfg"

-#define MAXWADFILES 20

-

-// TYPES -------------------------------------------------------------------

-

-typedef struct

-{

-	char *name;

-	void (*func)(char **args, int tag);

-	int requiredArgs;

-	int tag;

-} execOpt_t;

-

-// EXTERNAL FUNCTION PROTOTYPES --------------------------------------------

-

-void R_ExecuteSetViewSize(void);

-void D_CheckNetGame(void);

-void G_BuildTiccmd(ticcmd_t *cmd);

-void F_Drawer(void);

-boolean F_Responder(event_t *ev);

-void I_StartupKeyboard(void);

-void I_StartupJoystick(void);

-void I_ShutdownKeyboard(void);

-void S_InitScript(void);

-

-// PUBLIC FUNCTION PROTOTYPES ----------------------------------------------

-

-void H2_ProcessEvents(void);

-void H2_DoAdvanceDemo(void);

-void H2_AdvanceDemo(void);

-void H2_StartTitle(void);

-void H2_PageTicker(void);

-

-// PRIVATE FUNCTION PROTOTYPES ---------------------------------------------

-

-static void DrawMessage(void);

-static void PageDrawer(void);

-static void HandleArgs(void);

-static void CheckRecordFrom(void);

-static void AddWADFile(char *file);

-static void DrawAndBlit(void);

-static void ExecOptionFILE(char **args, int tag);

-static void ExecOptionSCRIPTS(char **args, int tag);

-static void ExecOptionDEVMAPS(char **args, int tag);

-static void ExecOptionSKILL(char **args, int tag);

-static void ExecOptionPLAYDEMO(char **args, int tag);

-static void ExecOptionMAXZONE(char **args, int tag);

-static void CreateSavePath(void);

-static void WarpCheck(void);

-

-#ifdef TIMEBOMB

-static void DoTimeBomb(void);

-#endif

-

-// EXTERNAL DATA DECLARATIONS ----------------------------------------------

-

-extern boolean automapactive;

-extern boolean MenuActive;

-extern boolean askforquit;

-extern char *SavePath;

-

-// PUBLIC DATA DEFINITIONS -------------------------------------------------

-

-boolean DevMaps;			// true = Map development mode

-char *DevMapsDir = "";		// development maps directory

-boolean shareware;			// true if only episode 1 present

-boolean nomonsters;			// checkparm of -nomonsters

-boolean respawnparm;		// checkparm of -respawn

-boolean randomclass;		// checkparm of -randclass

-boolean debugmode;			// checkparm of -debug

-boolean ravpic;				// checkparm of -ravpic

-boolean cdrom;				// true if cd-rom mode active

-boolean cmdfrag;			// true if a CMD_FRAG packet should be sent out

-boolean singletics;			// debug flag to cancel adaptiveness

-boolean artiskip;			// whether shift-enter skips an artifact

-int maxzone = 0x800000;		// Maximum allocated for zone heap (8meg default)

-skill_t startskill;

-int startepisode;

-int startmap;

-boolean autostart;

-boolean advancedemo;

-FILE *debugfile;

-event_t events[MAXEVENTS];

-int eventhead;

-int eventtail;

-

-// PRIVATE DATA DEFINITIONS ------------------------------------------------

-

-static int WarpMap;

-static int demosequence;

-static int pagetic;

-static char *pagename;

-#ifdef __NeXT__

-static char *wadfiles[MAXWADFILES] =

-{

-	"/Novell/H2/source/hexen.wad"

-};

-#else

-static char *wadfiles[MAXWADFILES] =

-{

-	"hexen.wad"

-};

-#endif

-static execOpt_t ExecOptions[] =

-{

-	{ "-file", ExecOptionFILE, 1, 0 },

-	{ "-scripts", ExecOptionSCRIPTS, 1, 0 },

-	{ "-devmaps", ExecOptionDEVMAPS, 1, 0 },

-	{ "-skill", ExecOptionSKILL, 1, 0 },

-	{ "-playdemo", ExecOptionPLAYDEMO, 1, 0 },

-	{ "-timedemo", ExecOptionPLAYDEMO, 1, 0 },

-	{ "-maxzone", ExecOptionMAXZONE, 1, 0 },

-	{ NULL, NULL, 0, 0 } // Terminator

-};

-

-// CODE --------------------------------------------------------------------

-

-//==========================================================================

-//

-// H2_Main

-//

-//==========================================================================

-void InitMapMusicInfo(void);

-

-void H2_Main(void)

-{

-	int p;

-

-	M_FindResponseFile();

-	setbuf(stdout, NULL);

-	startepisode = 1;

-	autostart = false;

-	startskill = sk_medium;

-	startmap = 1;

-	shareware = false; // Always false for Hexen

-

-	HandleArgs();

-

-	// Initialize subsystems

-

-	ST_Message("V_Init: allocate screens.\n");

-	V_Init();

-

-	// Load defaults before initing other systems

-	ST_Message("M_LoadDefaults: Load system defaults.\n");

-	M_LoadDefaults(CONFIG_FILE_NAME);

-

-	// Now that the savedir is loaded from .CFG, make sure it exists

-	CreateSavePath();

-

-	// HEXEN MODIFICATION:

-	// There is a realloc() in W_AddFile() that might fail if the zone

-	// heap has been previously allocated, so we need to initialize the

-	// WAD files BEFORE the zone memory initialization.

-	ST_Message("W_Init: Init WADfiles.\n");

-	W_InitMultipleFiles(wadfiles);

-

-#ifdef TIMEBOMB

-	DoTimeBomb();

-#endif

-

-	ST_Message("Z_Init: Init zone memory allocation daemon.\n");

-	Z_Init();

-

-#ifdef __WATCOMC__

-	I_StartupKeyboard();

-	I_StartupJoystick();

-#endif

-

-	ST_Message("MN_Init: Init menu system.\n");

-	MN_Init();

-

-	ST_Message("CT_Init: Init chat mode data.\n");

-	CT_Init();

-

-	InitMapMusicInfo();		// Init music fields in mapinfo

-

-#ifdef __WATCOMC__

-	ST_Message("S_InitScript\n");

-	S_InitScript();

-#endif

-

-	ST_Message("SN_InitSequenceScript: Registering sound sequences.\n");

-	SN_InitSequenceScript();

-	ST_Message("I_Init: Setting up machine state.\n");

-	I_Init();

-

-	ST_Message("ST_Init: Init startup screen.\n");

-	ST_Init();

-

-	S_StartSongName("orb", true);

-

-	// Show version message now, so it's visible during R_Init()

-	ST_Message("Executable: "VERSIONTEXT".\n");

-

-	ST_Message("R_Init: Init Hexen refresh daemon");

-	R_Init();

-	ST_Message("\n");

-

-	if (M_CheckParm("-net")) ST_NetProgress();	// Console player found

-

-	ST_Message("P_Init: Init Playloop state.\n");

-	P_Init();

-

-	// Check for command line warping. Follows P_Init() because the

-	// MAPINFO.TXT script must be already processed.

-	WarpCheck();

-

-	if(autostart)

-	{

-		ST_Message("Warp to Map %d (\"%s\":%d), Skill %d\n",

-			WarpMap, P_GetMapName(startmap), startmap, startskill+1);

-	}

-

-	ST_Message("D_CheckNetGame: Checking network game status.\n");

-	D_CheckNetGame();

-

-	ST_Message("SB_Init: Loading patches.\n");

-	SB_Init();

-	

-	CheckRecordFrom();

-

-	p = M_CheckParm("-record");

-	if(p && p < myargc-1)

-	{

-		G_RecordDemo(startskill, 1, startepisode, startmap, myargv[p+1]);

-		H2_GameLoop(); // Never returns

-	}

-

-	p = M_CheckParm("-playdemo");

-	if(p && p < myargc-1)

-	{

-		singledemo = true; // Quit after one demo

-		G_DeferedPlayDemo(myargv[p+1]);

-		H2_GameLoop(); // Never returns

-	}

-

-	p = M_CheckParm("-timedemo");

-	if(p && p < myargc-1)

-	{

-		G_TimeDemo(myargv[p+1]);

-		H2_GameLoop(); // Never returns

-	}

-

-	p = M_CheckParm("-loadgame");

-	if(p && p < myargc-1)

-	{

-		G_LoadGame(atoi(myargv[p+1]));

-	}

-

-	if(gameaction != ga_loadgame)

-	{

-		UpdateState |= I_FULLSCRN;

-		BorderNeedRefresh = true;

-		if(autostart || netgame)

-		{

-			G_StartNewInit();

-			G_InitNew(startskill, startepisode, startmap);

-		}

-		else

-		{

-			H2_StartTitle();

-		}

-	}

-	H2_GameLoop(); // Never returns

-}

-

-//==========================================================================

-//

-// HandleArgs

-//

-//==========================================================================

-

-static void HandleArgs(void)

-{

-	int p;

-	execOpt_t *opt;

-

-	nomonsters = M_ParmExists("-nomonsters");

-	respawnparm = M_ParmExists("-respawn");

-	randomclass = M_ParmExists("-randclass");

-	ravpic = M_ParmExists("-ravpic");

-	artiskip = M_ParmExists("-artiskip");

-	debugmode = M_ParmExists("-debug");

-	deathmatch = M_ParmExists("-deathmatch");

-	cdrom = M_ParmExists("-cdrom");

-	cmdfrag = M_ParmExists("-cmdfrag");

-

-	// Process command line options

-	for(opt = ExecOptions; opt->name != NULL; opt++)

-	{

-		p = M_CheckParm(opt->name);

-		if(p && p < myargc-opt->requiredArgs)

-		{

-			opt->func(&myargv[p], opt->tag);

-		}

-	}

-

-	// Look for an external device driver

-	I_CheckExternDriver();

-}

-

-//==========================================================================

-//

-// WarpCheck

-//

-//==========================================================================

-

-static void WarpCheck(void)

-{

-	int p;

-	int map;

-

-	p = M_CheckParm("-warp");

-	if(p && p < myargc-1)

-	{

-		WarpMap = atoi(myargv[p+1]);

-		map = P_TranslateMap(WarpMap);

-		if(map == -1)

-		{ // Couldn't find real map number

-			startmap = 1;

-			ST_Message("-WARP: Invalid map number.\n");

-		}

-		else

-		{ // Found a valid startmap

-			startmap = map;

-			autostart = true;

-		}

-	}

-	else

-	{

-		WarpMap = 1;

-		startmap = P_TranslateMap(1);

-		if(startmap == -1)

-		{

-			startmap = 1;

-		}

-	}

-}

-

-//==========================================================================

-//

-// ExecOptionSKILL

-//

-//==========================================================================

-

-static void ExecOptionSKILL(char **args, int tag)

-{

-	startskill = args[1][0]-'1';

-	autostart = true;

-}

-

-//==========================================================================

-//

-// ExecOptionFILE

-//

-//==========================================================================

-

-static void ExecOptionFILE(char **args, int tag)

-{

-	int p;

-

-	p = M_CheckParm("-file");

-	while(++p != myargc && myargv[p][0] != '-')

-	{

-		AddWADFile(myargv[p]);

-	}

-}

-

-

-//==========================================================================

-//

-// ExecOptionPLAYDEMO

-//

-//==========================================================================

-

-static void ExecOptionPLAYDEMO(char **args, int tag)

-{

-	char file[256];

-

-	sprintf(file, "%s.lmp", args[1]);

-	AddWADFile(file);

-	ST_Message("Playing demo %s.lmp.\n", args[1]);

-}

-

-//==========================================================================

-//

-// ExecOptionSCRIPTS

-//

-//==========================================================================

-

-static void ExecOptionSCRIPTS(char **args, int tag)

-{

-	sc_FileScripts = true;

-	sc_ScriptsDir = args[1];

-}

-

-//==========================================================================

-//

-// ExecOptionDEVMAPS

-//

-//==========================================================================

-

-static void ExecOptionDEVMAPS(char **args, int tag)

-{

-	DevMaps = true;

-	ST_Message("Map development mode enabled:\n");

-	ST_Message("[config    ] = %s\n", args[1]);

-	SC_OpenFileCLib(args[1]);

-	SC_MustGetStringName("mapsdir");

-	SC_MustGetString();

-	ST_Message("[mapsdir   ] = %s\n", sc_String);

-	DevMapsDir = malloc(strlen(sc_String)+1);

-	strcpy(DevMapsDir, sc_String);

-	SC_MustGetStringName("scriptsdir");

-	SC_MustGetString();

-	ST_Message("[scriptsdir] = %s\n", sc_String);

-	sc_FileScripts = true;

-	sc_ScriptsDir = malloc(strlen(sc_String)+1);

-	strcpy(sc_ScriptsDir, sc_String);

-	while(SC_GetString())

-	{

-		if(SC_Compare("file"))

-		{

-			SC_MustGetString();

-			AddWADFile(sc_String);

-		}

-		else

-		{

-			SC_ScriptError(NULL);

-		}

-	}

-	SC_Close();

-}

-

-

-long superatol(char *s)

-{

-	long int n=0, r=10, x, mul=1;

-	char *c=s;

-

-	for (; *c; c++)

-	{

-		x = (*c & 223) - 16;

-

-		if (x == -3)

-		{

-			mul = -mul;

-		}

-		else if (x == 72 && r == 10)

-		{

-			n -= (r=n);

-			if (!r) r=16;

-			if (r<2 || r>36) return -1;

-		}

-		else

-		{

-			if (x>10) x-=39;

-			if (x >= r) return -1;

-			n = (n*r) + x;

-		}

-	}

-	return(mul*n);

-}

-

-

-static void ExecOptionMAXZONE(char **args, int tag)

-{

-	int size;

-	

-	size = superatol(args[1]);

-	if (size < MINIMUM_HEAP_SIZE) size = MINIMUM_HEAP_SIZE;

-	if (size > MAXIMUM_HEAP_SIZE) size = MAXIMUM_HEAP_SIZE;

-	maxzone = size;

-}

-

-//==========================================================================

-//

-// H2_GameLoop

-//

-//==========================================================================

-

-void H2_GameLoop(void)

-{

-	if(M_CheckParm("-debugfile"))

-	{

-		char filename[20];

-		sprintf(filename, "debug%i.txt", consoleplayer);

-		debugfile = fopen(filename,"w");

-	}

-	I_InitGraphics();

-	while(1)

-	{

-		// Frame syncronous IO operations

-		I_StartFrame();

-

-		// Process one or more tics

-		if(singletics)

-		{

-			I_StartTic();

-			H2_ProcessEvents();

-			G_BuildTiccmd(&netcmds[consoleplayer][maketic%BACKUPTICS]);

-			if(advancedemo)

-			{

-				H2_DoAdvanceDemo();

-			}

-			G_Ticker();

-			gametic++;

-			maketic++;

-		}

-		else

-		{

-			// Will run at least one tic

-			TryRunTics();

-		}

-

-		// Move positional sounds

-		S_UpdateSounds(players[displayplayer].mo);

-

-		DrawAndBlit();

-	}

-}

-

-//==========================================================================

-//

-// H2_ProcessEvents

-//

-// Send all the events of the given timestamp down the responder chain.

-//

-//==========================================================================

-

-void H2_ProcessEvents(void)

-{

-	event_t *ev;

-

-	for(; eventtail != eventhead; eventtail = (++eventtail)&(MAXEVENTS-1))

-	{

-		ev = &events[eventtail];

-		if(F_Responder(ev))

-		{

-			continue;

-		}

-		if(MN_Responder(ev))

-		{

-			continue;

-		}

-		G_Responder(ev);

-	}

-}

-

-//==========================================================================

-//

-// H2_PostEvent

-//

-// Called by the I/O functions when input is detected.

-//

-//==========================================================================

-

-void H2_PostEvent(event_t *ev)

-{

-	events[eventhead] = *ev;

-	eventhead = (++eventhead)&(MAXEVENTS-1);

-}

-

-//==========================================================================

-//

-// DrawAndBlit

-//

-//==========================================================================

-

-static void DrawAndBlit(void)

-{

-	// Change the view size if needed

-	if(setsizeneeded)

-	{

-		R_ExecuteSetViewSize();

-	}

-

-	// Do buffered drawing

-	switch(gamestate)

-	{

-		case GS_LEVEL:

-			if(!gametic)

-			{

-				break;

-			}

-			if(automapactive)

-			{

-				AM_Drawer();

-			}

-			else

-			{

-				R_RenderPlayerView(&players[displayplayer]);

-			}

-			CT_Drawer();

-			UpdateState |= I_FULLVIEW;

-			SB_Drawer();

-			break;

-		case GS_INTERMISSION:

-			IN_Drawer();

-			break;

-		case GS_FINALE:

-			F_Drawer();

-			break;

-		case GS_DEMOSCREEN:

-			PageDrawer();

-			break;

-	}

-

-	if(paused && !MenuActive && !askforquit)

-	{

-		if(!netgame)

-		{

-			V_DrawPatch(160, viewwindowy+5, W_CacheLumpName("PAUSED",

-				PU_CACHE));

-		}

-		else

-		{

-			V_DrawPatch(160, 70, W_CacheLumpName("PAUSED",

-				PU_CACHE));

-		}

-	}

-

-	// Draw current message

-	DrawMessage();

-

-	// Draw Menu

-	MN_Drawer();

-

-	// Send out any new accumulation

-	NetUpdate();

-

-	// Flush buffered stuff to screen

-	I_Update();

-}

-

-//==========================================================================

-//

-// DrawMessage

-//

-//==========================================================================

-

-static void DrawMessage(void)

-{

-	player_t *player;

-

-	player = &players[consoleplayer];

-	if(player->messageTics <= 0 || !player->message)

-	{ // No message

-		return;

-	}

-	if(player->yellowMessage)

-	{

-		MN_DrTextAYellow(player->message, 

-			160-MN_TextAWidth(player->message)/2, 1);

-	}

-	else

-	{

-		MN_DrTextA(player->message, 160-MN_TextAWidth(player->message)/2, 1);

-	}

-}

-

-//==========================================================================

-//

-// H2_PageTicker

-//

-//==========================================================================

-

-void H2_PageTicker(void)

-{

-	if(--pagetic < 0)

-	{

-		H2_AdvanceDemo();

-	}

-}

-

-//==========================================================================

-//

-// PageDrawer

-//

-//==========================================================================

-

-static void PageDrawer(void)

-{

-	V_DrawRawScreen(W_CacheLumpName(pagename, PU_CACHE));

-	if(demosequence == 1)

-	{

-		V_DrawPatch(4, 160, W_CacheLumpName("ADVISOR", PU_CACHE));

-	}

-	UpdateState |= I_FULLSCRN;

-}

-

-//==========================================================================

-//

-// H2_AdvanceDemo

-//

-// Called after each demo or intro demosequence finishes.

-//

-//==========================================================================

-

-void H2_AdvanceDemo(void)

-{

-	advancedemo = true;

-}

-

-//==========================================================================

-//

-// H2_DoAdvanceDemo

-//

-//==========================================================================

-

-void H2_DoAdvanceDemo(void)

-{

-	players[consoleplayer].playerstate = PST_LIVE; // don't reborn

-	advancedemo = false;

-	usergame = false; // can't save/end game here

-	paused = false;

-	gameaction = ga_nothing;

-	demosequence = (demosequence+1)%7;

-	switch(demosequence)

-	{

-		case 0:

-			pagetic = 280;

-			gamestate = GS_DEMOSCREEN;

-			pagename = "TITLE";

-			S_StartSongName("hexen", true);

-			break;

-		case 1:

-			pagetic = 210;

-			gamestate = GS_DEMOSCREEN;

-			pagename = "TITLE";

-			break;

-		case 2:

-			BorderNeedRefresh = true;

-			UpdateState |= I_FULLSCRN;

-			G_DeferedPlayDemo("demo1");

-			break;

-		case 3:

-			pagetic = 200;

-			gamestate = GS_DEMOSCREEN;

-			pagename = "CREDIT";

-			break;

-		case 4:

-			BorderNeedRefresh = true;

-			UpdateState |= I_FULLSCRN;

-			G_DeferedPlayDemo("demo2");

-			break;

-		case 5:

-			pagetic = 200;

-			gamestate = GS_DEMOSCREEN;

-			pagename = "CREDIT";

-			break;

-		case 6:

-			BorderNeedRefresh = true;

-			UpdateState |= I_FULLSCRN;

-			G_DeferedPlayDemo("demo3");

-			break;

-	}

-}

-

-//==========================================================================

-//

-// H2_StartTitle

-//

-//==========================================================================

-

-void H2_StartTitle(void)

-{

-	gameaction = ga_nothing;

-	demosequence = -1;

-	H2_AdvanceDemo();

-}

-

-//==========================================================================

-//

-// CheckRecordFrom

-//

-// -recordfrom <savegame num> <demoname>

-//

-//==========================================================================

-

-static void CheckRecordFrom(void)

-{

-	int p;

-

-	p = M_CheckParm("-recordfrom");

-	if(!p || p > myargc-2)

-	{ // Bad args

-		return;

-	}

-	G_LoadGame(atoi(myargv[p+1]));

-	G_DoLoadGame(); // Load the gameskill etc info from savegame

-	G_RecordDemo(gameskill, 1, gameepisode, gamemap, myargv[p+2]);

-	H2_GameLoop(); // Never returns

-}

-

-//==========================================================================

-//

-// AddWADFile

-//

-//==========================================================================

-

-static void AddWADFile(char *file)

-{

-	int i;

-	char *new;

-

-	ST_Message("Adding external file: %s\n", file);

-	i = 0;

-	while(wadfiles[i])

-	{

-		i++;

-	}

-	new = malloc(strlen(file)+1);

-	strcpy(new, file);

-	wadfiles[i] = new;

-}

-

-#ifdef __WATCOMC__

-/*

-void CleanExit(void)

-{

-	union REGS regs;

-

-	I_ShutdownKeyboard();

-	regs.x.eax = 0x3;

-	int386(0x10, &regs, &regs);

-	printf("Exited from HEXEN: Beyond Heretic.\n");

-	exit(1);

-}

-*/

-#endif

-

-//==========================================================================

-//

-// FixedDiv

-//

-//==========================================================================

-

-fixed_t FixedDiv(fixed_t a, fixed_t b)

-{

-	if((abs(a)>>14) >= abs(b))

-	{

-		return((a^b)<0 ? MININT : MAXINT);

-	}

-	return(FixedDiv2(a, b));

-}

-

-

-//==========================================================================

-//

-// CreateSavePath

-//

-//==========================================================================

-

-static void CreateSavePath(void)

-{

-	char creationPath[121];

-	int len;

-

-	if(cdrom == true)

-	{

-		SavePath = "c:\\hexndata\\";

-	}

-	len = strlen(SavePath);

-	if (len >= 120) I_Error("Save path too long\n");

-	strcpy(creationPath, SavePath);

-#ifdef __WATCOMC__

-	creationPath[len-1] = 0;

-	mkdir(creationPath);

-#endif

-}

-

-#ifdef TIMEBOMB

-//==========================================================================

-//

-// DoTimeBomb

-//

-//==========================================================================

-

-static void DoTimeBomb(void)

-{

-#ifdef __WATCOMC__

-	time_t timeOfDay;

-	struct tm timeBuffer;

-

-	timeOfDay = time(NULL);

-	_localtime(&timeOfDay, &timeBuffer);

-	if(timeBuffer.tm_year != TIMEBOMB_YEAR 

-	|| timeBuffer.tm_yday < TIMEBOMB_STARTDATE 

-	|| timeBuffer.tm_yday > TIMEBOMB_ENDDATE)

-	{

-		I_Error("W_InitWadfiles:  Wad file doesn't have IWAD or PWAD id\n");

-	}

- 

-	printf("\n===============================================================================\n");

-	printf("                             Hexen:  Beyond Heretic\n\n");

-	printf("                           Beta -- Do Not Distribute!\n");

-	printf("                           Press any key to continue.\n");

-	printf("===============================================================================\n");

-	

-	getch();

-	printf("\n");

-#endif

-}

-#endif

+// Emacs style mode select   -*- C++ -*- 
+//-----------------------------------------------------------------------------
+//
+// Copyright(C) 1993-1996 Id Software, Inc.
+// Copyright(C) 1993-2008 Raven Software
+//
+// 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 2
+// 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, write to the Free Software
+// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+// 02111-1307, USA.
+//
+//-----------------------------------------------------------------------------
+
+
+// HEADER FILES ------------------------------------------------------------
+
+#ifdef __WATCOMC__
+#include <dos.h>
+#include <sys\types.h>
+#include <direct.h>
+#endif
+#include <stdio.h>
+#include <stdlib.h>
+#include <time.h>
+#include "h2def.h"
+#include "p_local.h"
+#include "soundst.h"
+
+// MACROS ------------------------------------------------------------------
+
+#define CONFIG_FILE_NAME "hexen.cfg"
+#define MAXWADFILES 20
+
+// TYPES -------------------------------------------------------------------
+
+typedef struct
+{
+    char *name;
+    void (*func) (char **args, int tag);
+    int requiredArgs;
+    int tag;
+} execOpt_t;
+
+// EXTERNAL FUNCTION PROTOTYPES --------------------------------------------
+
+void R_ExecuteSetViewSize(void);
+void D_CheckNetGame(void);
+void G_BuildTiccmd(ticcmd_t * cmd);
+void F_Drawer(void);
+boolean F_Responder(event_t * ev);
+void I_StartupKeyboard(void);
+void I_StartupJoystick(void);
+void I_ShutdownKeyboard(void);
+void S_InitScript(void);
+
+// PUBLIC FUNCTION PROTOTYPES ----------------------------------------------
+
+void H2_ProcessEvents(void);
+void H2_DoAdvanceDemo(void);
+void H2_AdvanceDemo(void);
+void H2_StartTitle(void);
+void H2_PageTicker(void);
+
+// PRIVATE FUNCTION PROTOTYPES ---------------------------------------------
+
+static void DrawMessage(void);
+static void PageDrawer(void);
+static void HandleArgs(void);
+static void CheckRecordFrom(void);
+static void AddWADFile(char *file);
+static void DrawAndBlit(void);
+static void ExecOptionFILE(char **args, int tag);
+static void ExecOptionSCRIPTS(char **args, int tag);
+static void ExecOptionDEVMAPS(char **args, int tag);
+static void ExecOptionSKILL(char **args, int tag);
+static void ExecOptionPLAYDEMO(char **args, int tag);
+static void ExecOptionMAXZONE(char **args, int tag);
+static void CreateSavePath(void);
+static void WarpCheck(void);
+
+#ifdef TIMEBOMB
+static void DoTimeBomb(void);
+#endif
+
+// EXTERNAL DATA DECLARATIONS ----------------------------------------------
+
+extern boolean automapactive;
+extern boolean MenuActive;
+extern boolean askforquit;
+extern char *SavePath;
+
+// PUBLIC DATA DEFINITIONS -------------------------------------------------
+
+boolean DevMaps;                // true = Map development mode
+char *DevMapsDir = "";          // development maps directory
+boolean shareware;              // true if only episode 1 present
+boolean nomonsters;             // checkparm of -nomonsters
+boolean respawnparm;            // checkparm of -respawn
+boolean randomclass;            // checkparm of -randclass
+boolean debugmode;              // checkparm of -debug
+boolean ravpic;                 // checkparm of -ravpic
+boolean cdrom;                  // true if cd-rom mode active
+boolean cmdfrag;                // true if a CMD_FRAG packet should be sent out
+boolean singletics;             // debug flag to cancel adaptiveness
+boolean artiskip;               // whether shift-enter skips an artifact
+int maxzone = 0x800000;         // Maximum allocated for zone heap (8meg default)
+skill_t startskill;
+int startepisode;
+int startmap;
+boolean autostart;
+boolean advancedemo;
+FILE *debugfile;
+event_t events[MAXEVENTS];
+int eventhead;
+int eventtail;
+
+// PRIVATE DATA DEFINITIONS ------------------------------------------------
+
+static int WarpMap;
+static int demosequence;
+static int pagetic;
+static char *pagename;
+#ifdef __NeXT__
+static char *wadfiles[MAXWADFILES] = {
+    "/Novell/H2/source/hexen.wad"
+};
+#else
+static char *wadfiles[MAXWADFILES] = {
+    "hexen.wad"
+};
+#endif
+static execOpt_t ExecOptions[] = {
+    {"-file", ExecOptionFILE, 1, 0},
+    {"-scripts", ExecOptionSCRIPTS, 1, 0},
+    {"-devmaps", ExecOptionDEVMAPS, 1, 0},
+    {"-skill", ExecOptionSKILL, 1, 0},
+    {"-playdemo", ExecOptionPLAYDEMO, 1, 0},
+    {"-timedemo", ExecOptionPLAYDEMO, 1, 0},
+    {"-maxzone", ExecOptionMAXZONE, 1, 0},
+    {NULL, NULL, 0, 0}          // Terminator
+};
+
+// CODE --------------------------------------------------------------------
+
+//==========================================================================
+//
+// H2_Main
+//
+//==========================================================================
+void InitMapMusicInfo(void);
+
+void H2_Main(void)
+{
+    int p;
+
+    M_FindResponseFile();
+    setbuf(stdout, NULL);
+    startepisode = 1;
+    autostart = false;
+    startskill = sk_medium;
+    startmap = 1;
+    shareware = false;          // Always false for Hexen
+
+    HandleArgs();
+
+    // Initialize subsystems
+
+    ST_Message("V_Init: allocate screens.\n");
+    V_Init();
+
+    // Load defaults before initing other systems
+    ST_Message("M_LoadDefaults: Load system defaults.\n");
+    M_LoadDefaults(CONFIG_FILE_NAME);
+
+    // Now that the savedir is loaded from .CFG, make sure it exists
+    CreateSavePath();
+
+    // HEXEN MODIFICATION:
+    // There is a realloc() in W_AddFile() that might fail if the zone
+    // heap has been previously allocated, so we need to initialize the
+    // WAD files BEFORE the zone memory initialization.
+    ST_Message("W_Init: Init WADfiles.\n");
+    W_InitMultipleFiles(wadfiles);
+
+#ifdef TIMEBOMB
+    DoTimeBomb();
+#endif
+
+    ST_Message("Z_Init: Init zone memory allocation daemon.\n");
+    Z_Init();
+
+#ifdef __WATCOMC__
+    I_StartupKeyboard();
+    I_StartupJoystick();
+#endif
+
+    ST_Message("MN_Init: Init menu system.\n");
+    MN_Init();
+
+    ST_Message("CT_Init: Init chat mode data.\n");
+    CT_Init();
+
+    InitMapMusicInfo();         // Init music fields in mapinfo
+
+#ifdef __WATCOMC__
+    ST_Message("S_InitScript\n");
+    S_InitScript();
+#endif
+
+    ST_Message("SN_InitSequenceScript: Registering sound sequences.\n");
+    SN_InitSequenceScript();
+    ST_Message("I_Init: Setting up machine state.\n");
+    I_Init();
+
+    ST_Message("ST_Init: Init startup screen.\n");
+    ST_Init();
+
+    S_StartSongName("orb", true);
+
+    // Show version message now, so it's visible during R_Init()
+    ST_Message("Executable: " VERSIONTEXT ".\n");
+
+    ST_Message("R_Init: Init Hexen refresh daemon");
+    R_Init();
+    ST_Message("\n");
+
+    if (M_CheckParm("-net"))
+        ST_NetProgress();       // Console player found
+
+    ST_Message("P_Init: Init Playloop state.\n");
+    P_Init();
+
+    // Check for command line warping. Follows P_Init() because the
+    // MAPINFO.TXT script must be already processed.
+    WarpCheck();
+
+    if (autostart)
+    {
+        ST_Message("Warp to Map %d (\"%s\":%d), Skill %d\n",
+                   WarpMap, P_GetMapName(startmap), startmap, startskill + 1);
+    }
+
+    ST_Message("D_CheckNetGame: Checking network game status.\n");
+    D_CheckNetGame();
+
+    ST_Message("SB_Init: Loading patches.\n");
+    SB_Init();
+
+    CheckRecordFrom();
+
+    p = M_CheckParm("-record");
+    if (p && p < myargc - 1)
+    {
+        G_RecordDemo(startskill, 1, startepisode, startmap, myargv[p + 1]);
+        H2_GameLoop();          // Never returns
+    }
+
+    p = M_CheckParm("-playdemo");
+    if (p && p < myargc - 1)
+    {
+        singledemo = true;      // Quit after one demo
+        G_DeferedPlayDemo(myargv[p + 1]);
+        H2_GameLoop();          // Never returns
+    }
+
+    p = M_CheckParm("-timedemo");
+    if (p && p < myargc - 1)
+    {
+        G_TimeDemo(myargv[p + 1]);
+        H2_GameLoop();          // Never returns
+    }
+
+    p = M_CheckParm("-loadgame");
+    if (p && p < myargc - 1)
+    {
+        G_LoadGame(atoi(myargv[p + 1]));
+    }
+
+    if (gameaction != ga_loadgame)
+    {
+        UpdateState |= I_FULLSCRN;
+        BorderNeedRefresh = true;
+        if (autostart || netgame)
+        {
+            G_StartNewInit();
+            G_InitNew(startskill, startepisode, startmap);
+        }
+        else
+        {
+            H2_StartTitle();
+        }
+    }
+    H2_GameLoop();              // Never returns
+}
+
+//==========================================================================
+//
+// HandleArgs
+//
+//==========================================================================
+
+static void HandleArgs(void)
+{
+    int p;
+    execOpt_t *opt;
+
+    nomonsters = M_ParmExists("-nomonsters");
+    respawnparm = M_ParmExists("-respawn");
+    randomclass = M_ParmExists("-randclass");
+    ravpic = M_ParmExists("-ravpic");
+    artiskip = M_ParmExists("-artiskip");
+    debugmode = M_ParmExists("-debug");
+    deathmatch = M_ParmExists("-deathmatch");
+    cdrom = M_ParmExists("-cdrom");
+    cmdfrag = M_ParmExists("-cmdfrag");
+
+    // Process command line options
+    for (opt = ExecOptions; opt->name != NULL; opt++)
+    {
+        p = M_CheckParm(opt->name);
+        if (p && p < myargc - opt->requiredArgs)
+        {
+            opt->func(&myargv[p], opt->tag);
+        }
+    }
+
+    // Look for an external device driver
+    I_CheckExternDriver();
+}
+
+//==========================================================================
+//
+// WarpCheck
+//
+//==========================================================================
+
+static void WarpCheck(void)
+{
+    int p;
+    int map;
+
+    p = M_CheckParm("-warp");
+    if (p && p < myargc - 1)
+    {
+        WarpMap = atoi(myargv[p + 1]);
+        map = P_TranslateMap(WarpMap);
+        if (map == -1)
+        {                       // Couldn't find real map number
+            startmap = 1;
+            ST_Message("-WARP: Invalid map number.\n");
+        }
+        else
+        {                       // Found a valid startmap
+            startmap = map;
+            autostart = true;
+        }
+    }
+    else
+    {
+        WarpMap = 1;
+        startmap = P_TranslateMap(1);
+        if (startmap == -1)
+        {
+            startmap = 1;
+        }
+    }
+}
+
+//==========================================================================
+//
+// ExecOptionSKILL
+//
+//==========================================================================
+
+static void ExecOptionSKILL(char **args, int tag)
+{
+    startskill = args[1][0] - '1';
+    autostart = true;
+}
+
+//==========================================================================
+//
+// ExecOptionFILE
+//
+//==========================================================================
+
+static void ExecOptionFILE(char **args, int tag)
+{
+    int p;
+
+    p = M_CheckParm("-file");
+    while (++p != myargc && myargv[p][0] != '-')
+    {
+        AddWADFile(myargv[p]);
+    }
+}
+
+
+//==========================================================================
+//
+// ExecOptionPLAYDEMO
+//
+//==========================================================================
+
+static void ExecOptionPLAYDEMO(char **args, int tag)
+{
+    char file[256];
+
+    sprintf(file, "%s.lmp", args[1]);
+    AddWADFile(file);
+    ST_Message("Playing demo %s.lmp.\n", args[1]);
+}
+
+//==========================================================================
+//
+// ExecOptionSCRIPTS
+//
+//==========================================================================
+
+static void ExecOptionSCRIPTS(char **args, int tag)
+{
+    sc_FileScripts = true;
+    sc_ScriptsDir = args[1];
+}
+
+//==========================================================================
+//
+// ExecOptionDEVMAPS
+//
+//==========================================================================
+
+static void ExecOptionDEVMAPS(char **args, int tag)
+{
+    DevMaps = true;
+    ST_Message("Map development mode enabled:\n");
+    ST_Message("[config    ] = %s\n", args[1]);
+    SC_OpenFileCLib(args[1]);
+    SC_MustGetStringName("mapsdir");
+    SC_MustGetString();
+    ST_Message("[mapsdir   ] = %s\n", sc_String);
+    DevMapsDir = malloc(strlen(sc_String) + 1);
+    strcpy(DevMapsDir, sc_String);
+    SC_MustGetStringName("scriptsdir");
+    SC_MustGetString();
+    ST_Message("[scriptsdir] = %s\n", sc_String);
+    sc_FileScripts = true;
+    sc_ScriptsDir = malloc(strlen(sc_String) + 1);
+    strcpy(sc_ScriptsDir, sc_String);
+    while (SC_GetString())
+    {
+        if (SC_Compare("file"))
+        {
+            SC_MustGetString();
+            AddWADFile(sc_String);
+        }
+        else
+        {
+            SC_ScriptError(NULL);
+        }
+    }
+    SC_Close();
+}
+
+
+long superatol(char *s)
+{
+    long int n = 0, r = 10, x, mul = 1;
+    char *c = s;
+
+    for (; *c; c++)
+    {
+        x = (*c & 223) - 16;
+
+        if (x == -3)
+        {
+            mul = -mul;
+        }
+        else if (x == 72 && r == 10)
+        {
+            n -= (r = n);
+            if (!r)
+                r = 16;
+            if (r < 2 || r > 36)
+                return -1;
+        }
+        else
+        {
+            if (x > 10)
+                x -= 39;
+            if (x >= r)
+                return -1;
+            n = (n * r) + x;
+        }
+    }
+    return (mul * n);
+}
+
+
+static void ExecOptionMAXZONE(char **args, int tag)
+{
+    int size;
+
+    size = superatol(args[1]);
+    if (size < MINIMUM_HEAP_SIZE)
+        size = MINIMUM_HEAP_SIZE;
+    if (size > MAXIMUM_HEAP_SIZE)
+        size = MAXIMUM_HEAP_SIZE;
+    maxzone = size;
+}
+
+//==========================================================================
+//
+// H2_GameLoop
+//
+//==========================================================================
+
+void H2_GameLoop(void)
+{
+    if (M_CheckParm("-debugfile"))
+    {
+        char filename[20];
+        sprintf(filename, "debug%i.txt", consoleplayer);
+        debugfile = fopen(filename, "w");
+    }
+    I_InitGraphics();
+    while (1)
+    {
+        // Frame syncronous IO operations
+        I_StartFrame();
+
+        // Process one or more tics
+        if (singletics)
+        {
+            I_StartTic();
+            H2_ProcessEvents();
+            G_BuildTiccmd(&netcmds[consoleplayer][maketic % BACKUPTICS]);
+            if (advancedemo)
+            {
+                H2_DoAdvanceDemo();
+            }
+            G_Ticker();
+            gametic++;
+            maketic++;
+        }
+        else
+        {
+            // Will run at least one tic
+            TryRunTics();
+        }
+
+        // Move positional sounds
+        S_UpdateSounds(players[displayplayer].mo);
+
+        DrawAndBlit();
+    }
+}
+
+//==========================================================================
+//
+// H2_ProcessEvents
+//
+// Send all the events of the given timestamp down the responder chain.
+//
+//==========================================================================
+
+void H2_ProcessEvents(void)
+{
+    event_t *ev;
+
+    for (; eventtail != eventhead;
+         eventtail = (++eventtail) & (MAXEVENTS - 1))
+    {
+        ev = &events[eventtail];
+        if (F_Responder(ev))
+        {
+            continue;
+        }
+        if (MN_Responder(ev))
+        {
+            continue;
+        }
+        G_Responder(ev);
+    }
+}
+
+//==========================================================================
+//
+// H2_PostEvent
+//
+// Called by the I/O functions when input is detected.
+//
+//==========================================================================
+
+void H2_PostEvent(event_t * ev)
+{
+    events[eventhead] = *ev;
+    eventhead = (++eventhead) & (MAXEVENTS - 1);
+}
+
+//==========================================================================
+//
+// DrawAndBlit
+//
+//==========================================================================
+
+static void DrawAndBlit(void)
+{
+    // Change the view size if needed
+    if (setsizeneeded)
+    {
+        R_ExecuteSetViewSize();
+    }
+
+    // Do buffered drawing
+    switch (gamestate)
+    {
+        case GS_LEVEL:
+            if (!gametic)
+            {
+                break;
+            }
+            if (automapactive)
+            {
+                AM_Drawer();
+            }
+            else
+            {
+                R_RenderPlayerView(&players[displayplayer]);
+            }
+            CT_Drawer();
+            UpdateState |= I_FULLVIEW;
+            SB_Drawer();
+            break;
+        case GS_INTERMISSION:
+            IN_Drawer();
+            break;
+        case GS_FINALE:
+            F_Drawer();
+            break;
+        case GS_DEMOSCREEN:
+            PageDrawer();
+            break;
+    }
+
+    if (paused && !MenuActive && !askforquit)
+    {
+        if (!netgame)
+        {
+            V_DrawPatch(160, viewwindowy + 5, W_CacheLumpName("PAUSED",
+                                                              PU_CACHE));
+        }
+        else
+        {
+            V_DrawPatch(160, 70, W_CacheLumpName("PAUSED", PU_CACHE));
+        }
+    }
+
+    // Draw current message
+    DrawMessage();
+
+    // Draw Menu
+    MN_Drawer();
+
+    // Send out any new accumulation
+    NetUpdate();
+
+    // Flush buffered stuff to screen
+    I_Update();
+}
+
+//==========================================================================
+//
+// DrawMessage
+//
+//==========================================================================
+
+static void DrawMessage(void)
+{
+    player_t *player;
+
+    player = &players[consoleplayer];
+    if (player->messageTics <= 0 || !player->message)
+    {                           // No message
+        return;
+    }
+    if (player->yellowMessage)
+    {
+        MN_DrTextAYellow(player->message,
+                         160 - MN_TextAWidth(player->message) / 2, 1);
+    }
+    else
+    {
+        MN_DrTextA(player->message, 160 - MN_TextAWidth(player->message) / 2,
+                   1);
+    }
+}
+
+//==========================================================================
+//
+// H2_PageTicker
+//
+//==========================================================================
+
+void H2_PageTicker(void)
+{
+    if (--pagetic < 0)
+    {
+        H2_AdvanceDemo();
+    }
+}
+
+//==========================================================================
+//
+// PageDrawer
+//
+//==========================================================================
+
+static void PageDrawer(void)
+{
+    V_DrawRawScreen(W_CacheLumpName(pagename, PU_CACHE));
+    if (demosequence == 1)
+    {
+        V_DrawPatch(4, 160, W_CacheLumpName("ADVISOR", PU_CACHE));
+    }
+    UpdateState |= I_FULLSCRN;
+}
+
+//==========================================================================
+//
+// H2_AdvanceDemo
+//
+// Called after each demo or intro demosequence finishes.
+//
+//==========================================================================
+
+void H2_AdvanceDemo(void)
+{
+    advancedemo = true;
+}
+
+//==========================================================================
+//
+// H2_DoAdvanceDemo
+//
+//==========================================================================
+
+void H2_DoAdvanceDemo(void)
+{
+    players[consoleplayer].playerstate = PST_LIVE;      // don't reborn
+    advancedemo = false;
+    usergame = false;           // can't save/end game here
+    paused = false;
+    gameaction = ga_nothing;
+    demosequence = (demosequence + 1) % 7;
+    switch (demosequence)
+    {
+        case 0:
+            pagetic = 280;
+            gamestate = GS_DEMOSCREEN;
+            pagename = "TITLE";
+            S_StartSongName("hexen", true);
+            break;
+        case 1:
+            pagetic = 210;
+            gamestate = GS_DEMOSCREEN;
+            pagename = "TITLE";
+            break;
+        case 2:
+            BorderNeedRefresh = true;
+            UpdateState |= I_FULLSCRN;
+            G_DeferedPlayDemo("demo1");
+            break;
+        case 3:
+            pagetic = 200;
+            gamestate = GS_DEMOSCREEN;
+            pagename = "CREDIT";
+            break;
+        case 4:
+            BorderNeedRefresh = true;
+            UpdateState |= I_FULLSCRN;
+            G_DeferedPlayDemo("demo2");
+            break;
+        case 5:
+            pagetic = 200;
+            gamestate = GS_DEMOSCREEN;
+            pagename = "CREDIT";
+            break;
+        case 6:
+            BorderNeedRefresh = true;
+            UpdateState |= I_FULLSCRN;
+            G_DeferedPlayDemo("demo3");
+            break;
+    }
+}
+
+//==========================================================================
+//
+// H2_StartTitle
+//
+//==========================================================================
+
+void H2_StartTitle(void)
+{
+    gameaction = ga_nothing;
+    demosequence = -1;
+    H2_AdvanceDemo();
+}
+
+//==========================================================================
+//
+// CheckRecordFrom
+//
+// -recordfrom <savegame num> <demoname>
+//
+//==========================================================================
+
+static void CheckRecordFrom(void)
+{
+    int p;
+
+    p = M_CheckParm("-recordfrom");
+    if (!p || p > myargc - 2)
+    {                           // Bad args
+        return;
+    }
+    G_LoadGame(atoi(myargv[p + 1]));
+    G_DoLoadGame();             // Load the gameskill etc info from savegame
+    G_RecordDemo(gameskill, 1, gameepisode, gamemap, myargv[p + 2]);
+    H2_GameLoop();              // Never returns
+}
+
+//==========================================================================
+//
+// AddWADFile
+//
+//==========================================================================
+
+static void AddWADFile(char *file)
+{
+    int i;
+    char *new;
+
+    ST_Message("Adding external file: %s\n", file);
+    i = 0;
+    while (wadfiles[i])
+    {
+        i++;
+    }
+    new = malloc(strlen(file) + 1);
+    strcpy(new, file);
+    wadfiles[i] = new;
+}
+
+#ifdef __WATCOMC__
+/*
+void CleanExit(void)
+{
+	union REGS regs;
+
+	I_ShutdownKeyboard();
+	regs.x.eax = 0x3;
+	int386(0x10, &regs, &regs);
+	printf("Exited from HEXEN: Beyond Heretic.\n");
+	exit(1);
+}
+*/
+#endif
+
+//==========================================================================
+//
+// FixedDiv
+//
+//==========================================================================
+
+fixed_t FixedDiv(fixed_t a, fixed_t b)
+{
+    if ((abs(a) >> 14) >= abs(b))
+    {
+        return ((a ^ b) < 0 ? MININT : MAXINT);
+    }
+    return (FixedDiv2(a, b));
+}
+
+
+//==========================================================================
+//
+// CreateSavePath
+//
+//==========================================================================
+
+static void CreateSavePath(void)
+{
+    char creationPath[121];
+    int len;
+
+    if (cdrom == true)
+    {
+        SavePath = "c:\\hexndata\\";
+    }
+    len = strlen(SavePath);
+    if (len >= 120)
+        I_Error("Save path too long\n");
+    strcpy(creationPath, SavePath);
+#ifdef __WATCOMC__
+    creationPath[len - 1] = 0;
+    mkdir(creationPath);
+#endif
+}
+
+#ifdef TIMEBOMB
+//==========================================================================
+//
+// DoTimeBomb
+//
+//==========================================================================
+
+static void DoTimeBomb(void)
+{
+#ifdef __WATCOMC__
+    time_t timeOfDay;
+    struct tm timeBuffer;
+
+    timeOfDay = time(NULL);
+    _localtime(&timeOfDay, &timeBuffer);
+    if (timeBuffer.tm_year != TIMEBOMB_YEAR
+        || timeBuffer.tm_yday < TIMEBOMB_STARTDATE
+        || timeBuffer.tm_yday > TIMEBOMB_ENDDATE)
+    {
+        I_Error("W_InitWadfiles:  Wad file doesn't have IWAD or PWAD id\n");
+    }
+
+    printf
+        ("\n===============================================================================\n");
+    printf("                             Hexen:  Beyond Heretic\n\n");
+    printf("                           Beta -- Do Not Distribute!\n");
+    printf("                           Press any key to continue.\n");
+    printf
+        ("===============================================================================\n");
+
+    getch();
+    printf("\n");
+#endif
+}
+#endif