Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

229 lines (200 sloc) 3.987 kb
//
// Warp to level
//
#include <dos.h>
#include "main.h"
#include "keys.h"
int respawn;
int nomonsters;
int deathmatch2;
enum
{
W_NOMON,
#ifndef HERETIC
W_DM2,
#endif
W_RESPAWN,
E1M1,
E1M2,
E1M3,
E1M4,
E1M5,
E1M6,
E1M7,
E1M8,
E1M9,
#ifdef DOOM2
E1M10,
#endif
E2M1,
E2M2,
E2M3,
E2M4,
E2M5,
E2M6,
E2M7,
E2M8,
E2M9,
#ifdef DOOM2
E2M10,
#endif
E3M1,
E3M2,
E3M3,
E3M4,
E3M5,
E3M6,
E3M7,
E3M8,
E3M9,
#ifdef DOOM2
E3M10,
#endif
W_MAX
};
item_t cwarpitems[]=
{
#ifdef HERETIC
{W_NOMON, 35,6,15, -1,-1},
{W_RESPAWN, 35,7,15, -1,-1},
#else
{W_NOMON, 35,5,15, -1,-1},
{W_DM2, 35,7,15, -1,-1},
{W_RESPAWN, 35,6,15, -1,-1},
#endif
{E1M1, 31,9,6, -1,E2M1},
{E1M2, 31,10,6, -1,E2M2},
{E1M3, 31,11,6, -1,E2M3},
{E1M4, 31,12,6, -1,E2M4},
{E1M5, 31,13,6, -1,E2M5},
{E1M6, 31,14,6, -1,E2M6},
{E1M7, 31,15,6, -1,E2M7},
{E1M8, 31,16,6, -1,E2M8},
{E1M9, 31,17,6, -1,E2M9},
#ifdef DOOM2
{E1M10, 31,18,6, -1,E2M10},
#endif
{E2M1, 38,9,6, E1M1,E3M1,W_RESPAWN},
{E2M2, 38,10,6,E1M2,E3M2},
{E2M3, 38,11,6,E1M3,E3M3},
{E2M4, 38,12,6,E1M4,E3M4},
{E2M5, 38,13,6,E1M5,E3M5},
{E2M6, 38,14,6,E1M6,E3M6},
{E2M7, 38,15,6,E1M7,E3M7},
{E2M8, 38,16,6, E1M8,E3M8},
{E2M9, 38,17,6, E1M9,E3M9},
#ifdef DOOM2
{E2M10, 38,18,6, E1M10,E3M10},
#endif
{E3M1, 45,9,6, E2M1,-1,W_RESPAWN},
{E3M2, 45,10,6, E2M2,-1},
{E3M3, 45,11,6, E2M3,-1},
{E3M4, 45,12,6, E2M4,-1},
{E3M5, 45,13,6, E2M5,-1},
{E3M6, 45,14,6, E2M6,-1},
{E3M7, 45,15,6, E2M7,-1},
{E3M8, 45,16,6, E2M8,-1},
{E3M9, 45,17,6, E2M9,-1},
#ifdef DOOM2
{E3M10, 45,18,6, E2M10,-1}
#endif
};
menu_t cwarpmenu=
{
&cwarpitems[0],
W_NOMON,
W_MAX,
0x7f
};
unsigned WarpTime(void)
{
int e;
int l;
short key;
short field;
int exit;
SaveScreen();
DrawPup(&cwarp);
SetMark(&cwarpitems[W_RESPAWN],respawn);
SetMark(&cwarpitems[W_NOMON],nomonsters);
#ifndef HERETIC
SetMark(&cwarpitems[W_DM2],deathmatch2);
#endif
exit = 0;
while(1)
{
SetupMenu(&cwarpmenu);
field = GetMenuInput();
key = menukey;
switch(key)
{
case KEY_ESC:
RestoreScreen();
return 0;
case KEY_F10:
case KEY_ENTER:
switch(field)
{
case E1M1: e=1;l=1; exit=1; break;
case E1M2: e=1;l=2; exit=1; break;
case E1M3: e=1;l=3; exit=1; break;
case E1M4: e=1;l=4; exit=1; break;
case E1M5: e=1;l=5; exit=1; break;
case E1M6: e=1;l=6; exit=1; break;
case E1M7: e=1;l=7; exit=1; break;
case E1M8: e=1;l=8; exit=1; break;
case E1M9: e=1;l=9; exit=1; break;
#ifdef DOOM2
case E1M10: e=1;l=10; exit=1; break;
#endif
case E2M1: e=2;l=1; exit=1; break;
case E2M2: e=2;l=2; exit=1; break;
case E2M3: e=2;l=3; exit=1; break;
case E2M4: e=2;l=4; exit=1; break;
case E2M5: e=2;l=5; exit=1; break;
case E2M6: e=2;l=6; exit=1; break;
case E2M7: e=2;l=7; exit=1; break;
case E2M8: e=2;l=8; exit=1; break;
case E2M9: e=2;l=9; exit=1; break;
#ifdef DOOM2
case E2M10: e=2;l=10; exit=1; break;
#endif
case E3M1: e=3;l=1; exit=1; break;
case E3M2: e=3;l=2; exit=1; break;
case E3M3: e=3;l=3; exit=1; break;
case E3M4: e=3;l=4; exit=1; break;
case E3M5: e=3;l=5; exit=1; break;
case E3M6: e=3;l=6; exit=1; break;
case E3M7: e=3;l=7; exit=1; break;
case E3M8: e=3;l=8; exit=1; break;
case E3M9: e=3;l=9; exit=1; break;
#ifdef DOOM2
case E3M10: e=3;l=10; exit=1; break;
#endif
case W_RESPAWN:
respawn ^= 1;
SetMark(&cwarpitems[W_RESPAWN],respawn);
break;
case W_NOMON:
nomonsters ^= 1;
SetMark(&cwarpitems[W_NOMON],nomonsters);
break;
#ifndef HERETIC
case W_DM2:
deathmatch2 ^= 1;
SetMark(&cwarpitems[W_DM2],deathmatch2);
break;
#endif
}
if (exit)
{
RestoreScreen();
#ifdef DOOM2
return ((e-1)*10+l);
#else
return (e<<8)+l;
#endif
}
}
}
}
Jump to Line
Something went wrong with that request. Please try again.