void P_InitPicAnims (void)
{
int i;
// Init animation
lastanim = anims;
for (i=0 ; animdefs[i].istexture != -1 ; i++)
{
if (animdefs[i].istexture)
{
// different episode ?
if (R_CheckTextureNumForName(animdefs[i].startname) == -1)
continue;
lastanim->picnum = R_TextureNumForName (animdefs[i].endname);
lastanim->basepic = R_TextureNumForName (animdefs[i].startname);
}
else
{
if (W_CheckNumForName(animdefs[i].startname) == -1)
continue;
lastanim->picnum = R_FlatNumForName (animdefs[i].endname);
lastanim->basepic = R_FlatNumForName (animdefs[i].startname);
}
lastanim->istexture = animdefs[i].istexture;
lastanim->numpics = lastanim->picnum - lastanim->basepic + 1;
if (lastanim->numpics < 2)
I_Error ("P_InitPicAnims: bad cycle from %s to %s",
animdefs[i].startname,
animdefs[i].endname);
lastanim->speed = animdefs[i].speed;
lastanim++;
}
}
static char *ReadDMXConfig(void)
{
int lumpnum;
unsigned int len;
char *data;
// TODO: This should be chosen based on gamemode == commercial:
lumpnum = W_CheckNumForName("DMXGUS");
if (lumpnum < 0)
{
lumpnum = W_GetNumForName("DMXGUSC");
}
len = W_LumpLength(lumpnum);
data = Z_Malloc(len + 1, PU_STATIC, NULL);
W_ReadLump(lumpnum, data);
data[len] = '\0';
return data;
}
void P_InitTerrainTypes(void)
{
int i;
int lump;
int size;
size = Get(DD_NUMLUMPS) * sizeof(int);
// Free if there already is memory allocated.
if(TerrainTypes)
Z_Free(TerrainTypes);
TerrainTypes = Z_Malloc(size, PU_STATIC, 0);
memset(TerrainTypes, 0, size);
for(i = 0; TerrainTypeDefs[i].type != -1; i++)
{
lump = W_CheckNumForName(TerrainTypeDefs[i].name);
if(lump != -1)
{
TerrainTypes[lump /*-firstflat*/ ] = TerrainTypeDefs[i].type;
}
}
}
//
// D_ProcessEvents
// Send all the events of the given timestamp down the responder chain
//
void D_ProcessEvents (void)
{
event_t* ev;
// IF STORE DEMO, DO NOT ACCEPT INPUT
if ( (gamemode == commercial) && (W_CheckNumForName("map01") < 0) )
{
return;
}
//d_main.c: In function 'D_ProcessEvents':
//d_main.c:207: warning: operation on 'eventtail' may be undefined
// for ( ; eventtail != eventhead ; eventtail = (++eventtail)&(MAXEVENTS-1) )
for ( ; eventtail != eventhead ; eventtail = (eventtail+1)&(MAXEVENTS-1) )
{
ev = &events[eventtail];
if (M_Responder(ev))
{
continue; // menu ate the event
}
G_Responder(ev);
}
}
void WI_loadData(void)
{
char bg_lumpname[9];
patch_t *bg;
if (gamemode == commercial)
{
NUMCMAPS = 32 + (W_CheckNumForName("MAP33") >= 0);
lnames = (patch_t **)Z_Malloc(sizeof(patch_t *) * NUMCMAPS, PU_STATIC, NULL);
}
else
lnames = (patch_t **)Z_Malloc(sizeof(patch_t *) * NUMMAPS, PU_STATIC, NULL);
WI_loadUnloadData(WI_loadCallback);
// These two graphics are special cased because we're sharing
// them with the status bar code
// your face
star = (patch_t *)W_CacheLumpName("STFST01", PU_STATIC);
// dead face
bstar = (patch_t *)W_CacheLumpName("STFDEAD0", PU_STATIC);
// Background image
if (gamemode == commercial || (gamemode == retail && wbs->epsd == 3))
{
strncpy(bg_lumpname, (DMENUPIC ? "DMENUPIC" : "INTERPIC"), 9);
bg_lumpname[8] = '\0';
}
else
snprintf(bg_lumpname, 9, "WIMAP%d", wbs->epsd);
bg = (patch_t *)W_CacheLumpName(bg_lumpname, PU_CACHE);
V_DrawPatch(0, 0, 1, bg);
}
static int WI_CalcWidth (const char *str)
{
int w = 0;
int lump;
patch_t *p;
char charname[9];
if (!str)
return 0;
while (*str) {
sprintf (charname, "FONTB%02u", toupper(*str) - 32);
lump = W_CheckNumForName (charname);
if (lump != -1) {
p = W_CachePatch (lump);
w += p->width() - 1;
} else {
w += 12;
}
str++;
}
return w;
}
//
// P_DialogStart
//
// villsa [STRIFE] New function
//
void P_DialogStart(player_t *player)
{
int i = 0;
int pic;
int rnd = 0;
char* byetext;
int jumptoconv;
if(menuactive || netgame)
return;
// are we facing towards our NPC?
P_AimLineAttack(player->mo, player->mo->angle, (128*FRACUNIT));
if(!linetarget)
{
P_AimLineAttack(player->mo, player->mo->angle + (ANG90/16), (128*FRACUNIT));
if(!linetarget)
P_AimLineAttack(player->mo, player->mo->angle - (ANG90/16), (128*FRACUNIT));
}
if(!linetarget)
return;
// already in combat, can't talk to it
if(linetarget->flags & MF_NODIALOG)
return;
// set pointer to the character talking
dialogtalker = linetarget;
// play a sound
if(player == &players[consoleplayer])
S_StartSound(0, sfx_radio);
linetarget->target = player->mo; // target the player
dialogtalker->reactiontime = 2; // set reactiontime
dialogtalkerangle = dialogtalker->angle; // remember original angle
// face talker towards player
A_FaceTarget(dialogtalker);
// face towards NPC's direction
player->mo->angle = R_PointToAngle2(player->mo->x,
player->mo->y,
dialogtalker->x,
dialogtalker->y);
// set pointer to player talking
dialogplayer = player;
// haleyjd 09/08/10: get any stored dialog state from this object
jumptoconv = linetarget->miscdata;
// check item requirements
while(1)
{
int i = 0;
currentdialog = P_DialogFind(linetarget->type, jumptoconv);
// dialog's jumptoconv equal to 0? There's nothing to jump to.
if(currentdialog->jumptoconv == 0)
break;
// villsa 09/08/10: converted into for loop
for(i = 0; i < MDLG_MAXITEMS; i++)
{
// if the item is non-zero, the player must have at least one in his
// or her inventory
if(currentdialog->checkitem[i] != 0 &&
P_PlayerHasItem(dialogplayer, currentdialog->checkitem[i]) < 1)
break;
}
if(i < MDLG_MAXITEMS) // didn't find them all? this is our dialog!
break;
jumptoconv = currentdialog->jumptoconv;
}
M_DialogDimMsg(20, 28, currentdialog->text, false);
dialogtext = P_DialogGetMsg(currentdialog->text);
// get states
dialogtalkerstates = P_DialogGetStates(linetarget->type);
// have talker greet the player
if(dialogtalkerstates->greet)
P_SetMobjState(dialogtalker, dialogtalkerstates->greet);
// get talker's name
if(currentdialog->name[0])
dialogname = currentdialog->name;
else
{
// use a fallback:
if(mobjinfo[linetarget->type].name)
dialogname = DEH_String(mobjinfo[linetarget->type].name); // mobjtype name
else
dialogname = DEH_String("Person"); // default name - like Joe in Doom 3 :P
}
// setup number of choices to choose from
for(i = 0; i < MDLG_MAXCHOICES; i++)
{
if(!currentdialog->choices[i].giveitem)
break;
}
// set number of choices to menu
dialogmenu.numitems = i + 1;
rnd = M_Random() % 3;
// setup dialog menu
M_StartControlPanel();
menupause = false;
menuindialog = true;
menupausetime = gametic + 17;
currentMenu = &dialogmenu;
if(i >= dialogmenu.lastOn)
itemOn = dialogmenu.lastOn;
else
itemOn = 0;
// get backdrop
pic = W_CheckNumForName(currentdialog->backpic);
dialogbgpiclumpnum = pic;
if(pic != -1)
V_DrawPatchDirect(0, 0, W_CacheLumpNum(pic, PU_CACHE));
// get voice
I_StartVoice(currentdialog->voice);
// get bye text
switch(rnd)
{
case 2:
byetext = DEH_String("BYE!");
break;
case 1:
byetext = DEH_String("Thanks, Bye!");
break;
default:
case 0:
byetext = DEH_String("See you later!");
break;
}
DEH_snprintf(dialoglastmsgbuffer, sizeof(dialoglastmsgbuffer),
"%d) %s", i + 1, byetext);
}
void D_DoomMainSetup(void)
{
int p;
nomonsters = M_CheckParm ("-nomonsters");
respawnparm = M_CheckParm ("-respawn");
fastparm = M_CheckParm ("-fast");
devparm = M_CheckParm ("-devparm");
if (M_CheckParm ("-altdeath"))
deathmatch = 2;
else if (M_CheckParm ("-deathmatch"))
deathmatch = 1;
printf("Welcome to Rockdoom\n");
switch ( gamemode )
{
case retail:
printf ("The Ultimate DOOM Startup v%d.%d\n",DVERSION/100,DVERSION%100);
break;
case shareware:
printf ("DOOM Shareware Startup v%d.%d\n",DVERSION/100,DVERSION%100);
break;
case registered:
printf ("DOOM Registered Startup v%d.%d\n",DVERSION/100,DVERSION%100);
break;
case commercial:
switch (gamemission)
{
case pack_plut:
printf ("DOOM 2: Plutonia Experiment v%d.%d\n",DVERSION/100,DVERSION%100);
break;
case pack_tnt:
printf ("DOOM 2: TNT - Evilution v%d.%d\n",DVERSION/100,DVERSION%100);
break;
default:
printf ("DOOM 2: Hell on Earth v%d.%d\n",DVERSION/100,DVERSION%100);
break;
}
break;
default:
printf ("Public DOOM v%d.%d\n",DVERSION/100,DVERSION%100);
break;
}
if (devparm)
printf(D_DEVSTR);
// turbo option
if ((p=M_CheckParm ("-turbo")))
{
int scale = 200;
extern int forwardmove[2];
extern int sidemove[2];
if (p<myargc-1)
scale = atoi (myargv[p+1]);
if (scale < 10)
scale = 10;
if (scale > 400)
scale = 400;
printf ("turbo scale: %d%%\n",scale);
forwardmove[0] = forwardmove[0]*scale/100;
forwardmove[1] = forwardmove[1]*scale/100;
sidemove[0] = sidemove[0]*scale/100;
sidemove[1] = sidemove[1]*scale/100;
}
// get skill / episode / map from parms
startskill = sk_medium;
startepisode = 1;
startmap = 1;
autostart = false;
p = M_CheckParm ("-skill");
if (p && p < myargc-1)
{
startskill = myargv[p+1][0]-'1';
autostart = true;
}
p = M_CheckParm ("-episode");
if (p && p < myargc-1)
{
startepisode = myargv[p+1][0]-'0';
startmap = 1;
autostart = true;
}
p = M_CheckParm ("-warp");
if (p && p < myargc-1)
{
if (gamemode == commercial)
startmap = atoi (myargv[p+1]);
else
{
startepisode = myargv[p+1][0]-'0';
startmap = myargv[p+2][0]-'0';
}
autostart = true;
}
// CPhipps - move up netgame init
printf("D_InitNetGame: Checking for network game.\n");
D_InitNetGame();
// init subsystems
printf ("V_Init: allocate screens.\n");
V_Init ();
printf ("W_Init: Init WADfiles.\n");
W_Init();
if ((p = W_CheckNumForName("DEHACKED")) != -1) // cph - add dehacked-in-a-wad support
ProcessDehFile(NULL, dehout ? "/dehlog.txt" : NULL, p);
V_InitColorTranslation(); //jff 4/24/98 load color translation lumps
// Check for -file in shareware
if (modifiedgame)
{
// These are the lumps that will be checked in IWAD,
// if any one is not present, execution will be aborted.
const char name[23][8]=
{
"e2m1","e2m2","e2m3","e2m4","e2m5","e2m6","e2m7","e2m8","e2m9",
"e3m1","e3m3","e3m3","e3m4","e3m5","e3m6","e3m7","e3m8","e3m9",
"dphoof","bfgga0","heada1","cybra1","spida1d1"
};
int i;
if ( gamemode == shareware)
I_Error("\nYou cannot -file with the shareware version. Register!\n");
// Check for fake IWAD with right name,
// but w/o all the lumps of the registered version.
if (gamemode == registered)
for (i = 0;i < 23; i++)
if (W_CheckNumForName(name[i])<0)
I_Error("This is not the registered version.\n");
}
// Iff additonal PWAD files are used, print modified banner
if (modifiedgame)
printf ("ATTENTION: This version of DOOM has been modified.\n");
// Check and print which version is executed.
switch ( gamemode )
{
case shareware:
case indetermined:
printf ("Shareware!\n");
break;
case registered:
case retail:
case commercial:
printf ("Commercial product - do not distribute!\n");
break;
default:
// Ouch.
break;
}
printf ("M_Init: Init miscellaneous info.\n");
M_Init ();
printf ("R_Init: Init DOOM refresh daemon - ");
R_Init ();
printf ("P_Init: Init Playloop state.\n");
P_Init ();
printf ("I_Init: Setting up machine state.\n");
I_Init ();
printf ("S_Init: Setting up sound.\n");
S_Init (snd_SfxVolume /* *8 */, snd_MusicVolume /* *8*/ );
printf ("HU_Init: Setting up heads up display.\n");
HU_Init ();
I_InitGraphics ();
printf ("ST_Init: Init status bar.\n");
ST_Init ();
// check for a driver that wants intermission stats
p = M_CheckParm ("-statcopy");
if (p && p<myargc-1)
{
// for statistics driver
extern void* statcopy;
statcopy = (void*)(intptr_t)atoi(myargv[p+1]);
printf ("External statistics registered.\n");
}
// start the apropriate game based on parms
p = M_CheckParm ("-record");
if (p && p < myargc-1)
{
G_RecordDemo (myargv[p+1]);
autostart = true;
}
p = M_CheckParm ("-loadgame");
if (p && p < myargc-1)
G_LoadGame (atoi(myargv[p+1]), false);
if ( gameaction != ga_loadgame )
{
if (!singledemo) { /* killough 12/98 */
if (autostart || netgame)
G_InitNew (startskill, startepisode, startmap);
else
D_StartTitle (); // start up intro loop
}
}
}
//
// This cycles through the demo sequences.
//
void D_DoAdvanceDemo (void)
{
const char *pagename = NULL;
consoleplayer().playerstate = PST_LIVE; // not reborn
advancedemo = false;
usergame = false; // no save / end game here
paused = false;
gameaction = ga_nothing;
// [Russell] - Old demo sequence used in original games, zdoom's
// dynamic one was too dynamic for its own good
// [Nes] - Newer demo sequence with better flow.
if (W_CheckNumForName("DEMO4") >= 0 && gamemode != retail_chex)
demosequence = (demosequence+1)%8;
else
demosequence = (demosequence+1)%6;
switch (demosequence)
{
case 0:
if (gameinfo.flags & GI_MAPxx)
pagetic = TICRATE * 11;
else
pagetic = 170;
gamestate = GS_DEMOSCREEN;
pagename = gameinfo.titlePage;
S_StartMusic(gameinfo.titleMusic);
break;
case 1:
G_DeferedPlayDemo("DEMO1");
break;
case 2:
pagetic = 200;
gamestate = GS_DEMOSCREEN;
pagename = gameinfo.creditPage1;
break;
case 3:
G_DeferedPlayDemo("DEMO2");
break;
case 4:
gamestate = GS_DEMOSCREEN;
if ((gameinfo.flags & GI_MAPxx) || (gameinfo.flags & GI_MENUHACK_RETAIL))
{
if (gameinfo.flags & GI_MAPxx)
pagetic = TICRATE * 11;
else
pagetic = 170;
pagename = gameinfo.titlePage;
S_StartMusic(gameinfo.titleMusic);
}
else
{
pagetic = 200;
if (gamemode == retail_chex) // [ML] Chex mode just cycles this screen
pagename = gameinfo.creditPage1;
else
pagename = gameinfo.creditPage2;
}
break;
case 5:
G_DeferedPlayDemo("DEMO3");
break;
case 6:
pagetic = 200;
gamestate = GS_DEMOSCREEN;
pagename = gameinfo.creditPage2;
break;
case 7:
G_DeferedPlayDemo("DEMO4");
break;
}
// [Russell] - Still need this toilet humor for now unfortunately
if (pagename)
{
Texture::TextureSourceType textype =
(gameinfo.flags & GI_PAGESARERAW) ? Texture::TEX_RAW : Texture::TEX_PATCH;
page_texhandle = texturemanager.getHandle(pagename, textype);
}
}
void G_InitNew (const char *mapname)
{
size_t i;
// [RH] Remove all particles
R_ClearParticles ();
for (i = 0; i < players.size(); i++)
{
players[i].mo = AActor::AActorPtr();
players[i].camera = AActor::AActorPtr();
players[i].attacker = AActor::AActorPtr();
}
if (!savegamerestore)
G_ClearSnapshots ();
// [RH] Mark all levels as not visited
if (!savegamerestore)
{
for (i = 0; i < wadlevelinfos.size(); i++)
wadlevelinfos[i].flags &= ~LEVEL_VISITED;
for (i = 0; LevelInfos[i].mapname[0]; i++)
LevelInfos[i].flags &= ~LEVEL_VISITED;
}
cvar_t::UnlatchCVars ();
if (sv_skill > sk_nightmare)
sv_skill.Set (sk_nightmare);
else if (sv_skill < sk_baby)
sv_skill.Set (sk_baby);
cvar_t::UnlatchCVars ();
if (paused)
{
paused = false;
S_ResumeSound ();
}
// If were in chasecam mode, clear out // [Toke - fix]
if ((consoleplayer().cheats & CF_CHASECAM))
{
consoleplayer().cheats &= ~CF_CHASECAM;
}
// [RH] If this map doesn't exist, bomb out
if (W_CheckNumForName (mapname) == -1)
{
I_Error ("Could not find map %s\n", mapname);
}
if (sv_skill == sk_nightmare || sv_monstersrespawn)
respawnmonsters = true;
else
respawnmonsters = false;
bool wantFast = sv_fastmonsters || (sv_skill == sk_nightmare);
if (wantFast != isFast)
{
if (wantFast)
{
for (i=S_SARG_RUN1 ; i<=S_SARG_PAIN2 ; i++)
states[i].tics >>= 1;
mobjinfo[MT_BRUISERSHOT].speed = 20*FRACUNIT;
mobjinfo[MT_HEADSHOT].speed = 20*FRACUNIT;
mobjinfo[MT_TROOPSHOT].speed = 20*FRACUNIT;
}
else
{
for (i=S_SARG_RUN1 ; i<=S_SARG_PAIN2 ; i++)
states[i].tics <<= 1;
mobjinfo[MT_BRUISERSHOT].speed = 15*FRACUNIT;
mobjinfo[MT_HEADSHOT].speed = 10*FRACUNIT;
mobjinfo[MT_TROOPSHOT].speed = 10*FRACUNIT;
}
isFast = wantFast;
}
void WI_loadData(void)
{
int i;
int j;
char name[9];
anim_t* a;
if (gamemode == commercial)
strcpy(name, "INTERPIC");
else
sprintf(name, "WIMAP%d", wbs->epsd);
if ( gamemode == retail )
{
if (wbs->epsd == 3)
strcpy(name,"INTERPIC");
}
// background
bg = W_CacheLumpName(name, PU_CACHE);
V_DrawPatchDirect(0, 0, 1, bg);
// UNUSED unsigned char *pic = screens[1];
// if (gamemode == commercial)
// {
// darken the background image
// while (pic != screens[1] + SCREENHEIGHT*SCREENWIDTH)
// {
// *pic = colormaps[256*25 + *pic];
// pic++;
// }
//}
if (gamemode == commercial)
{
NUMCMAPS = 32;
lnames = (patch_t **) Z_Malloc(sizeof(patch_t*) * NUMCMAPS,
PU_STATIC, 0);
for (i=0 ; i<NUMCMAPS ; i++)
{
sprintf(name, "CWILV%2.2d", i);
lnames[i] = W_CacheLumpName(name, PU_STATIC);
}
}
else
{
lnames = (patch_t **) Z_Malloc(sizeof(patch_t*) * NUMMAPS,
PU_STATIC, 0);
for (i=0 ; i<NUMMAPS ; i++)
{
sprintf(name, "WILV%d%d", wbs->epsd, i);
lnames[i] = W_CacheLumpName(name, PU_STATIC);
}
// you are here
yah[0] = W_CacheLumpName("WIURH0", PU_STATIC);
// you are here (alt.)
yah[1] = W_CacheLumpName("WIURH1", PU_STATIC);
// splat
splat = W_CacheLumpName("WISPLAT", PU_STATIC);
if (wbs->epsd < 3)
{
for (j=0;j<NUMANIMS[wbs->epsd];j++)
{
a = &anims[wbs->epsd][j];
for (i=0;i<a->nanims;i++)
{
// MONDO HACK!
if (wbs->epsd != 1 || j != 8)
{
// animations
sprintf(name, "WIA%d%.2d%.2d", wbs->epsd, j, i);
a->p[i] = W_CacheLumpName(name, PU_STATIC);
}
else
{
// HACK ALERT!
a->p[i] = anims[1][4].p[i];
}
}
}
}
}
// More hacks on minus sign.
if (W_CheckNumForName("WIMINUS")>0) {
wiminus = W_CacheLumpName("WIMINUS", PU_STATIC);
} else {
wiminus = NULL;
}
for (i=0;i<10;i++)
{
// numbers 0-9
sprintf(name, "WINUM%d", i);
num[i] = W_CacheLumpName(name, PU_STATIC);
}
// percent sign
percent = W_CacheLumpName("WIPCNT", PU_STATIC);
// "finished"
finished = W_CacheLumpName("WIF", PU_STATIC);
// "entering"
entering = W_CacheLumpName("WIENTER", PU_STATIC);
// "kills"
kills = W_CacheLumpName("WIOSTK", PU_STATIC);
// "scrt"
secret = W_CacheLumpName("WIOSTS", PU_STATIC);
// "secret"
sp_secret = W_CacheLumpName("WISCRT2", PU_STATIC);
// Yuck.
if (language==french)
{
// "items"
if (netgame && !deathmatch)
items = W_CacheLumpName("WIOBJ", PU_STATIC);
else
items = W_CacheLumpName("WIOSTI", PU_STATIC);
} else
items = W_CacheLumpName("WIOSTI", PU_STATIC);
// "frgs"
frags = W_CacheLumpName("WIFRGS", PU_STATIC);
// ":"
colon = W_CacheLumpName("WICOLON", PU_STATIC);
// "time"
time = W_CacheLumpName("WITIME", PU_STATIC);
// "sucks"
sucks = W_CacheLumpName("WISUCKS", PU_STATIC);
// "par"
par = W_CacheLumpName("WIPAR", PU_STATIC);
// "killers" (vertical)
killers = W_CacheLumpName("WIKILRS", PU_STATIC);
// "victims" (horiz)
victims = W_CacheLumpName("WIVCTMS", PU_STATIC);
// "total"
total = W_CacheLumpName("WIMSTT", PU_STATIC);
// your face
star = W_CacheLumpName("STFST01", PU_STATIC);
// dead face
bstar = W_CacheLumpName("STFDEAD0", PU_STATIC);
for (i=0 ; i<MAXPLAYERS ; i++)
{
// "1,2,3,4"
sprintf(name, "STPB%d", i);
p[i] = W_CacheLumpName(name, PU_STATIC);
// "1,2,3,4"
sprintf(name, "WIBP%d", i+1);
bp[i] = W_CacheLumpName(name, PU_STATIC);
}
}
static void R_ReadTextures (int names_lump, int maptex_lump_1, int maptex_lump_2)
{
const maptexture_t *mtexture;
texture_t *texture;
int i, j;
const int *maptex1;
const int *maptex2;
const char *names; // cph -
const char *name_p;// const*'s
int *patchlookup;
int texbase;
int numtex;
int nummappatches;
int maxoff, maxoff2;
int numtextures1, numtextures2;
const int *directory;
char name[9];
// Load the patch names from pnames.lmp.
name[8] = '\0';
names = W_CacheLumpNum(names_lump, PU_STATIC);
nummappatches = LONG(*((const int *)names));
name_p = names + 4;
patchlookup = malloc(nummappatches * sizeof(*patchlookup)); // killough
for (i = 0; i < nummappatches; i++)
{
strncpy(name, name_p + i * 8, 8);
patchlookup[i] = W_CheckNumForName(name);
}
W_ReleaseLumpNum(names_lump); // cph - release the lump
// Load the map texture definitions from textures.lmp.
// The data is contained in one or two lumps,
// TEXTURE1 for shareware, plus TEXTURE2 for commercial.
maptex1 = W_CacheLumpNum(maptex_lump_1, PU_STATIC);
numtextures1 = LONG(*maptex1);
maxoff = W_LumpLength(maptex_lump_1);
directory = maptex1 + 1;
if (maptex_lump_2 != -1)
{
maptex2 = W_CacheLumpNum(maptex_lump_2, PU_STATIC);
numtextures2 = LONG(*maptex2);
maxoff2 = W_LumpLength(maptex_lump_2);
}
else
{
maptex2 = NULL;
numtextures2 = 0;
maxoff2 = 0;
}
texbase = numtextures;
numtex = numtextures1 + numtextures2;
numtextures += numtex;
// killough 4/9/98: make column offsets 32-bit;
// clean up malloc-ing to use sizeof
textures = Z_Realloc (textures, numtextures * sizeof(*textures), PU_STATIC, 0);
textureheight = Z_Realloc (textureheight, numtextures * sizeof(*textureheight), PU_STATIC, 0);
for (i = 0; i < numtex; ++directory)
{
const mappatch_t *mpatch;
texpatch_t *patch;
int offset;
if (i == numtextures1)
{
// Start looking in second texture file.
maptex1 = maptex2;
maxoff = maxoff2;
directory = maptex1 + 1;
}
if ((((byte *) directory) >= ((byte *)maptex1+maxoff))
|| ((offset=LONG(*directory)) >= maxoff))
{
printf ("R_InitTextures: bad texture directory %X/%X %d/%d\n",
(uintptr_t)directory,((uintptr_t)maptex1+maxoff), offset, maxoff);
break;
}
mtexture = (const maptexture_t *)((const byte *)maptex1 + offset);
if ((texbase)
&& (R_DuplicateTexture (mtexture->name, texbase)))
{
numtex--;
numtextures--;
numtextures1--;
continue;
}
texture = textures[texbase+i] = Z_Malloc(sizeof(texture_t) + sizeof(texpatch_t)
* (SHORT(mtexture->patchcount) - 1), PU_STATIC, 0);
texture->width = SHORT(mtexture->width);
texture->height = SHORT(mtexture->height);
texture->patchcount = SHORT(mtexture->patchcount);
// killough 1/31/98: Initialize texture hash table
texture->index = -1;
{
size_t j;
for (j = 0; j < sizeof(texture->name); ++j)
texture->name[j] = mtexture->name[j];
}
#ifdef PADDED_STRUCTS
mpatch = (mappatch_t *) ((char *) mtexture + 22);
#else
mpatch = &mtexture->patches[0];
#endif
patch = texture->patches;
for (j = 0; j < texture->patchcount; ++j, ++patch)
{
patch->originx = SHORT(mpatch->originx);
patch->originy = SHORT(mpatch->originy);
patch->patch = patchlookup[SHORT(mpatch->patch)];
if (patch->patch == -1)
printf("Missing patch %d in texture %.8s.", SHORT(mpatch->patch),
texture->name); // killough 4/17/98
#ifdef PADDED_STRUCTS
mpatch = (mappatch_t *) ((unsigned char *) mpatch + 10);
#else
mpatch++;
#endif
}
for (j = 1; j * 2 <= texture->width; j <<= 1);
texture->widthmask = j - 1;
textureheight[texbase+i] = texture->height << FRACBITS;
i++; // Done here so that 'continue' misses it out...
}
free(patchlookup); // killough
// cph - release the TEXTUREx lumps
W_ReleaseLumpNum (maptex_lump_1);
if (maptex_lump_2 != -1)
W_ReleaseLumpNum (maptex_lump_2);
}
// Load dehacked patches needed for certain IWADs.
static void LoadIwadDeh(void)
{
// The Freedoom IWADs have DEHACKED lumps that must be loaded.
if (W_CheckNumForName("FREEDOOM") >= 0)
{
// Old versions of Freedoom (before 2014-09) did not have technically
// valid DEHACKED lumps, so ignore errors and just continue if this
// is an old IWAD.
DEH_LoadLumpByName("DEHACKED", false, true);
}
// If this is the HACX IWAD, we need to load the DEHACKED lump.
if (gameversion == exe_hacx)
{
if (!DEH_LoadLumpByName("DEHACKED", true, false))
{
I_Error("DEHACKED lump not found. Please check that this is the "
"Hacx v1.2 IWAD.");
}
}
// Chex Quest needs a separate Dehacked patch which must be downloaded
// and installed next to the IWAD.
if (gameversion == exe_chex)
{
char *chex_deh = NULL;
char *sep;
// Look for chex.deh in the same directory as the IWAD file.
sep = strrchr(iwadfile, DIR_SEPARATOR);
if (sep != NULL)
{
size_t chex_deh_len = strlen(iwadfile) + 9;
chex_deh = malloc(chex_deh_len);
M_StringCopy(chex_deh, iwadfile, chex_deh_len);
chex_deh[sep - iwadfile + 1] = '\0';
M_StringConcat(chex_deh, "chex.deh", chex_deh_len);
}
else
{
chex_deh = M_StringDuplicate("chex.deh");
}
// If the dehacked patch isn't found, try searching the WAD
// search path instead. We might find it...
if (!M_FileExists(chex_deh))
{
free(chex_deh);
chex_deh = D_FindWADByName("chex.deh");
}
// Still not found?
if (chex_deh == NULL)
{
I_Error("Unable to find Chex Quest dehacked file (chex.deh).\n"
"The dehacked file is required in order to emulate\n"
"chex.exe correctly. It can be found in your nearest\n"
"/idgames repository mirror at:\n\n"
" utils/exe_edit/patches/chexdeh.zip");
}
if (!DEH_LoadFile(chex_deh))
{
I_Error("Failed to load chex.deh needed for emulating chex.exe.");
}
}
}
void GetFirstMap(int *ep, int *map)
{
int i,j; // used to generate map name
boolean done = false; // Ty 09/13/98 - to exit inner loops
char test[6]; // MAPxx or ExMx plus terminator for testing
char name[6]; // MAPxx or ExMx plus terminator for display
boolean newlevel = false; // Ty 10/04/98 - to test for new level
int ix; // index for lookup
strcpy(name,""); // initialize
if (*map == 0) // unknown so go search for first changed one
{
*ep = 1;
*map = 1; // default E1M1 or MAP01
if (gamemode == commercial)
{
for (i=1;!done && i<33;i++) // Ty 09/13/98 - add use of !done
{
sprintf(test,"MAP%02d",i);
ix = W_CheckNumForName(test);
if (ix != -1) // Ty 10/04/98 avoid -1 subscript
{
if (lumpinfo[ix].source == source_pwad)
{
*map = i;
strcpy(name,test); // Ty 10/04/98
done = true; // Ty 09/13/98
newlevel = true; // Ty 10/04/98
}
else
{
if (!*name) // found one, not pwad. First default.
strcpy(name,test);
}
}
}
}
else // one of the others
{
strcpy(name,"E1M1"); // Ty 10/04/98 - default for display
for (i=1;!done && i<5;i++) // Ty 09/13/98 - add use of !done
{
for (j=1;!done && j<10;j++) // Ty 09/13/98 - add use of !done
{
sprintf(test,"E%dM%d",i,j);
ix = W_CheckNumForName(test);
if (ix != -1) // Ty 10/04/98 avoid -1 subscript
{
if (lumpinfo[ix].source == source_pwad)
{
*ep = i;
*map = j;
strcpy(name,test); // Ty 10/04/98
done = true; // Ty 09/13/98
newlevel = true; // Ty 10/04/98
}
else
{
if (!*name) // found one, not pwad. First default.
strcpy(name,test);
}
}
}
}
}
//jff 9/3/98 use logical output routine
lprintf(LO_CONFIRM,"Auto-warping to first %slevel: %s\n",
newlevel ? "new " : "", name); // Ty 10/04/98 - new level test
}
}
static void D_DoomMainSetup(void)
{
int p,slot;
L_SetupConsoleMasks();
setbuf(stdout,NULL);
// proff 04/05/2000: Added support for include response files
/* proff 2001/7/1 - Moved up, so -config can be in response files */
{
boolean rsp_found;
int i;
do {
rsp_found=false;
for (i=0; i<myargc; i++)
if (myargv[i][0]=='@')
rsp_found=true;
FindResponseFile();
} while (rsp_found==true);
}
lprintf(LO_INFO,"M_LoadDefaults: Load system defaults.\n");
M_LoadDefaults(); // load before initing other systems
// figgi 09/18/00-- added switch to force classic bsp nodes
if (M_CheckParm ("-forceoldbsp"))
{
extern boolean forceOldBsp;
forceOldBsp = true;
}
DoLooseFiles(); // Ty 08/29/98 - handle "loose" files on command line
IdentifyVersion();
// e6y: DEH files preloaded in wrong order
// http://sourceforge.net/tracker/index.php?func=detail&aid=1418158&group_id=148658&atid=772943
// The dachaked stuff has been moved below an autoload
// jff 1/24/98 set both working and command line value of play parms
nomonsters = clnomonsters = M_CheckParm ("-nomonsters");
respawnparm = clrespawnparm = M_CheckParm ("-respawn");
fastparm = clfastparm = M_CheckParm ("-fast");
// jff 1/24/98 end of set to both working and command line value
devparm = M_CheckParm ("-devparm");
if (M_CheckParm ("-altdeath"))
deathmatch = 2;
else
if (M_CheckParm ("-deathmatch"))
deathmatch = 1;
{
// CPhipps - localise title variable
// print title for every printed line
// cph - code cleaned and made smaller
const char* doomverstr;
switch ( gamemode ) {
case retail:
doomverstr = "The Ultimate DOOM";
break;
case shareware:
doomverstr = "DOOM Shareware";
break;
case registered:
doomverstr = "DOOM Registered";
break;
case commercial: // Ty 08/27/98 - fixed gamemode vs gamemission
switch (gamemission)
{
case pack_plut:
doomverstr = "DOOM 2: Plutonia Experiment";
break;
case pack_tnt:
doomverstr = "DOOM 2: TNT - Evilution";
break;
default:
doomverstr = "DOOM 2: Hell on Earth";
break;
}
break;
default:
doomverstr = "Public DOOM";
break;
}
/* cphipps - the main display. This shows the build date, copyright, and game type */
lprintf(LO_ALWAYS,"PrBoom (built %s), playing: %s\n"
"PrBoom is released under the GNU General Public license v2.0.\n"
"You are welcome to redistribute it under certain conditions.\n"
"It comes with ABSOLUTELY NO WARRANTY. See the file COPYING for details.\n",
version_date, doomverstr);
}
if (devparm)
//jff 9/3/98 use logical output routine
lprintf(LO_CONFIRM,"%s",D_DEVSTR);
// turbo option
if ((p=M_CheckParm ("-turbo")))
{
int scale = 200;
extern int forwardmove[2];
extern int sidemove[2];
if (p<myargc-1)
scale = atoi(myargv[p+1]);
if (scale < 10)
scale = 10;
if (scale > 400)
scale = 400;
//jff 9/3/98 use logical output routine
lprintf (LO_CONFIRM,"turbo scale: %i%%\n",scale);
forwardmove[0] = forwardmove[0]*scale/100;
forwardmove[1] = forwardmove[1]*scale/100;
sidemove[0] = sidemove[0]*scale/100;
sidemove[1] = sidemove[1]*scale/100;
}
modifiedgame = false;
// get skill / episode / map from parms
startskill = sk_none; // jff 3/24/98 was sk_medium, just note not picked
startepisode = 1;
startmap = 1;
autostart = false;
if ((p = M_CheckParm ("-skill")) && p < myargc-1)
{
startskill = myargv[p+1][0]-'1';
autostart = true;
}
if ((p = M_CheckParm ("-episode")) && p < myargc-1)
{
startepisode = myargv[p+1][0]-'0';
startmap = 1;
autostart = true;
}
if ((p = M_CheckParm ("-timer")) && p < myargc-1 && deathmatch)
{
int time = atoi(myargv[p+1]);
//jff 9/3/98 use logical output routine
lprintf(LO_CONFIRM,"Levels will end after %d minute%s.\n", time, time>1 ? "s" : "");
}
if ((p = M_CheckParm ("-avg")) && p < myargc-1 && deathmatch)
//jff 9/3/98 use logical output routine
lprintf(LO_CONFIRM,"Austin Virtual Gaming: Levels will end after 20 minutes\n");
if ((p = M_CheckParm ("-warp")) || // killough 5/2/98
(p = M_CheckParm ("-wart")))
// Ty 08/29/98 - moved this check later so we can have -warp alone: && p < myargc-1)
{
startmap = 0; // Ty 08/29/98 - allow "-warp x" to go to first map in wad(s)
autostart = true; // Ty 08/29/98 - move outside the decision tree
if (gamemode == commercial)
{
if (p < myargc-1)
startmap = atoi(myargv[p+1]); // Ty 08/29/98 - add test if last parm
}
else // 1/25/98 killough: fix -warp xxx from crashing Doom 1 / UD
{
if (p < myargc-2)
{
startepisode = atoi(myargv[++p]);
startmap = atoi(myargv[p+1]);
}
}
}
// Ty 08/29/98 - later we'll check for startmap=0 and autostart=true
// as a special case that -warp * was used. Actually -warp with any
// non-numeric will do that but we'll only document "*"
//jff 1/22/98 add command line parms to disable sound and music
{
int nosound = M_CheckParm("-nosound");
nomusicparm = nosound || M_CheckParm("-nomusic");
nosfxparm = nosound || M_CheckParm("-nosfx");
}
//jff end of sound/music command line parms
// killough 3/2/98: allow -nodraw -noblit generally
nodrawers = M_CheckParm ("-nodraw");
noblit = M_CheckParm ("-noblit");
//proff 11/22/98: Added setting of viewangleoffset
p = M_CheckParm("-viewangle");
if (p)
{
viewangleoffset = atoi(myargv[p+1]);
viewangleoffset = viewangleoffset<0 ? 0 : (viewangleoffset>7 ? 7 : viewangleoffset);
viewangleoffset = (8-viewangleoffset) * ANG45;
}
// init subsystems
G_ReloadDefaults(); // killough 3/4/98: set defaults just loaded.
// jff 3/24/98 this sets startskill if it was -1
// Video stuff
if ((p = M_CheckParm("-width")))
if (myargv[p+1])
desired_screenwidth = atoi(myargv[p+1]);
if ((p = M_CheckParm("-height")))
if (myargv[p+1])
desired_screenheight = atoi(myargv[p+1]);
if ((p = M_CheckParm("-fullscreen")))
use_fullscreen = 1;
if ((p = M_CheckParm("-nofullscreen")))
use_fullscreen = 0;
// e6y
// New command-line options for setting a window (-window)
// or fullscreen (-nowindow) mode temporarily which is not saved in cfg.
// It works like "-geom" switch
desired_fullscreen = use_fullscreen;
if ((p = M_CheckParm("-window")))
desired_fullscreen = 0;
if ((p = M_CheckParm("-nowindow")))
desired_fullscreen = 1;
{ // -geometry handling, change screen size for this session only
// e6y: new code by me
int w, h;
if (!(p = M_CheckParm("-geom")))
p = M_CheckParm("-geometry");
if (!(p && (p+1<myargc) && sscanf(myargv[p+1], "%dx%d", &w, &h) == 2))
{
w = desired_screenwidth;
h = desired_screenheight;
}
I_CalculateRes(w, h);
}
#ifdef GL_DOOM
// proff 04/05/2000: for GL-specific switches
gld_InitCommandLine();
#endif
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"V_Init: allocate screens.\n");
V_Init();
// CPhipps - autoloading of wads
// Designed to be general, instead of specific to boomlump.wad
// Some people might find this useful
// cph - support MBF -noload parameter
if (!M_CheckParm("-noload")) {
int i;
for (i=0; i<MAXLOADFILES*2; i++) {
const char *fname = (i < MAXLOADFILES) ? wad_files[i]
: deh_files[i - MAXLOADFILES];
char *fpath;
if (!(fname && *fname)) continue;
// Filename is now stored as a zero terminated string
fpath = I_FindFile(fname, (i < MAXLOADFILES) ? ".wad" : ".bex");
if (!fpath)
lprintf(LO_WARN, "Failed to autoload %s\n", fname);
else {
if (i >= MAXLOADFILES)
ProcessDehFile(fpath, D_dehout(), 0);
else {
D_AddFile(fpath,source_auto_load);
}
modifiedgame = true;
free(fpath);
}
}
}
// e6y: DEH files preloaded in wrong order
// http://sourceforge.net/tracker/index.php?func=detail&aid=1418158&group_id=148658&atid=772943
// The dachaked stuff has been moved from above
// ty 03/09/98 do dehacked stuff
// Note: do this before any other since it is expected by
// the deh patch author that this is actually part of the EXE itself
// Using -deh in BOOM, others use -dehacked.
// Ty 03/18/98 also allow .bex extension. .bex overrides if both exist.
D_BuildBEXTables(); // haleyjd
p = M_CheckParm ("-deh");
if (p)
{
char file[PATH_MAX+1]; // cph - localised
// the parms after p are deh/bex file names,
// until end of parms or another - preceded parm
// Ty 04/11/98 - Allow multiple -deh files in a row
while (++p != myargc && *myargv[p] != '-')
{
AddDefaultExtension(strcpy(file, myargv[p]), ".bex");
if (access(file, F_OK)) // nope
{
AddDefaultExtension(strcpy(file, myargv[p]), ".deh");
if (access(file, F_OK)) // still nope
I_Error("D_DoomMainSetup: Cannot find .deh or .bex file named %s",myargv[p]);
}
// during the beta we have debug output to dehout.txt
ProcessDehFile(file,D_dehout(),0);
}
}
// ty 03/09/98 end of do dehacked stuff
// add any files specified on the command line with -file wadfile
// to the wad list
// killough 1/31/98, 5/2/98: reload hack removed, -wart same as -warp now.
if ((p = M_CheckParm ("-file")))
{
// the parms after p are wadfile/lump names,
// until end of parms or another - preceded parm
modifiedgame = true; // homebrew levels
while (++p != myargc && *myargv[p] != '-')
D_AddFile(myargv[p],source_pwad);
}
if (!(p = M_CheckParm("-playdemo")) || p >= myargc-1) { /* killough */
if ((p = M_CheckParm ("-fastdemo")) && p < myargc-1) /* killough */
fastdemo = true; // run at fastest speed possible
else
p = M_CheckParm ("-timedemo");
}
if (p && p < myargc-1)
{
char file[PATH_MAX+1]; // cph - localised
strcpy(file,myargv[p+1]);
AddDefaultExtension(file,".lmp"); // killough
D_AddFile (file,source_lmp);
//jff 9/3/98 use logical output routine
lprintf(LO_CONFIRM,"Playing demo %s\n",file);
if ((p = M_CheckParm ("-ffmap")) && p < myargc-1) {
ffmap = atoi(myargv[p+1]);
}
}
// internal translucency set to config file value // phares
general_translucency = default_translucency; // phares
// 1/18/98 killough: Z_Init() call moved to i_main.c
// CPhipps - move up netgame init
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"D_InitNetGame: Checking for network game.\n");
D_InitNetGame();
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"W_Init: Init WADfiles.\n");
W_Init(); // CPhipps - handling of wadfiles init changed
lprintf(LO_INFO,"\n"); // killough 3/6/98: add a newline, by popular demand :)
// e6y
// option to disable automatic loading of dehacked-in-wad lump
if (!M_CheckParm ("-nodeh"))
if ((p = W_CheckNumForName("DEHACKED")) != -1) // cph - add dehacked-in-a-wad support
ProcessDehFile(NULL, D_dehout(), p);
V_InitColorTranslation(); //jff 4/24/98 load color translation lumps
// killough 2/22/98: copyright / "modified game" / SPA banners removed
// Ty 04/08/98 - Add 5 lines of misc. data, only if nonblank
// The expectation is that these will be set in a .bex file
//jff 9/3/98 use logical output routine
if (*startup1) lprintf(LO_INFO,"%s",startup1);
if (*startup2) lprintf(LO_INFO,"%s",startup2);
if (*startup3) lprintf(LO_INFO,"%s",startup3);
if (*startup4) lprintf(LO_INFO,"%s",startup4);
if (*startup5) lprintf(LO_INFO,"%s",startup5);
// End new startup strings
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"M_Init: Init miscellaneous info.\n");
M_Init();
#ifdef HAVE_NET
// CPhipps - now wait for netgame start
D_CheckNetGame();
#endif
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"R_Init: Init DOOM refresh daemon - ");
R_Init();
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"\nP_Init: Init Playloop state.\n");
P_Init();
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"I_Init: Setting up machine state.\n");
I_Init();
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"S_Init: Setting up sound.\n");
S_Init(snd_SfxVolume /* *8 */, snd_MusicVolume /* *8*/ );
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"HU_Init: Setting up heads up display.\n");
HU_Init();
if (!(M_CheckParm("-nodraw") && M_CheckParm("-nosound")))
I_InitGraphics();
//jff 9/3/98 use logical output routine
lprintf(LO_INFO,"ST_Init: Init status bar.\n");
ST_Init();
idmusnum = -1; //jff 3/17/98 insure idmus number is blank
// CPhipps - auto screenshots
if ((p = M_CheckParm("-autoshot")) && (p < myargc-2))
if ((auto_shot_count = auto_shot_time = atoi(myargv[p+1])))
auto_shot_fname = myargv[p+2];
// start the apropriate game based on parms
// killough 12/98:
// Support -loadgame with -record and reimplement -recordfrom.
if ((slot = M_CheckParm("-recordfrom")) && (p = slot+2) < myargc)
G_RecordDemo(myargv[p]);
else
{
slot = M_CheckParm("-loadgame");
if ((p = M_CheckParm("-record")) && ++p < myargc)
{
autostart = true;
G_RecordDemo(myargv[p]);
}
}
if ((p = M_CheckParm ("-checksum")) && ++p < myargc)
{
P_RecordChecksum (myargv[p]);
}
if ((p = M_CheckParm ("-fastdemo")) && ++p < myargc)
{ // killough
fastdemo = true; // run at fastest speed possible
timingdemo = true; // show stats after quit
G_DeferedPlayDemo(myargv[p]);
singledemo = true; // quit after one demo
}
else
if ((p = M_CheckParm("-timedemo")) && ++p < myargc)
{
singletics = true;
timingdemo = true; // show stats after quit
G_DeferedPlayDemo(myargv[p]);
singledemo = true; // quit after one demo
}
else
if ((p = M_CheckParm("-playdemo")) && ++p < myargc)
{
G_DeferedPlayDemo(myargv[p]);
singledemo = true; // quit after one demo
}
if (slot && ++slot < myargc)
{
slot = atoi(myargv[slot]); // killough 3/16/98: add slot info
G_LoadGame(slot, true); // killough 5/15/98: add command flag // cph - no filename
}
else
if (!singledemo) { /* killough 12/98 */
if (autostart || netgame)
{
G_InitNew(startskill, startepisode, startmap);
if (demorecording)
G_BeginRecording();
}
else
D_StartTitle(); // start up intro loop
}
}
void P_SpawnSpecials (void)
{
sector_t *sector;
int i;
int episode;
episode = 1;
if (W_CheckNumForName("texture2") >= 0)
episode = 2;
//
// Init special SECTORs
//
sector = sectors;
for (i=0 ; i<numsectors ; i++, sector++)
{
if (!sector->special)
continue;
switch (sector->special)
{
case 1: // FLICKERING LIGHTS
P_SpawnLightFlash (sector);
break;
case 2: // STROBE FAST
P_SpawnStrobeFlash(sector,FASTDARK,0);
break;
case 3: // STROBE SLOW
P_SpawnStrobeFlash(sector,SLOWDARK,0);
break;
case 4: // STROBE FAST/DEATH SLIME
P_SpawnStrobeFlash(sector,FASTDARK,0);
sector->special = 4;
break;
case 8: // GLOWING LIGHT
P_SpawnGlowingLight(sector);
break;
case 9: // SECRET SECTOR
totalsecret++;
break;
case 10: // DOOR CLOSE IN 30 SECONDS
P_SpawnDoorCloseIn30 (sector);
break;
case 12: // SYNC STROBE SLOW
P_SpawnStrobeFlash (sector, SLOWDARK, 1);
break;
case 13: // SYNC STROBE FAST
P_SpawnStrobeFlash (sector, FASTDARK, 1);
break;
case 14: // DOOR RAISE IN 5 MINUTES
P_SpawnDoorRaiseIn5Mins (sector, i);
break;
}
}
//
// Init line EFFECTs
//
numlinespecials = 0;
for (i = 0;i < numlines; i++)
switch(lines[i].special)
{
case 48: // Effect_Scroll_Left
case 99: // Effect_Scroll_Right
linespeciallist[numlinespecials] = &lines[i];
numlinespecials++;
break;
}
//
// Init other misc stuff
//
for (i = 0;i < MAXCEILINGS;i++)
activeceilings[i] = NULL;
for (i = 0;i < MAXPLATS;i++)
activeplats[i] = NULL;
for (i = 0;i < MAXBUTTONS;i++)
memset(&buttonlist[i],0,sizeof(button_t));
}
void HU_Init(void)
{
int j = HU_FONTSTART;
int lump;
char buffer[9];
// load the heads-up font
for (int i = 0; i < HU_FONTSIZE; i++)
{
M_snprintf(buffer, sizeof(buffer), "STCFN%.3d", j++);
hu_font[i] = W_CacheLumpName(buffer);
caretcolor = FindDominantColor(hu_font[i]);
}
if (W_CheckMultipleLumps("STTMINUS") > 1 || W_CheckMultipleLumps("STTNUM0") == 1)
minuspatch = W_CacheLumpName("STTMINUS");
tempscreen = Z_Malloc(SCREENWIDTH * SCREENHEIGHT, PU_STATIC, NULL);
if ((lump = W_CheckNumForName("MEDIA0")) >= 0)
healthpatch = W_CacheLumpNum(lump);
if ((lump = W_CheckNumForName("PSTRA0")) >= 0)
berserkpatch = W_CacheLumpNum(lump);
else
berserkpatch = healthpatch;
if ((lump = W_CheckNumForName("ARM1A0")) >= 0)
greenarmorpatch = W_CacheLumpNum(lump);
if ((lump = W_CheckNumForName("ARM2A0")) >= 0)
bluearmorpatch = W_CacheLumpNum(lump);
ammopic[am_clip].patch = HU_LoadHUDAmmoPatch(am_clip);
ammopic[am_shell].patch = HU_LoadHUDAmmoPatch(am_shell);
if (gamemode != shareware)
ammopic[am_cell].patch = HU_LoadHUDAmmoPatch(am_cell);
ammopic[am_misl].patch = HU_LoadHUDAmmoPatch(am_misl);
keypic[it_bluecard].patch = HU_LoadHUDKeyPatch(it_bluecard);
keypic[it_yellowcard].patch = HU_LoadHUDKeyPatch(hacx ? it_yellowskull : it_yellowcard);
keypic[it_redcard].patch = HU_LoadHUDKeyPatch(it_redcard);
if (gamemode != shareware)
{
keypic[it_blueskull].patch = HU_LoadHUDKeyPatch(it_blueskull);
keypic[it_yellowskull].patch = HU_LoadHUDKeyPatch(it_yellowskull);
keypic[it_redskull].patch = HU_LoadHUDKeyPatch(it_redskull);
}
if ((lump = W_CheckNumForName(M_CheckParm("-cdrom") ? "STCDROM" : "STDISK")) >= 0)
{
stdisk = W_CacheLumpNum(lump);
stdiskwidth = SHORT(stdisk->width);
}
s_STSTR_BEHOLD2 = M_StringCompare(s_STSTR_BEHOLD, STSTR_BEHOLD2);
if (!M_StringCompare(playername, playername_default))
s_GOTMEDINEED = s_GOTMEDINEED2;
HU_AltInit();
HU_SetTranslucency();
}
//
// D_DoomMain
//
void D_DoomMain (void)
{
int p;
char file[256];
char demolumpname[9];
int numiwadlumps;
I_AtExit(D_Endoom, false);
// print banner
I_PrintBanner(PACKAGE_STRING);
DEH_printf("Z_Init: Init zone memory allocation daemon. \n");
Z_Init ();
#ifdef FEATURE_MULTIPLAYER
//!
// @category net
//
// Start a dedicated server, routing packets but not participating
// in the game itself.
//
if (M_CheckParm("-dedicated") > 0)
{
printf("Dedicated server mode.\n");
NET_DedicatedServer();
// Never returns
}
//!
// @category net
//
// Query the Internet master server for a global list of active
// servers.
//
if (M_CheckParm("-search"))
{
NET_MasterQuery();
exit(0);
}
//!
// @arg <address>
// @category net
//
// Query the status of the server running on the given IP
// address.
//
p = M_CheckParmWithArgs("-query", 1);
if (p)
{
NET_QueryAddress(myargv[p+1]);
exit(0);
}
//!
// @category net
//
// Search the local LAN for running servers.
//
if (M_CheckParm("-localsearch"))
{
NET_LANQuery();
exit(0);
}
#endif
//!
// @vanilla
//
// Disable monsters.
//
nomonsters = M_CheckParm ("-nomonsters");
//!
// @vanilla
//
// Monsters respawn after being killed.
//
respawnparm = M_CheckParm ("-respawn");
//!
// @vanilla
//
// Monsters move faster.
//
fastparm = M_CheckParm ("-fast");
//!
// @vanilla
//
// Developer mode. F1 saves a screenshot in the current working
// directory.
//
devparm = M_CheckParm ("-devparm");
I_DisplayFPSDots(devparm);
//!
// @category net
// @vanilla
//
// Start a deathmatch game.
//
if (M_CheckParm ("-deathmatch"))
deathmatch = 1;
//!
// @category net
// @vanilla
//
// Start a deathmatch 2.0 game. Weapons do not stay in place and
// all items respawn after 30 seconds.
//
if (M_CheckParm ("-altdeath"))
deathmatch = 2;
if (devparm)
DEH_printf(D_DEVSTR);
// find which dir to use for config files
#ifdef _WIN32
//!
// @platform windows
// @vanilla
//
// Save configuration data and savegames in c:\doomdata,
// allowing play from CD.
//
if (M_ParmExists("-cdrom"))
{
printf(D_CDROM);
M_SetConfigDir("c:\\doomdata\\");
}
else
#endif
{
// Auto-detect the configuration dir.
M_SetConfigDir(NULL);
}
//!
// @arg <x>
// @vanilla
//
// Turbo mode. The player's speed is multiplied by x%. If unspecified,
// x defaults to 200. Values are rounded up to 10 and down to 400.
//
if ( (p=M_CheckParm ("-turbo")) )
{
int scale = 200;
extern int forwardmove[2];
extern int sidemove[2];
if (p<myargc-1)
scale = atoi (myargv[p+1]);
if (scale < 10)
scale = 10;
if (scale > 400)
scale = 400;
DEH_printf("turbo scale: %i%%\n", scale);
forwardmove[0] = forwardmove[0]*scale/100;
forwardmove[1] = forwardmove[1]*scale/100;
sidemove[0] = sidemove[0]*scale/100;
sidemove[1] = sidemove[1]*scale/100;
}
// init subsystems
DEH_printf("V_Init: allocate screens.\n");
V_Init ();
// Load configuration files before initialising other subsystems.
DEH_printf("M_LoadDefaults: Load system defaults.\n");
M_SetConfigFilenames("default.cfg", PROGRAM_PREFIX "doom.cfg");
D_BindVariables();
M_LoadDefaults();
// Save configuration at exit.
I_AtExit(M_SaveDefaults, false);
// Find main IWAD file and load it.
iwadfile = D_FindIWAD(IWAD_MASK_DOOM, &gamemission);
// None found?
if (iwadfile == NULL)
{
I_Error("Game mode indeterminate. No IWAD file was found. Try\n"
"specifying one with the '-iwad' command line parameter.\n");
}
modifiedgame = false;
DEH_printf("W_Init: Init WADfiles.\n");
D_AddFile(iwadfile);
numiwadlumps = numlumps;
W_CheckCorrectIWAD(doom);
// Now that we've loaded the IWAD, we can figure out what gamemission
// we're playing and which version of Vanilla Doom we need to emulate.
D_IdentifyVersion();
InitGameVersion();
//!
// @category mod
//
// Disable automatic loading of Dehacked patches for certain
// IWAD files.
//
if (!M_ParmExists("-nodeh"))
{
// Some IWADs have dehacked patches that need to be loaded for
// them to be played properly.
LoadIwadDeh();
}
// Doom 3: BFG Edition includes modified versions of the classic
// IWADs which can be identified by an additional DMENUPIC lump.
// Furthermore, the M_GDHIGH lumps have been modified in a way that
// makes them incompatible to Vanilla Doom and the modified version
// of doom2.wad is missing the TITLEPIC lump.
// We specifically check for DMENUPIC here, before PWADs have been
// loaded which could probably include a lump of that name.
if (W_CheckNumForName("dmenupic") >= 0)
{
printf("BFG Edition: Using workarounds as needed.\n");
bfgedition = true;
// BFG Edition changes the names of the secret levels to
// censor the Wolfenstein references. It also has an extra
// secret level (MAP33). In Vanilla Doom (meaning the DOS
// version), MAP33 overflows into the Plutonia level names
// array, so HUSTR_33 is actually PHUSTR_1.
DEH_AddStringReplacement(HUSTR_31, "level 31: idkfa");
DEH_AddStringReplacement(HUSTR_32, "level 32: keen");
DEH_AddStringReplacement(PHUSTR_1, "level 33: betray");
// The BFG edition doesn't have the "low detail" menu option (fair
// enough). But bizarrely, it reuses the M_GDHIGH patch as a label
// for the options menu (says "Fullscreen:"). Why the perpetrators
// couldn't just add a new graphic lump and had to reuse this one,
// I don't know.
//
// The end result is that M_GDHIGH is too wide and causes the game
// to crash. As a workaround to get a minimum level of support for
// the BFG edition IWADs, use the "ON"/"OFF" graphics instead.
DEH_AddStringReplacement("M_GDHIGH", "M_MSGON");
DEH_AddStringReplacement("M_GDLOW", "M_MSGOFF");
}
#ifdef FEATURE_DEHACKED
// Load Dehacked patches specified on the command line with -deh.
// Note that there's a very careful and deliberate ordering to how
// Dehacked patches are loaded. The order we use is:
// 1. IWAD dehacked patches.
// 2. Command line dehacked patches specified with -deh.
// 3. PWAD dehacked patches in DEHACKED lumps.
DEH_ParseCommandLine();
#endif
// Load PWAD files.
modifiedgame = W_ParseCommandLine();
// Debug:
// W_PrintDirectory();
//!
// @arg <demo>
// @category demo
// @vanilla
//
// Play back the demo named demo.lmp.
//
p = M_CheckParmWithArgs ("-playdemo", 1);
if (!p)
{
//!
// @arg <demo>
// @category demo
// @vanilla
//
// Play back the demo named demo.lmp, determining the framerate
// of the screen.
//
p = M_CheckParmWithArgs("-timedemo", 1);
}
if (p)
{
char *uc_filename = strdup(myargv[p + 1]);
M_ForceUppercase(uc_filename);
// With Vanilla you have to specify the file without extension,
// but make that optional.
if (M_StringEndsWith(uc_filename, ".LMP"))
{
M_StringCopy(file, myargv[p + 1], sizeof(file));
}
else
{
DEH_snprintf(file, sizeof(file), "%s.lmp", myargv[p+1]);
}
free(uc_filename);
if (D_AddFile(file))
{
M_StringCopy(demolumpname, lumpinfo[numlumps - 1]->name,
sizeof(demolumpname));
}
else
{
// If file failed to load, still continue trying to play
// the demo in the same way as Vanilla Doom. This makes
// tricks like "-playdemo demo1" possible.
M_StringCopy(demolumpname, myargv[p + 1], sizeof(demolumpname));
}
printf("Playing demo %s.\n", file);
}
I_AtExit(G_CheckDemoStatusAtExit, true);
// Generate the WAD hash table. Speed things up a bit.
W_GenerateHashTable();
// Load DEHACKED lumps from WAD files - but only if we give the right
// command line parameter.
//!
// @category mod
//
// Load Dehacked patches from DEHACKED lumps contained in one of the
// loaded PWAD files.
//
if (M_ParmExists("-dehlump"))
{
int i, loaded = 0;
for (i = numiwadlumps; i < numlumps; ++i)
{
if (!strncmp(lumpinfo[i]->name, "DEHACKED", 8))
{
DEH_LoadLump(i, false, false);
loaded++;
}
}
printf(" loaded %i DEHACKED lumps from PWAD files.\n", loaded);
}
// Set the gamedescription string. This is only possible now that
// we've finished loading Dehacked patches.
D_SetGameDescription();
#ifdef _WIN32
// In -cdrom mode, we write savegames to c:\doomdata as well as configs.
if (M_ParmExists("-cdrom"))
{
savegamedir = configdir;
}
else
#endif
{
savegamedir = M_GetSaveGameDir(D_SaveGameIWADName(gamemission));
}
// Check for -file in shareware
if (modifiedgame)
{
// These are the lumps that will be checked in IWAD,
// if any one is not present, execution will be aborted.
char name[23][8]=
{
"e2m1","e2m2","e2m3","e2m4","e2m5","e2m6","e2m7","e2m8","e2m9",
"e3m1","e3m3","e3m3","e3m4","e3m5","e3m6","e3m7","e3m8","e3m9",
"dphoof","bfgga0","heada1","cybra1","spida1d1"
};
int i;
if ( gamemode == shareware)
I_Error(DEH_String("\nYou cannot -file with the shareware "
"version. Register!"));
// Check for fake IWAD with right name,
// but w/o all the lumps of the registered version.
if (gamemode == registered)
for (i = 0;i < 23; i++)
if (W_CheckNumForName(name[i])<0)
I_Error(DEH_String("\nThis is not the registered version."));
}
if (W_CheckNumForName("SS_START") >= 0
|| W_CheckNumForName("FF_END") >= 0)
{
I_PrintDivider();
printf(" WARNING: The loaded WAD file contains modified sprites or\n"
" floor textures. You may want to use the '-merge' command\n"
" line option instead of '-file'.\n");
}
I_PrintStartupBanner(gamedescription);
PrintDehackedBanners();
// Freedoom's IWADs are Boom-compatible, which means they usually
// don't work in Vanilla (though FreeDM is okay). Show a warning
// message and give a link to the website.
if (W_CheckNumForName("FREEDOOM") >= 0 && W_CheckNumForName("FREEDM") < 0)
{
printf(" WARNING: You are playing using one of the Freedoom IWAD\n"
" files, which might not work in this port. See this page\n"
" for more information on how to play using Freedoom:\n"
" http://www.chocolate-doom.org/wiki/index.php/Freedoom\n");
I_PrintDivider();
}
DEH_printf("I_Init: Setting up machine state.\n");
I_CheckIsScreensaver();
I_InitTimer();
I_InitJoystick();
I_InitSound(true);
I_InitMusic();
#ifdef FEATURE_MULTIPLAYER
printf ("NET_Init: Init network subsystem.\n");
NET_Init ();
#endif
// Initial netgame startup. Connect to server etc.
D_ConnectNetGame();
// get skill / episode / map from parms
startskill = sk_medium;
startepisode = 1;
startmap = 1;
autostart = false;
//!
// @arg <skill>
// @vanilla
//
// Set the game skill, 1-5 (1: easiest, 5: hardest). A skill of
// 0 disables all monsters.
//
p = M_CheckParmWithArgs("-skill", 1);
if (p)
{
startskill = myargv[p+1][0]-'1';
autostart = true;
}
//!
// @arg <n>
// @vanilla
//
// Start playing on episode n (1-4)
//
p = M_CheckParmWithArgs("-episode", 1);
if (p)
{
startepisode = myargv[p+1][0]-'0';
startmap = 1;
autostart = true;
}
timelimit = 0;
//!
// @arg <n>
// @category net
// @vanilla
//
// For multiplayer games: exit each level after n minutes.
//
p = M_CheckParmWithArgs("-timer", 1);
if (p)
{
timelimit = atoi(myargv[p+1]);
}
//!
// @category net
// @vanilla
//
// Austin Virtual Gaming: end levels after 20 minutes.
//
p = M_CheckParm ("-avg");
if (p)
{
timelimit = 20;
}
//!
// @arg [<x> <y> | <xy>]
// @vanilla
//
// Start a game immediately, warping to ExMy (Doom 1) or MAPxy
// (Doom 2)
//
p = M_CheckParmWithArgs("-warp", 1);
if (p)
{
if (gamemode == commercial)
startmap = atoi (myargv[p+1]);
else
{
startepisode = myargv[p+1][0]-'0';
if (p + 2 < myargc)
{
startmap = myargv[p+2][0]-'0';
}
else
{
startmap = 1;
}
}
autostart = true;
}
// Undocumented:
// Invoked by setup to test the controls.
p = M_CheckParm("-testcontrols");
if (p > 0)
{
startepisode = 1;
startmap = 1;
autostart = true;
testcontrols = true;
}
// Check for load game parameter
// We do this here and save the slot number, so that the network code
// can override it or send the load slot to other players.
//!
// @arg <s>
// @vanilla
//
// Load the game in slot s.
//
p = M_CheckParmWithArgs("-loadgame", 1);
if (p)
{
startloadgame = atoi(myargv[p+1]);
}
else
{
// Not loading a game
startloadgame = -1;
}
DEH_printf("M_Init: Init miscellaneous info.\n");
M_Init ();
DEH_printf("R_Init: Init DOOM refresh daemon - ");
R_Init ();
DEH_printf("\nP_Init: Init Playloop state.\n");
P_Init ();
DEH_printf("S_Init: Setting up sound.\n");
S_Init (sfxVolume * 8, musicVolume * 8);
DEH_printf("D_CheckNetGame: Checking network game status.\n");
D_CheckNetGame ();
PrintGameVersion();
DEH_printf("HU_Init: Setting up heads up display.\n");
HU_Init ();
DEH_printf("ST_Init: Init status bar.\n");
ST_Init ();
// If Doom II without a MAP01 lump, this is a store demo.
// Moved this here so that MAP01 isn't constantly looked up
// in the main loop.
if (gamemode == commercial && W_CheckNumForName("map01") < 0)
storedemo = true;
if (M_CheckParmWithArgs("-statdump", 1))
{
I_AtExit(StatDump, true);
DEH_printf("External statistics registered.\n");
}
//!
// @arg <x>
// @category demo
// @vanilla
//
// Record a demo named x.lmp.
//
p = M_CheckParmWithArgs("-record", 1);
if (p)
{
G_RecordDemo (myargv[p+1]);
autostart = true;
}
p = M_CheckParmWithArgs("-playdemo", 1);
if (p)
{
singledemo = true; // quit after one demo
G_DeferedPlayDemo (demolumpname);
D_DoomLoop (); // never returns
}
p = M_CheckParmWithArgs("-timedemo", 1);
if (p)
{
G_TimeDemo (demolumpname);
D_DoomLoop (); // never returns
}
if (startloadgame >= 0)
{
M_StringCopy(file, P_SaveGameFile(startloadgame), sizeof(file));
G_LoadGame(file);
}
if (gameaction != ga_loadgame )
{
if (autostart || netgame)
G_InitNew (startskill, startepisode, startmap);
else
D_StartTitle (); // start up intro loop
}
D_DoomLoop (); // never returns
}
boolean NET_CL_Connect(net_addr_t *addr)
{
int start_time;
int last_send_time;
server_addr = addr;
// Are we recording a demo? Possibly set lowres turn mode
if (M_CheckParm("-record") > 0 && M_CheckParm("-longtics") == 0)
{
lowres_turn = true;
}
// Read checksums of our WAD directory and dehacked information
W_Checksum(net_local_wad_md5sum);
DEH_Checksum(net_local_deh_md5sum);
// Are we playing with the Freedoom IWAD?
net_local_is_freedoom = W_CheckNumForName("FREEDOOM") >= 0;
// create a new network I/O context and add just the
// necessary module
client_context = NET_NewContext();
// initialize module for client mode
if (!addr->module->InitClient())
{
return false;
}
NET_AddModule(client_context, addr->module);
net_client_connected = true;
net_client_received_wait_data = false;
// Initialize connection
NET_Conn_InitClient(&client_connection, addr);
// try to connect
start_time = I_GetTimeMS();
last_send_time = -1;
while (client_connection.state == NET_CONN_STATE_CONNECTING)
{
int nowtime = I_GetTimeMS();
// Send a SYN packet every second.
if (nowtime - last_send_time > 1000 || last_send_time < 0)
{
NET_CL_SendSYN();
last_send_time = nowtime;
}
// time out after 5 seconds
if (nowtime - start_time > 5000)
{
break;
}
// run client code
NET_CL_Run();
// run the server, just incase we are doing a loopback
// connect
NET_SV_Run();
// Don't hog the CPU
I_Sleep(1);
}
if (client_connection.state == NET_CONN_STATE_CONNECTED)
{
// connected ok!
client_state = CLIENT_STATE_WAITING_START;
return true;
}
else
{
// failed to connect
NET_CL_Shutdown();
return false;
}
}
//
// This cycles through the demo sequences.
// FIXME - version dependend demo numbers?
//
void D_DoAdvanceDemo (void)
{
players[consoleplayer].playerstate = PST_LIVE; // not reborn
advancedemo = false;
usergame = false; // no save / end game here
paused = false;
gameaction = ga_nothing;
// The Ultimate Doom executable changed the demo sequence to add
// a DEMO4 demo. Final Doom was based on Ultimate, so also
// includes this change; however, the Final Doom IWADs do not
// include a DEMO4 lump, so the game bombs out with an error
// when it reaches this point in the demo sequence.
// However! There is an alternate version of Final Doom that
// includes a fixed executable.
if (gameversion == exe_ultimate || gameversion == exe_final)
demosequence = (demosequence+1)%7;
else
demosequence = (demosequence+1)%6;
switch (demosequence)
{
case 0:
if ( gamemode == commercial )
pagetic = TICRATE * 11;
else
pagetic = 170;
gamestate = GS_DEMOSCREEN;
pagename = DEH_String("TITLEPIC");
if ( gamemode == commercial )
S_StartMusic(mus_dm2ttl);
else
S_StartMusic (mus_intro);
break;
case 1:
G_DeferedPlayDemo(DEH_String("demo1"));
break;
case 2:
pagetic = 200;
gamestate = GS_DEMOSCREEN;
pagename = DEH_String("CREDIT");
break;
case 3:
G_DeferedPlayDemo(DEH_String("demo2"));
break;
case 4:
gamestate = GS_DEMOSCREEN;
if ( gamemode == commercial)
{
pagetic = TICRATE * 11;
pagename = DEH_String("TITLEPIC");
S_StartMusic(mus_dm2ttl);
}
else
{
pagetic = 200;
if ( gamemode == retail )
pagename = DEH_String("CREDIT");
else
pagename = DEH_String("HELP2");
}
break;
case 5:
G_DeferedPlayDemo(DEH_String("demo3"));
break;
// THE DEFINITIVE DOOM Special Edition demo
case 6:
G_DeferedPlayDemo(DEH_String("demo4"));
break;
}
// The Doom 3: BFG Edition version of doom2.wad does not have a
// TITLETPIC lump. Use INTERPIC instead as a workaround.
if (bfgedition && !strcasecmp(pagename, "TITLEPIC")
&& W_CheckNumForName("titlepic") < 0)
{
pagename = DEH_String("INTERPIC");
}
}
static void InitConnectData(net_connect_data_t *connect_data)
{
boolean shorttics;
connect_data->max_players = MAXPLAYERS;
connect_data->drone = false;
//!
// @category net
//
// Run as the left screen in three screen mode.
//
if (M_CheckParm("-left") > 0)
{
viewangleoffset = ANG90;
connect_data->drone = true;
}
//!
// @category net
//
// Run as the right screen in three screen mode.
//
if (M_CheckParm("-right") > 0)
{
viewangleoffset = ANG270;
connect_data->drone = true;
}
//
// Connect data
//
// Game type fields:
connect_data->gamemode = gamemode;
connect_data->gamemission = gamemission;
//!
// @category demo
//
// Play with low turning resolution to emulate demo recording.
//
shorttics = M_ParmExists("-shorttics");
// Are we recording a demo? Possibly set lowres turn mode
connect_data->lowres_turn = (M_ParmExists("-record")
&& !M_ParmExists("-longtics"))
|| shorttics;
// Read checksums of our WAD directory and dehacked information
W_Checksum(connect_data->wad_sha1sum);
DEH_Checksum(connect_data->deh_sha1sum);
// Are we playing with the Freedoom IWAD?
connect_data->is_freedoom = W_CheckNumForName("FREEDOOM") >= 0;
}
void D_IdentifyVersion(void)
{
// gamemission is set up by the D_FindIWAD function. But if
// we specify '-iwad', we have to identify using
// IdentifyIWADByName. However, if the iwad does not match
// any known IWAD name, we may have a dilemma. Try to
// identify by its contents.
if (gamemission == none)
{
unsigned int i;
for (i=0; i<numlumps; ++i)
{
if (!strncasecmp(lumpinfo[i]->name, "MAP01", 8))
{
gamemission = doom2;
break;
}
else if (!strncasecmp(lumpinfo[i]->name, "E1M1", 8))
{
gamemission = doom;
break;
}
}
if (gamemission == none)
{
// Still no idea. I don't think this is going to work.
I_Error("Unknown or invalid IWAD file.");
}
}
// Make sure gamemode is set up correctly
if (logical_gamemission == doom)
{
// Doom 1. But which version?
if (W_CheckNumForName("E4M1") > 0)
{
// Ultimate Doom
gamemode = retail;
}
else if (W_CheckNumForName("E3M1") > 0)
{
gamemode = registered;
}
else
{
gamemode = shareware;
}
}
else
{
int p;
// Doom 2 of some kind.
gamemode = commercial;
// We can manually override the gamemission that we got from the
// IWAD detection code. This allows us to eg. play Plutonia 2
// with Freedoom and get the right level names.
//!
// @arg <pack>
//
// Explicitly specify a Doom II "mission pack" to run as, instead of
// detecting it based on the filename. Valid values are: "doom2",
// "tnt" and "plutonia".
//
p = M_CheckParmWithArgs("-pack", 1);
if (p > 0)
{
SetMissionForPackName(myargv[p + 1]);
}
}
}
/**
* Post Engine Initialization routine.
* All game-specific actions that should take place at this time go here.
*/
void G_PostInit(void)
{
int p;
char file[256];
char mapStr[6];
// Common post init routine
G_CommonPostInit();
// Initialize ammo info.
P_InitAmmoInfo();
// Initialize weapon info.
P_InitWeaponInfo();
// Print a game mode banner with rulers.
Con_FPrintf(CBLF_RULER | CBLF_WHITE | CBLF_CENTER,
gamemode ==
retail ? "The Ultimate DOOM Startup\n" : gamemode ==
shareware ? "DOOM Shareware Startup\n" : gamemode ==
registered ? "DOOM Registered Startup\n" : gamemode ==
commercial ? (gamemission ==
GM_PLUT ?
"Final DOOM: The Plutonia Experiment\n" :
gamemission ==
GM_TNT ? "Final DOOM: TNT: Evilution\n" :
"DOOM 2: Hell on Earth\n") : "Public DOOM\n");
Con_FPrintf(CBLF_RULER, "");
// Game parameters.
monsterinfight = GetDefInt("AI|Infight", 0);
// get skill / episode / map from parms
gameskill = startskill = SM_NOITEMS;
startepisode = 1;
startmap = 1;
autostart = false;
// Game mode specific settings
// Plutonia and TNT automatically turn on the full sky.
if(gamemode == commercial &&
(gamemission == GM_PLUT || gamemission == GM_TNT))
{
Con_SetInteger("rend-sky-full", 1, true);
}
// Command line options
nomonsters = ArgCheck("-nomonsters");
respawnparm = ArgCheck("-respawn");
fastparm = ArgCheck("-fast");
devparm = ArgCheck("-devparm");
if(ArgCheck("-altdeath"))
cfg.netDeathmatch = 2;
else if(ArgCheck("-deathmatch"))
cfg.netDeathmatch = 1;
p = ArgCheck("-skill");
if(p && p < myargc - 1)
{
startskill = Argv(p + 1)[0] - '1';
autostart = true;
}
p = ArgCheck("-episode");
if(p && p < myargc - 1)
{
startepisode = Argv(p + 1)[0] - '0';
startmap = 1;
autostart = true;
}
p = ArgCheck("-timer");
if(p && p < myargc - 1 && deathmatch)
{
int time;
time = atoi(Argv(p + 1));
Con_Message("Levels will end after %d minute", time);
if(time > 1)
Con_Message("s");
Con_Message(".\n");
}
p = ArgCheck("-warp");
if(p && p < myargc - 1)
{
if(gamemode == commercial)
{
startmap = atoi(Argv(p + 1));
autostart = true;
}
else if(p < myargc - 2)
{
startepisode = Argv(p + 1)[0] - '0';
startmap = Argv(p + 2)[0] - '0';
autostart = true;
}
}
// turbo option
p = ArgCheck("-turbo");
turboMul = 1.0f;
if(p)
{
int scale = 200;
turboparm = true;
if(p < myargc - 1)
scale = atoi(Argv(p + 1));
if(scale < 10)
scale = 10;
if(scale > 400)
scale = 400;
Con_Message("turbo scale: %i%%\n", scale);
turboMul = scale / 100.f;
}
// Are we autostarting?
if(autostart)
{
if(gamemode == commercial)
Con_Message("Warp to Map %d, Skill %d\n", startmap, startskill + 1);
else
Con_Message("Warp to Episode %d, Map %d, Skill %d\n", startepisode,
startmap, startskill + 1);
}
// Load a saved game?
p = ArgCheck("-loadgame");
if(p && p < myargc - 1)
{
SV_GetSaveGameFileName(Argv(p + 1)[0] - '0', file);
G_LoadGame(file);
}
// Check valid episode and map
if((autostart || IS_NETGAME))
{
if(gamemode == commercial)
sprintf(mapStr,"MAP%2.2d", startmap);
else
sprintf(mapStr,"E%d%d",startepisode, startmap);
if(!W_CheckNumForName(mapStr))
{
startepisode = 1;
startmap = 1;
}
}
// Print a string showing the state of the game parameters
Con_Message("Game state parameters:%s%s%s%s%s\n",
nomonsters? " nomonsters" : "",
respawnparm? " respawn" : "",
fastparm? " fast" : "",
turboparm? " turbo" : "",
(cfg.netDeathmatch ==1)? " deathmatch" :
(cfg.netDeathmatch ==2)? " altdeath" : "");
if(G_GetGameAction() != GA_LOADGAME)
{
if(autostart || IS_NETGAME)
{
G_DeferedInitNew(startskill, startepisode, startmap);
}
else
{
G_StartTitle(); // start up intro loop
}
}
}
static void InitGameVersion(void)
{
byte *demolump;
char demolumpname[6];
int demoversion;
int p;
int i;
boolean status;
//!
// @arg <version>
// @category compat
//
// Emulate a specific version of Doom. Valid values are "1.666",
// "1.7", "1.8", "1.9", "ultimate", "final", "final2", "hacx" and
// "chex".
//
p = M_CheckParmWithArgs("-gameversion", 1);
if (p)
{
for (i=0; gameversions[i].description != NULL; ++i)
{
if (!strcmp(myargv[p+1], gameversions[i].cmdline))
{
gameversion = gameversions[i].version;
break;
}
}
if (gameversions[i].description == NULL)
{
printf("Supported game versions:\n");
for (i=0; gameversions[i].description != NULL; ++i)
{
printf("\t%s (%s)\n", gameversions[i].cmdline,
gameversions[i].description);
}
I_Error("Unknown game version '%s'", myargv[p+1]);
}
}
else
{
// Determine automatically
if (gamemission == pack_chex)
{
// chex.exe - identified by iwad filename
gameversion = exe_chex;
}
else if (gamemission == pack_hacx)
{
// hacx.exe: identified by iwad filename
gameversion = exe_hacx;
}
else if (gamemode == shareware || gamemode == registered
|| (gamemode == commercial && gamemission == doom2))
{
// original
gameversion = exe_doom_1_9;
// Detect version from demo lump
for (i = 1; i <= 3; ++i)
{
M_snprintf(demolumpname, 6, "demo%i", i);
if (W_CheckNumForName(demolumpname) > 0)
{
demolump = W_CacheLumpName(demolumpname, PU_STATIC);
demoversion = demolump[0];
W_ReleaseLumpName(demolumpname);
status = true;
switch (demoversion)
{
case 106:
gameversion = exe_doom_1_666;
break;
case 107:
gameversion = exe_doom_1_7;
break;
case 108:
gameversion = exe_doom_1_8;
break;
case 109:
gameversion = exe_doom_1_9;
break;
default:
status = false;
break;
}
if (status)
{
break;
}
}
}
}
else if (gamemode == retail)
{
gameversion = exe_ultimate;
}
else if (gamemode == commercial)
{
// Final Doom: tnt or plutonia
// Defaults to emulating the first Final Doom executable,
// which has the crash in the demo loop; however, having
// this as the default should mean that it plays back
// most demos correctly.
gameversion = exe_final;
}
}
// The original exe does not support retail - 4th episode not supported
if (gameversion < exe_ultimate && gamemode == retail)
{
gamemode = registered;
}
// EXEs prior to the Final Doom exes do not support Final Doom.
if (gameversion < exe_final && gamemode == commercial
&& (gamemission == pack_tnt || gamemission == pack_plut))
{
gamemission = doom2;
}
}
//
// R_InitTextures
// Initializes the texture list
// with the textures from the world map.
//
void R_InitTextures (void)
{
maptexture_t* mtexture;
texture_t* texture;
mappatch_t* mpatch;
texpatch_t* patch;
int i;
int j;
int* maptex;
int* maptex2;
int* maptex1;
char name[9];
char* names;
char* name_p;
int* patchlookup;
int totalwidth;
int nummappatches;
int offset;
int maxoff;
int maxoff2;
int numtextures1;
int numtextures2;
int* directory;
int temp1;
int temp2;
int temp3;
// Load the patch names from pnames.lmp.
name[8] = 0;
names = W_CacheLumpName ("PNAMES", PU_STATIC);
nummappatches = LONG ( *((int *)names) );
name_p = names+4;
patchlookup = _alloca (nummappatches*sizeof(*patchlookup));
for (i=0 ; i<nummappatches ; i++)
{
strncpy (name,name_p+i*8, 8);
patchlookup[i] = W_CheckNumForName (name);
}
Z_Free (names);
// Load the map texture definitions from textures.lmp.
// The data is contained in one or two lumps,
// TEXTURE1 for shareware, plus TEXTURE2 for commercial.
maptex = maptex1 = W_CacheLumpName ("TEXTURE1", PU_STATIC);
numtextures1 = LONG(*maptex);
maxoff = W_LumpLength (W_GetNumForName ("TEXTURE1"));
directory = maptex+1;
if (W_CheckNumForName ("TEXTURE2") != -1)
{
maptex2 = W_CacheLumpName ("TEXTURE2", PU_STATIC);
numtextures2 = LONG(*maptex2);
maxoff2 = W_LumpLength (W_GetNumForName ("TEXTURE2"));
}
else
{
maptex2 = NULL;
numtextures2 = 0;
maxoff2 = 0;
}
numtextures = numtextures1 + numtextures2;
textures = Z_Malloc (numtextures*4, PU_STATIC, 0);
texturecolumnlump = Z_Malloc (numtextures*4, PU_STATIC, 0);
texturecolumnofs = Z_Malloc (numtextures*4, PU_STATIC, 0);
texturecomposite = Z_Malloc (numtextures*4, PU_STATIC, 0);
texturecompositesize = Z_Malloc (numtextures*4, PU_STATIC, 0);
texturewidthmask = Z_Malloc (numtextures*4, PU_STATIC, 0);
textureheight = Z_Malloc (numtextures*4, PU_STATIC, 0);
totalwidth = 0;
// Really complex printing shit...
temp1 = W_GetNumForName ("S_START"); // P_???????
temp2 = W_GetNumForName ("S_END") - 1;
temp3 = ((temp2-temp1+63)/64) + ((numtextures+63)/64);
printf("[");
for (i = 0; i < temp3; i++)
printf(" ");
printf(" ]");
for (i = 0; i < temp3; i++)
printf("\x8");
printf("\x8\x8\x8\x8\x8\x8\x8\x8\x8\x8");
for (i=0 ; i<numtextures ; i++, directory++)
{
if (!(i&63))
printf (".");
if (i == numtextures1)
{
// Start looking in second texture file.
maptex = maptex2;
maxoff = maxoff2;
directory = maptex+1;
}
offset = LONG(*directory);
if (offset > maxoff)
I_Error ("R_InitTextures: bad texture directory");
mtexture = (maptexture_t *) ( (byte *)maptex + offset);
texture = textures[i] =
Z_Malloc (sizeof(texture_t)
+ sizeof(texpatch_t)*(SHORT(mtexture->patchcount)-1),
PU_STATIC, 0);
texture->width = SHORT(mtexture->width);
texture->height = SHORT(mtexture->height);
texture->patchcount = SHORT(mtexture->patchcount);
memcpy (texture->name, mtexture->name, sizeof(texture->name));
mpatch = &mtexture->patches[0];
patch = &texture->patches[0];
for (j=0 ; j<texture->patchcount ; j++, mpatch++, patch++)
{
patch->originx = SHORT(mpatch->originx);
patch->originy = SHORT(mpatch->originy);
patch->patch = patchlookup[SHORT(mpatch->patch)];
if (patch->patch == -1)
{
I_Error ("R_InitTextures: Missing patch in texture %s",
texture->name);
}
}
texturecolumnlump[i] = Z_Malloc (texture->width*2, PU_STATIC,0);
texturecolumnofs[i] = Z_Malloc (texture->width*2, PU_STATIC,0);
j = 1;
while (j*2 <= texture->width)
j<<=1;
texturewidthmask[i] = j-1;
textureheight[i] = texture->height<<FRACBITS;
totalwidth += texture->width;
}
Z_Free (maptex1);
if (maptex2)
Z_Free (maptex2);
// Precalculate whatever possible.
for (i=0 ; i<numtextures ; i++)
R_GenerateLookup (i);
// Create translation table for global animation.
texturetranslation = Z_Malloc ((numtextures+1)*4, PU_STATIC, 0);
for (i=0 ; i<numtextures ; i++)
texturetranslation[i] = i;
}
void G_InitNew (const char *mapname)
{
size_t i;
if (!savegamerestore)
G_ClearSnapshots ();
// [RH] Mark all levels as not visited
if (!savegamerestore)
{
for (i = 0; i < wadlevelinfos.size(); i++)
wadlevelinfos[i].flags &= ~LEVEL_VISITED;
for (i = 0; LevelInfos[i].mapname[0]; i++)
LevelInfos[i].flags &= ~LEVEL_VISITED;
}
int old_gametype = sv_gametype.asInt();
cvar_t::UnlatchCVars ();
if(old_gametype != sv_gametype || sv_gametype != GM_COOP) {
unnatural_level_progression = true;
// Nes - Force all players to be spectators when the sv_gametype is not now or previously co-op.
for (i = 0; i < players.size(); i++) {
// [SL] 2011-07-30 - Don't force downloading players to become spectators
// it stops their downloading
if (!players[i].ingame())
continue;
for (size_t j = 0; j < players.size(); j++) {
if (!players[j].ingame())
continue;
MSG_WriteMarker (&(players[j].client.reliablebuf), svc_spectate);
MSG_WriteByte (&(players[j].client.reliablebuf), players[i].id);
MSG_WriteByte (&(players[j].client.reliablebuf), true);
}
players[i].spectator = true;
players[i].playerstate = PST_LIVE;
players[i].joinafterspectatortime = -(TICRATE*5);
}
}
// [SL] 2011-09-01 - Change gamestate here so SV_ServerSettingChange will
// send changed cvars
gamestate = GS_LEVEL;
SV_ServerSettingChange();
if (paused)
{
paused = false;
}
// [RH] If this map doesn't exist, bomb out
if (W_CheckNumForName (mapname) == -1)
{
I_Error ("Could not find map %s\n", mapname);
}
if (sv_skill == sk_nightmare || sv_monstersrespawn)
respawnmonsters = true;
else
respawnmonsters = false;
bool wantFast = sv_fastmonsters || (sv_skill == sk_nightmare);
if (wantFast != isFast)
{
if (wantFast)
{
for (i=S_SARG_RUN1 ; i<=S_SARG_PAIN2 ; i++)
states[i].tics >>= 1;
mobjinfo[MT_BRUISERSHOT].speed = 20*FRACUNIT;
mobjinfo[MT_HEADSHOT].speed = 20*FRACUNIT;
mobjinfo[MT_TROOPSHOT].speed = 20*FRACUNIT;
}
else
{
for (i=S_SARG_RUN1 ; i<=S_SARG_PAIN2 ; i++)
states[i].tics <<= 1;
mobjinfo[MT_BRUISERSHOT].speed = 15*FRACUNIT;
mobjinfo[MT_HEADSHOT].speed = 10*FRACUNIT;
mobjinfo[MT_TROOPSHOT].speed = 10*FRACUNIT;
}
isFast = wantFast;
}
//
// D_SRB2Main
//
void D_SRB2Main(void)
{
INT32 p;
char srb2[82]; // srb2 title banner
char title[82];
INT32 pstartmap = 1;
boolean autostart = false;
// keep error messages until the final flush(stderr)
#if !defined (PC_DOS) && !defined (_WIN32_WCE) && !defined(NOTERMIOS)
if (setvbuf(stderr, NULL, _IOFBF, 1000))
I_OutputMsg("setvbuf didnt work\n");
#endif
#ifdef GETTEXT
// initialise locale code
M_StartupLocale();
#endif
// get parameters from a response file (eg: srb2 @parms.txt)
M_FindResponseFile();
// MAINCFG is now taken care of where "OBJCTCFG" is handled
G_LoadGameSettings();
// Test Dehacked lists
DEH_Check();
// identify the main IWAD file to use
IdentifyVersion();
#if !defined (_WIN32_WCE) && !defined(NOTERMIOS)
setbuf(stdout, NULL); // non-buffered output
#endif
#if defined (_WIN32_WCE) //|| defined (_DEBUG) || defined (GP2X)
devparm = !M_CheckParm("-nodebug");
#else
devparm = M_CheckParm("-debug");
#endif
// for dedicated server
#if !defined (_WINDOWS) //already check in win_main.c
dedicated = M_CheckParm("-dedicated") != 0;
#endif
strcpy(title, "Sonic Robo Blast 2");
strcpy(srb2, "Sonic Robo Blast 2");
D_MakeTitleString(srb2);
#ifdef PC_DOS
D_Titlebar(srb2, title);
#endif
#if defined (__OS2__) && !defined (SDL)
// set PM window title
snprintf(pmData->title, sizeof (pmData->title),
"Sonic Robo Blast 2" VERSIONSTRING ": %s",
title);
pmData->title[sizeof (pmData->title) - 1] = '\0';
#endif
if (devparm)
CONS_Printf(M_GetText("Development mode ON.\n"));
// default savegame
strcpy(savegamename, SAVEGAMENAME"%u.ssg");
{
const char *userhome = D_Home(); //Alam: path to home
if (!userhome)
{
#if ((defined (__unix__) && !defined (MSDOS)) || defined(__APPLE__) || defined (UNIXCOMMON)) && !defined (__CYGWIN__) && !defined (DC) && !defined (PSP) && !defined(GP2X)
I_Error("Please set $HOME to your home directory\n");
#elif defined (_WIN32_WCE) && 0
if (dedicated)
snprintf(configfile, sizeof configfile, "/Storage Card/SRB2DEMO/d"CONFIGFILENAME);
else
snprintf(configfile, sizeof configfile, "/Storage Card/SRB2DEMO/"CONFIGFILENAME);
#else
if (dedicated)
snprintf(configfile, sizeof configfile, "d"CONFIGFILENAME);
else
snprintf(configfile, sizeof configfile, CONFIGFILENAME);
#endif
}
else
{
// use user specific config file
#ifdef DEFAULTDIR
snprintf(srb2home, sizeof srb2home, "%s" PATHSEP DEFAULTDIR, userhome);
snprintf(downloaddir, sizeof downloaddir, "%s" PATHSEP "DOWNLOAD", srb2home);
if (dedicated)
snprintf(configfile, sizeof configfile, "%s" PATHSEP "d"CONFIGFILENAME, srb2home);
else
snprintf(configfile, sizeof configfile, "%s" PATHSEP CONFIGFILENAME, srb2home);
// can't use sprintf since there is %u in savegamename
strcatbf(savegamename, srb2home, PATHSEP);
I_mkdir(srb2home, 0700);
#else
snprintf(srb2home, sizeof srb2home, "%s", userhome);
snprintf(downloaddir, sizeof downloaddir, "%s", userhome);
if (dedicated)
snprintf(configfile, sizeof configfile, "%s" PATHSEP "d"CONFIGFILENAME, userhome);
else
snprintf(configfile, sizeof configfile, "%s" PATHSEP CONFIGFILENAME, userhome);
// can't use sprintf since there is %u in savegamename
strcatbf(savegamename, userhome, PATHSEP);
#endif
}
configfile[sizeof configfile - 1] = '\0';
#ifdef _arch_dreamcast
strcpy(downloaddir, "/ram"); // the dreamcast's TMP
#endif
}
// rand() needs seeded regardless of password
srand((unsigned int)time(NULL));
if (M_CheckParm("-password") && M_IsNextParm())
D_SetPassword(M_GetNextParm());
else
{
size_t z;
char junkpw[25];
for (z = 0; z < 24; z++)
junkpw[z] = (char)(rand() & 64)+32;
junkpw[24] = '\0';
D_SetPassword(junkpw);
}
// add any files specified on the command line with -file wadfile
// to the wad list
if (!(M_CheckParm("-connect")))
{
if (M_CheckParm("-file"))
{
// the parms after p are wadfile/lump names,
// until end of parms or another - preceded parm
while (M_IsNextParm())
{
const char *s = M_GetNextParm();
if (s) // Check for NULL?
{
if (!W_VerifyNMUSlumps(s))
G_SetGameModified(true);
D_AddFile(s);
}
}
}
}
// get map from parms
if (M_CheckParm("-server") || dedicated)
netgame = server = true;
if (M_CheckParm("-warp") && M_IsNextParm())
{
const char *word = M_GetNextParm();
if (fastncmp(word, "MAP", 3))
pstartmap = M_MapNumber(word[3], word[4]);
else
pstartmap = atoi(word);
// Don't check if lump exists just yet because the wads haven't been loaded!
// Just do a basic range check here.
if (pstartmap < 1 || pstartmap > NUMMAPS)
I_Error("Cannot warp to map %d (out of range)\n", pstartmap);
else
{
if (!M_CheckParm("-server"))
G_SetGameModified(true);
autostart = true;
}
}
CONS_Printf("Z_Init(): Init zone memory allocation daemon. \n");
Z_Init();
// adapt tables to SRB2's needs, including extra slots for dehacked file support
P_PatchInfoTables();
//---------------------------------------------------- READY TIME
// we need to check for dedicated before initialization of some subsystems
CONS_Printf("I_StartupTimer()...\n");
I_StartupTimer();
// Make backups of some SOCcable tables.
P_BackupTables();
// Setup default unlockable conditions
M_SetupDefaultConditionSets();
// load wad, including the main wad file
CONS_Printf("W_InitMultipleFiles(): Adding IWAD and main PWADs.\n");
if (!W_InitMultipleFiles(startupwadfiles))
#ifdef _DEBUG
CONS_Error("A WAD file was not found or not valid.\nCheck the log to see which ones.\n");
#else
I_Error("A WAD file was not found or not valid.\nCheck the log to see which ones.\n");
#endif
D_CleanFile();
#if 1 // md5s last updated 3/15/14
// Yes, you read that right, that's the day of release.
// Aren't we batshit insane?
// Check MD5s of autoloaded files
W_VerifyFileMD5(0, "ac309fb3c7d4b5b685e2cd26beccf0e8"); // srb2.srb/srb2.wad
W_VerifyFileMD5(1, "a894044b555dfcc71865cee16a996e88"); // zones.dta
W_VerifyFileMD5(2, "4c410c1de6e0440cc5b2858dcca80c3e"); // player.dta
W_VerifyFileMD5(3, "85901ad4bf94637e5753d2ac2c03ea26"); // rings.dta
W_VerifyFileMD5(4, "c529930ee5aed6dbe33625dc8075520b"); // patch.dta
// don't check music.dta because people like to modify it, and it doesn't matter if they do
// ...except it does if they slip maps in there, and that's what W_VerifyNMUSlumps is for.
#endif
mainwads = 5; // there are 5 wads not to unload
cht_Init();
//---------------------------------------------------- READY SCREEN
// we need to check for dedicated before initialization of some subsystems
CONS_Printf("I_StartupGraphics()...\n");
I_StartupGraphics();
//--------------------------------------------------------- CONSOLE
// setup loading screen
SCR_Startup();
// we need the font of the console
CONS_Printf("HU_Init(): Setting up heads up display.\n");
HU_Init();
COM_Init();
// libogc has a CON_Init function, we must rename SRB2's CON_Init in WII/libogc
#ifndef _WII
CON_Init();
#else
CON_InitWii();
#endif
D_RegisterServerCommands();
D_RegisterClientCommands(); // be sure that this is called before D_CheckNetGame
R_RegisterEngineStuff();
S_RegisterSoundStuff();
I_RegisterSysCommands();
//--------------------------------------------------------- CONFIG.CFG
M_FirstLoadConfig(); // WARNING : this do a "COM_BufExecute()"
G_LoadGameData();
#if (defined (__unix__) && !defined (MSDOS)) || defined (UNIXCOMMON) || defined (SDL)
VID_PrepareModeList(); // Regenerate Modelist according to cv_fullscreen
#endif
// set user default mode or mode set at cmdline
SCR_CheckDefaultMode();
wipegamestate = gamestate;
P_InitMapHeaders();
savedata.lives = 0; // flag this as not-used
//------------------------------------------------ COMMAND LINE PARAMS
// Initialize CD-Audio
if (M_CheckParm("-usecd") && !dedicated)
I_InitCD();
if (M_CheckParm("-noupload"))
COM_BufAddText("downloading 0\n");
CONS_Printf("M_Init(): Init miscellaneous info.\n");
M_Init();
CONS_Printf("R_Init(): Init SRB2 refresh daemon.\n");
R_Init();
// setting up sound
CONS_Printf("S_Init(): Setting up sound.\n");
if (M_CheckParm("-nosound"))
nosound = true;
if (M_CheckParm("-nomusic")) // combines -nomidimusic and -nodigmusic
nomidimusic = nodigimusic = true;
else
{
if (M_CheckParm("-nomidimusic"))
nomidimusic = true; ; // WARNING: DOS version initmusic in I_StartupSound
if (M_CheckParm("-nodigmusic"))
nodigimusic = true; // WARNING: DOS version initmusic in I_StartupSound
}
I_StartupSound();
I_InitMusic();
S_Init(cv_soundvolume.value, cv_digmusicvolume.value, cv_midimusicvolume.value);
CONS_Printf("ST_Init(): Init status bar.\n");
ST_Init();
if (M_CheckParm("-room"))
{
if (!M_IsNextParm())
I_Error("usage: -room <room_id>\nCheck the Master Server's webpage for room ID numbers.\n");
#ifdef UPDATE_ALERT
GetMODVersion_Console();
#endif
ms_RoomId = atoi(M_GetNextParm());
}
// init all NETWORK
CONS_Printf("D_CheckNetGame(): Checking network game status.\n");
if (D_CheckNetGame())
autostart = true;
// check for a driver that wants intermission stats
// start the apropriate game based on parms
if (M_CheckParm("-metal"))
{
G_RecordMetal();
autostart = true;
}
else if (M_CheckParm("-record") && M_IsNextParm())
{
G_RecordDemo(M_GetNextParm());
autostart = true;
}
// user settings come before "+" parameters.
if (dedicated)
COM_ImmedExecute(va("exec \"%s"PATHSEP"adedserv.cfg\"\n", srb2home));
else
COM_ImmedExecute(va("exec \"%s"PATHSEP"autoexec.cfg\" -noerror\n", srb2home));
if (!autostart)
M_PushSpecialParameters(); // push all "+" parameters at the command buffer
// demo doesn't need anymore to be added with D_AddFile()
p = M_CheckParm("-playdemo");
if (!p)
p = M_CheckParm("-timedemo");
if (p && M_IsNextParm())
{
char tmp[MAX_WADPATH];
// add .lmp to identify the EXTERNAL demo file
// it is NOT possible to play an internal demo using -playdemo,
// rather push a playdemo command.. to do.
strcpy(tmp, M_GetNextParm());
// get spaced filename or directory
while (M_IsNextParm())
{
strcat(tmp, " ");
strcat(tmp, M_GetNextParm());
}
FIL_DefaultExtension(tmp, ".lmp");
CONS_Printf(M_GetText("Playing demo %s.\n"), tmp);
if (M_CheckParm("-playdemo"))
{
singledemo = true; // quit after one demo
G_DeferedPlayDemo(tmp);
}
else
G_TimeDemo(tmp);
G_SetGamestate(GS_NULL);
wipegamestate = GS_NULL;
return;
}
if (M_CheckParm("-ultimatemode"))
{
autostart = true;
ultimatemode = true;
}
if (autostart || netgame || M_CheckParm("+connect") || M_CheckParm("-connect"))
{
gameaction = ga_nothing;
CV_ClearChangedFlags();
// Do this here so if you run SRB2 with eg +timelimit 5, the time limit counts
// as having been modified for the first game.
M_PushSpecialParameters(); // push all "+" parameter at the command buffer
if (M_CheckParm("-gametype") && M_IsNextParm())
{
// from Command_Map_f
INT32 j;
INT16 newgametype = -1;
const char *sgametype = M_GetNextParm();
for (j = 0; gametype_cons_t[j].strvalue; j++)
if (!strcasecmp(gametype_cons_t[j].strvalue, sgametype))
{
newgametype = (INT16)gametype_cons_t[j].value;
break;
}
if (!gametype_cons_t[j].strvalue) // reached end of the list with no match
{
j = atoi(sgametype); // assume they gave us a gametype number, which is okay too
if (j >= 0 && j < NUMGAMETYPES)
newgametype = (INT16)j;
}
if (newgametype != -1)
{
j = gametype;
gametype = newgametype;
D_GameTypeChanged(j);
}
}
if (server && !M_CheckParm("+map") && !M_CheckParm("+connect")
&& !M_CheckParm("-connect"))
{
// Prevent warping to nonexistent levels
if (W_CheckNumForName(G_BuildMapName(pstartmap)) == LUMPERROR)
I_Error("Could not warp to %s (map not found)\n", G_BuildMapName(pstartmap));
// Prevent warping to locked levels
// ... unless you're in a dedicated server. Yes, technically this means you can view any level by
// running a dedicated server and joining it yourself, but that's better than making dedicated server's
// lives hell.
else if (!dedicated && M_MapLocked(pstartmap))
I_Error("You need to unlock this level before you can warp to it!\n");
else
D_MapChange(pstartmap, gametype, ultimatemode, true, 0, false, false);
}
}
else if (M_CheckParm("-skipintro"))
{
CON_ToggleOff();
CON_ClearHUD();
F_StartTitleScreen();
}
else
F_StartIntro(); // Tails 03-03-2002
if (dedicated && server)
{
pagename = "TITLESKY";
levelstarttic = gametic;
G_SetGamestate(GS_LEVEL);
if (!P_SetupLevel(false))
I_Quit(); // fail so reset game stuff
}
}
//
// R_InitTextures
// Initializes the texture list
// with the textures from the world map.
//
void R_InitTextures (void)
{
maptexture_t* mtexture;
texture_t* texture;
mappatch_t* mpatch;
texpatch_t* patch;
int i;
int j;
int* maptex;
int* maptex2;
int* maptex1;
int* patchlookup;
int totalwidth;
int nummappatches;
int offset;
int maxoff;
int maxoff2;
int numtextures1;
int numtextures2;
int* directory;
int errors = 0;
// Load the patch names from pnames.lmp.
{
char *names = (char *)W_CacheLumpName ("PNAMES", PU_STATIC);
char *name_p = names+4;
nummappatches = LELONG ( *((int *)names) );
patchlookup = new int[nummappatches];
for (i = 0; i < nummappatches; i++)
{
patchlookup[i] = W_CheckNumForName (name_p + i*8);
if (patchlookup[i] == -1)
{
// killough 4/17/98:
// Some wads use sprites as wall patches, so repeat check and
// look for sprites this time, but only if there were no wall
// patches found. This is the same as allowing for both, except
// that wall patches always win over sprites, even when they
// appear first in a wad. This is a kludgy solution to the wad
// lump namespace problem.
patchlookup[i] = W_CheckNumForName (name_p + i*8, ns_sprites);
}
}
Z_Free (names);
}
// Load the map texture definitions from textures.lmp.
// The data is contained in one or two lumps,
// TEXTURE1 for shareware, plus TEXTURE2 for commercial.
maptex = maptex1 = (int *)W_CacheLumpName ("TEXTURE1", PU_STATIC);
numtextures1 = LELONG(*maptex);
maxoff = W_LumpLength (W_GetNumForName ("TEXTURE1"));
directory = maptex+1;
if (W_CheckNumForName ("TEXTURE2") != -1)
{
maptex2 = (int *)W_CacheLumpName ("TEXTURE2", PU_STATIC);
numtextures2 = LELONG(*maptex2);
maxoff2 = W_LumpLength (W_GetNumForName ("TEXTURE2"));
}
else
{
maptex2 = NULL;
numtextures2 = 0;
maxoff2 = 0;
}
// denis - fix memory leaks
for (i = 0; i < numtextures; i++)
{
delete[] texturecolumnlump[i];
delete[] texturecolumnofs[i];
}
// denis - fix memory leaks
delete[] textures;
delete[] texturecolumnlump;
delete[] texturecolumnofs;
delete[] texturecomposite;
delete[] texturecompositesize;
delete[] texturewidthmask;
delete[] textureheight;
delete[] texturescalex;
delete[] texturescaley;
numtextures = numtextures1 + numtextures2;
textures = new texture_t *[numtextures];
texturecolumnlump = new short *[numtextures];
texturecolumnofs = new unsigned int *[numtextures];
texturecomposite = new byte *[numtextures];
texturecompositesize = new int[numtextures];
texturewidthmask = new int[numtextures];
textureheight = new fixed_t[numtextures];
texturescalex = new fixed_t[numtextures];
texturescaley = new fixed_t[numtextures];
totalwidth = 0;
for (i = 0; i < numtextures; i++, directory++)
{
if (i == numtextures1)
{
// Start looking in second texture file.
maptex = maptex2;
maxoff = maxoff2;
directory = maptex+1;
}
offset = LELONG(*directory);
if (offset > maxoff)
I_FatalError ("R_InitTextures: bad texture directory");
mtexture = (maptexture_t *) ( (byte *)maptex + offset);
texture = textures[i] = (texture_t *)
Z_Malloc (sizeof(texture_t)
+ sizeof(texpatch_t)*(SAFESHORT(mtexture->patchcount)-1),
PU_STATIC, 0);
texture->width = SAFESHORT(mtexture->width);
texture->height = SAFESHORT(mtexture->height);
texture->patchcount = SAFESHORT(mtexture->patchcount);
strncpy (texture->name, mtexture->name, 9); // denis - todo string limit?
std::transform(texture->name, texture->name + strlen(texture->name), texture->name, toupper);
mpatch = &mtexture->patches[0];
patch = &texture->patches[0];
for (j=0 ; j<texture->patchcount ; j++, mpatch++, patch++)
{
patch->originx = LESHORT(mpatch->originx);
patch->originy = LESHORT(mpatch->originy);
patch->patch = patchlookup[LESHORT(mpatch->patch)];
if (patch->patch == -1)
{
Printf (PRINT_HIGH, "R_InitTextures: Missing patch in texture %s\n", texture->name);
errors++;
}
}
texturecolumnlump[i] = new short[texture->width];
texturecolumnofs[i] = new unsigned int[texture->width];
for (j = 1; j*2 <= texture->width; j <<= 1)
;
texturewidthmask[i] = j-1;
textureheight[i] = texture->height << FRACBITS;
// [RH] Special for beta 29: Values of 0 will use the tx/ty cvars
// to determine scaling instead of defaulting to 8. I will likely
// remove this once I finish the betas, because by then, users
// should be able to actually create scaled textures.
texturescalex[i] = mtexture->scalex ? mtexture->scalex << (FRACBITS - 3) : FRACUNIT;
texturescaley[i] = mtexture->scaley ? mtexture->scaley << (FRACBITS - 3) : FRACUNIT;
totalwidth += texture->width;
}
delete[] patchlookup;
Z_Free (maptex1);
if (maptex2)
Z_Free (maptex2);
if (errors)
I_FatalError ("%d errors in R_InitTextures.", errors);
// [RH] Setup hash chains. Go from back to front so that if
// duplicates are found, the first one gets used instead
// of the last (thus mimicing the original behavior
// of R_CheckTextureNumForName().
for (i = 0; i < numtextures; i++)
textures[i]->index = -1;
for (i = numtextures - 1; i >= 0; i--)
{
j = 0; //W_LumpNameHash (textures[i]->name) % (unsigned) numtextures;
textures[i]->next = textures[j]->index;
textures[j]->index = i;
}
if (clientside) // server doesn't need to load patches ever
{
// Precalculate whatever possible.
for (i = 0; i < numtextures; i++)
R_GenerateLookup (i, &errors);
}
// if (errors)
// I_FatalError ("%d errors encountered during texture generation.", errors);
// Create translation table for global animation.
delete[] texturetranslation;
texturetranslation = new int[numtextures+1];
for (i = 0; i < numtextures; i++)
texturetranslation[i] = i;
}
//
// D_DoomMain
//
void D_DoomMain (void)
{
int p;
char file[256];
FindResponseFile ();
IdentifyVersion ();
setbuf (stdout, NULL);
modifiedgame = false;
nomonsters = M_CheckParm ("-nomonsters");
respawnparm = M_CheckParm ("-respawn");
fastparm = M_CheckParm ("-fast");
devparm = M_CheckParm ("-devparm");
if (M_CheckParm ("-altdeath"))
deathmatch = 2;
else if (M_CheckParm ("-deathmatch"))
deathmatch = 1;
switch ( gamemode )
{
case retail:
sprintf (title,
" "
"The Ultimate DOOM Startup v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
case shareware:
sprintf (title,
" "
"DOOM Shareware Startup v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
case registered:
sprintf (title,
" "
"DOOM Registered Startup v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
case commercial:
sprintf (title,
" "
"DOOM 2: Hell on Earth v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
/*FIXME
case pack_plut:
sprintf (title,
" "
"DOOM 2: Plutonia Experiment v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
case pack_tnt:
sprintf (title,
" "
"DOOM 2: TNT - Evilution v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
*/
default:
sprintf (title,
" "
"Public DOOM - v%i.%i"
" ",
VERSION_NUM/100,VERSION_NUM%100);
break;
}
printf ("%s\n",title);
if (devparm)
printf(D_DEVSTR);
// turbo option
if ( (p=M_CheckParm ("-turbo")) )
{
int scale = 200;
extern int forwardmove[2];
extern int sidemove[2];
if (p<myargc-1)
scale = atoi (myargv[p+1]);
if (scale < 10)
scale = 10;
if (scale > 400)
scale = 400;
printf ("turbo scale: %i%%\n",scale);
forwardmove[0] = forwardmove[0]*scale/100;
forwardmove[1] = forwardmove[1]*scale/100;
sidemove[0] = sidemove[0]*scale/100;
sidemove[1] = sidemove[1]*scale/100;
}
// add any files specified on the command line with -file wadfile
// to the wad list
//
// convenience hack to allow -wart e m to add a wad file
// prepend a tilde to the filename so wadfile will be reloadable
p = M_CheckParm ("-wart");
if (p)
{
myargv[p][4] = 'p'; // big hack, change to -warp
// Map name handling.
switch (gamemode )
{
case shareware:
case retail:
case registered:
sprintf (file,"~"DEVMAPS"E%cM%c.wad",
myargv[p+1][0], myargv[p+2][0]);
printf("Warping to Episode %s, Map %s.\n",
myargv[p+1],myargv[p+2]);
break;
case commercial:
default:
p = atoi (myargv[p+1]);
if (p<10)
sprintf (file,"~"DEVMAPS"cdata/map0%i.wad", p);
else
sprintf (file,"~"DEVMAPS"cdata/map%i.wad", p);
break;
}
D_AddFile (file);
}
p = M_CheckParm ("-file");
if (p)
{
// the parms after p are wadfile/lump names,
// until end of parms or another - preceded parm
modifiedgame = true; // homebrew levels
while (++p != myargc && myargv[p][0] != '-')
D_AddFile (myargv[p]);
}
p = M_CheckParm ("-playdemo");
if (!p)
p = M_CheckParm ("-timedemo");
if (p && p < myargc-1)
{
sprintf (file,"%s.lmp", myargv[p+1]);
D_AddFile (file);
printf("Playing demo %s.lmp.\n",myargv[p+1]);
}
// get skill / episode / map from parms
startskill = sk_medium;
startepisode = 1;
startmap = 1;
autostart = false;
p = M_CheckParm ("-skill");
if (p && p < myargc-1)
{
startskill = myargv[p+1][0]-'1';
autostart = true;
}
p = M_CheckParm ("-episode");
if (p && p < myargc-1)
{
startepisode = myargv[p+1][0]-'0';
startmap = 1;
autostart = true;
}
p = M_CheckParm ("-timer");
if (p && p < myargc-1 && deathmatch)
{
int time;
time = atoi(myargv[p+1]);
printf("Levels will end after %d minute",time);
if (time>1)
printf("s");
printf(".\n");
}
p = M_CheckParm ("-avg");
if (p && p < myargc-1 && deathmatch)
printf("Austin Virtual Gaming: Levels will end after 20 minutes\n");
p = M_CheckParm ("-warp");
if (p && p < myargc-1)
{
if (gamemode == commercial)
startmap = atoi (myargv[p+1]);
else
{
startepisode = myargv[p+1][0]-'0';
startmap = myargv[p+2][0]-'0';
}
autostart = true;
}
// init subsystems
printf ("V_Init: allocate screens.\n");
V_Init ();
printf ("M_LoadDefaults: Load system defaults.\n");
M_LoadDefaults (); // load before initing other systems
printf ("Z_Init: Init zone memory allocation daemon. \n");
Z_Init ();
printf ("W_Init: Init WADfiles.\n");
W_InitMultipleFiles (wadfiles);
printf("added\n");
// Check for -file in shareware
if (modifiedgame)
{
// These are the lumps that will be checked in IWAD,
// if any one is not present, execution will be aborted.
char name[23][8]=
{
"e2m1","e2m2","e2m3","e2m4","e2m5","e2m6","e2m7","e2m8","e2m9",
"e3m1","e3m3","e3m3","e3m4","e3m5","e3m6","e3m7","e3m8","e3m9",
"dphoof","bfgga0","heada1","cybra1","spida1d1"
};
int i;
if ( gamemode == shareware)
I_Error("\nYou cannot -file with the shareware "
"version. Register!");
// Check for fake IWAD with right name,
// but w/o all the lumps of the registered version.
if (gamemode == registered)
for (i = 0;i < 23; i++)
if (W_CheckNumForName(name[i])<0)
I_Error("\nThis is not the registered version.");
}
// Iff additonal PWAD files are used, print modified banner
if (modifiedgame)
{
/*m*/printf (
"===========================================================================\n"
"ATTENTION: This version of DOOM has been modified. If you would like to\n"
"get a copy of the original game, call 1-800-IDGAMES or see the readme file.\n"
" You will not receive technical support for modified games.\n"
" press enter to continue\n"
"===========================================================================\n"
);
}
// Check and print which version is executed.
switch ( gamemode )
{
case shareware:
case indetermined:
printf (
"===========================================================================\n"
" Shareware!\n"
"===========================================================================\n"
);
break;
case registered:
case retail:
case commercial:
printf (
"===========================================================================\n"
" Commercial product - do not distribute!\n"
" Please report software piracy to the SPA: 1-800-388-PIR8\n"
"===========================================================================\n"
);
break;
default:
// Ouch.
break;
}
printf ("M_Init: Init miscellaneous info.\n");
M_Init ();
printf ("R_Init: Init DOOM refresh daemon - ");
R_Init ();
printf ("\nP_Init: Init Playloop state.\n");
P_Init ();
printf ("I_Init: Setting up machine state.\n");
I_Init ();
printf ("D_CheckNetGame: Checking network game status.\n");
D_CheckNetGame ();
printf ("S_Init: Setting up sound.\n");
S_Init (snd_SfxVolume /* *8 */, snd_MusicVolume /* *8*/ );
printf ("HU_Init: Setting up heads up display.\n");
HU_Init ();
printf ("ST_Init: Init status bar.\n");
ST_Init ();
// check for a driver that wants intermission stats
p = M_CheckParm ("-statcopy");
if (p && p<myargc-1)
{
// for statistics driver
extern void* statcopy;
statcopy = (void*)atoi(myargv[p+1]);
printf ("External statistics registered.\n");
}
// start the apropriate game based on parms
p = M_CheckParm ("-record");
if (p && p < myargc-1)
{
G_RecordDemo (myargv[p+1]);
autostart = true;
}
p = M_CheckParm ("-playdemo");
if (p && p < myargc-1)
{
singledemo = true; // quit after one demo
G_DeferedPlayDemo (myargv[p+1]);
D_DoomLoop (); // never returns
}
p = M_CheckParm ("-timedemo");
if (p && p < myargc-1)
{
G_TimeDemo (myargv[p+1]);
D_DoomLoop (); // never returns
}
p = M_CheckParm ("-loadgame");
if (p && p < myargc-1)
{
if (M_CheckParm("-cdrom"))
sprintf(file, "c:\\doomdata\\"SAVEGAMENAME"%c.dsg",myargv[p+1][0]);
else
sprintf(file, SAVEGAMENAME"%c.dsg",myargv[p+1][0]);
G_LoadGame (file);
}
if ( gameaction != ga_loadgame )
{
if (autostart || netgame)
G_InitNew (startskill, startepisode, startmap);
else
D_StartTitle (); // start up intro loop
}
D_DoomLoop (); // never returns
}
//
// R_InitColormaps
//
void R_InitColormaps (void)
{
// [RH] Try and convert BOOM colormaps into blending values.
// This is a really rough hack, but it's better than
// not doing anything with them at all (right?)
int lastfakecmap = W_CheckNumForName ("C_END");
firstfakecmap = W_CheckNumForName ("C_START");
if (firstfakecmap == -1 || lastfakecmap == -1)
numfakecmaps = 1;
else
{
if(firstfakecmap > lastfakecmap)
I_Error("no fake cmaps");
numfakecmaps = lastfakecmap - firstfakecmap;
}
realcolormaps.colormap = (byte *)Z_Malloc (256*(NUMCOLORMAPS+1)*numfakecmaps,PU_STATIC,0);
realcolormaps.shademap = (argb_t *)Z_Malloc (256*sizeof(argb_t)*(NUMCOLORMAPS+1)*numfakecmaps,PU_STATIC,0);
fakecmaps = (FakeCmap *)Z_Malloc (sizeof(*fakecmaps) * numfakecmaps, PU_STATIC, 0);
fakecmaps[0].name[0] = 0;
R_ForceDefaultColormap ("COLORMAP");
if (numfakecmaps > 1)
{
int i;
size_t j;
palette_t *pal = GetDefaultPalette ();
shaderef_t defpal = shaderef_t(&pal->maps, 0);
for (i = ++firstfakecmap, j = 1; j < numfakecmaps; i++, j++)
{
if (W_LumpLength (i) >= (NUMCOLORMAPS+1)*256)
{
int k, r, g, b;
byte *map = (byte *)W_CacheLumpNum (i, PU_CACHE);
byte *colormap = realcolormaps.colormap+(NUMCOLORMAPS+1)*256*j;
argb_t *shademap = realcolormaps.shademap+(NUMCOLORMAPS+1)*256*j;
// Copy colormap data:
memcpy (colormap, map, (NUMCOLORMAPS+1)*256);
if(pal->basecolors)
{
r = RPART(pal->basecolors[*map]);
g = GPART(pal->basecolors[*map]);
b = BPART(pal->basecolors[*map]);
W_GetLumpName (fakecmaps[j].name, i);
for (k = 1; k < 256; k++) {
r = (r + RPART(pal->basecolors[map[k]])) >> 1;
g = (g + GPART(pal->basecolors[map[k]])) >> 1;
b = (b + BPART(pal->basecolors[map[k]])) >> 1;
}
// NOTE(jsd): This alpha value is used for 32bpp in water areas.
fakecmaps[j].blend = MAKEARGB (64, r, g, b);
// Set up shademap for the colormap:
for (k = 0; k < 256; ++k)
{
argb_t c = pal->basecolors[map[0]];
shademap[k] = alphablend1a(c, MAKERGB(r,g,b), j * (256 / numfakecmaps));
}
}
else
{
// Set up shademap for the colormap:
for (k = 0; k < 256; ++k)
