#include "hack.h"

int NDECL((*afternmv));

int NDECL((*occupation));

const char *hname = 0; /* name of the game (argv[0] of main) */

int hackpid = 0; /* current process id */

#if defined(UNIX) || defined(VMS)

int locknum = 0; /* max num of simultaneous users */

#ifdef DEF_PAGER

char *catmore = 0; /* default pager */

char chosen_windowtype[WINTYPELEN];

NEARDATA int bases[MAXOCLASSES] = DUMMY;

NEARDATA int multi = 0;

const char *multi_reason = NULL;

NEARDATA int nroom = 0;

NEARDATA int nsubroom = 0;

NEARDATA int occtime = 0;

int x_maze_max = (COLNO - 1) & ~1, y_maze_max = (ROWNO - 1) & ~1;

int otg_temp; /* used by object_to_glyph() [otg] */

NEARDATA int in_doagain = 0;

struct dgn_topology dungeon_topology = { DUMMY };

struct q_score quest_status = DUMMY;

NEARDATA int warn_obj_cnt = 0;

NEARDATA int smeq[MAXNROFROOMS + 1] = DUMMY;

NEARDATA int doorindex = 0;

NEARDATA char *save_cm = 0;

NEARDATA struct kinfo killer = DUMMY;

NEARDATA long done_money = 0;

const char *nomovemsg = 0;

NEARDATA char plname[PL_NSIZ] = DUMMY; /* player name */

NEARDATA char pl_character[PL_CSIZ] = DUMMY;

NEARDATA char pl_race = '\0';

NEARDATA char pl_fruit[PL_FSIZ] = DUMMY;

NEARDATA struct fruit *ffruit = (struct fruit *) 0;

NEARDATA char tune[6] = DUMMY;

NEARDATA boolean ransacked = 0;

const char *occtxt = DUMMY;

const char quitchars[] = " \r\n\033";

const char vowels[] = "aeiouAEIOU";

const char ynchars[] = "yn";

const char ynqchars[] = "ynq";

const char ynaqchars[] = "ynaq";

const char ynNaqchars[] = "yn#aq";

NEARDATA long yn_number = 0L;

const char disclosure_options[] = "iavgco";

#if defined(MICRO) || defined(WIN32)

char hackdir[PATHLEN]; /* where rumors, help, record are */

#ifdef MICRO

char levels[PATHLEN]; /* where levels are */

#endif /* MICRO || WIN32 */

#ifdef MFLOPPY

char permbones[PATHLEN]; /* where permanent copy of bones go */

int ramdisk = FALSE; /* whether to copy bones to levels or not */

int saveprompt = TRUE;

const char *alllevels = "levels.*";

const char *allbones = "bones*.*";

struct linfo level_info[MAXLINFO];

NEARDATA struct sinfo program_state;

const schar xdir[10] = { -1, -1, 0, 1, 1, 1, 0, -1, 0, 0 };

const schar ydir[10] = { 0, -1, -1, -1, 0, 1, 1, 1, 0, 0 };

const schar zdir[10] = { 0, 0, 0, 0, 0, 0, 0, 0, 1, -1 };

NEARDATA schar tbx = 0, tby = 0; /* mthrowu: target */

NEARDATA struct multishot m_shot = { 0, 0, STRANGE_OBJECT, FALSE };

NEARDATA dungeon dungeons[MAXDUNGEON]; /* ini'ed by init_dungeon() */

NEARDATA s_level *sp_levchn;

NEARDATA stairway upstair = { 0, 0, { 0, 0 }, 0 },

dnstair = { 0, 0, { 0, 0 }, 0 };

NEARDATA stairway upladder = { 0, 0, { 0, 0 }, 0 },

dnladder = { 0, 0, { 0, 0 }, 0 };

NEARDATA stairway sstairs = { 0, 0, { 0, 0 }, 0 };

NEARDATA dest_area updest = { 0, 0, 0, 0, 0, 0, 0, 0 };

NEARDATA dest_area dndest = { 0, 0, 0, 0, 0, 0, 0, 0 };

NEARDATA coord inv_pos = { 0, 0 };

NEARDATA boolean defer_see_monsters = FALSE;

NEARDATA boolean in_mklev = FALSE;

NEARDATA boolean stoned = FALSE; /* done to monsters hit by 'c' */

NEARDATA boolean unweapon = FALSE;

NEARDATA boolean mrg_to_wielded = FALSE;

NEARDATA boolean in_steed_dismounting = FALSE;

NEARDATA boolean has_strong_rngseed = FALSE;

NEARDATA coord bhitpos = DUMMY;

NEARDATA coord doors[DOORMAX] = { DUMMY };

NEARDATA struct mkroom rooms[(MAXNROFROOMS + 1) * 2] = { DUMMY };

NEARDATA struct mkroom *subrooms = &rooms[MAXNROFROOMS + 1];

struct mkroom *upstairs_room, *dnstairs_room, *sstairs_room;

dlevel_t level; /* level map */

struct trap *ftrap = (struct trap *) 0;

NEARDATA struct monst youmonst = DUMMY;

NEARDATA struct context_info context = DUMMY;

NEARDATA struct flag flags = DUMMY;

#ifdef SYSFLAGS

NEARDATA struct sysflag sysflags = DUMMY;

NEARDATA struct instance_flags iflags = DUMMY;

NEARDATA struct you u = DUMMY;

NEARDATA time_t ubirthday = DUMMY;

NEARDATA struct u_realtime urealtime = DUMMY;

schar lastseentyp[COLNO][ROWNO] = {

DUMMY

}; /* last seen/touched dungeon typ */

NEARDATA struct obj

*invent = (struct obj *) 0,

*uwep = (struct obj *) 0, *uarm = (struct obj *) 0,

*uswapwep = (struct obj *) 0,

*uquiver = (struct obj *) 0, /* quiver */

*uarmu = (struct obj *) 0, /* under-wear, so to speak */

*uskin = (struct obj *) 0, /* dragon armor, if a dragon */

*uarmc = (struct obj *) 0, *uarmh = (struct obj *) 0,

*uarms = (struct obj *) 0, *uarmg = (struct obj *) 0,

*uarmf = (struct obj *) 0, *uamul = (struct obj *) 0,

*uright = (struct obj *) 0, *uleft = (struct obj *) 0,

*ublindf = (struct obj *) 0, *uchain = (struct obj *) 0,

*uball = (struct obj *) 0;

NEARDATA struct obj

*current_wand = 0, /* wand currently zapped/applied */

*thrownobj = 0, /* object in flight due to throwing */

*kickedobj = 0; /* object in flight due to kicking */

#ifdef TEXTCOLOR

const int zapcolors[NUM_ZAP] = {

HI_ZAP, /* 0 - missile */

CLR_ORANGE, /* 1 - fire */

CLR_WHITE, /* 2 - frost */

HI_ZAP, /* 3 - sleep */

CLR_BLACK, /* 4 - death */

CLR_WHITE, /* 5 - lightning */

CLR_YELLOW, /* 6 - poison gas */

CLR_GREEN, /* 7 - acid */

};

#endif /* text color */

const int shield_static[SHIELD_COUNT] = {

S_ss1, S_ss2, S_ss3, S_ss2, S_ss1, S_ss2, S_ss4, /* 7 per row */

S_ss1, S_ss2, S_ss3, S_ss2, S_ss1, S_ss2, S_ss4,

S_ss1, S_ss2, S_ss3, S_ss2, S_ss1, S_ss2, S_ss4,

};

NEARDATA struct spell spl_book[MAXSPELL + 1] = { DUMMY };

NEARDATA long moves = 1L, monstermoves = 1L;

NEARDATA long wailmsg = 0L;

NEARDATA struct obj *migrating_objs = (struct obj *) 0;

NEARDATA struct obj *billobjs = (struct obj *) 0;

NEARDATA const struct obj zeroobj = DUMMY;

NEARDATA const struct monst zeromonst = DUMMY;

NEARDATA const anything zeroany;

NEARDATA char dogname[PL_PSIZ] = DUMMY;

NEARDATA char catname[PL_PSIZ] = DUMMY;

NEARDATA char horsename[PL_PSIZ] = DUMMY;

char preferred_pet; /* '\0', 'c', 'd', 'n' (none) */

NEARDATA struct monst *mydogs = (struct monst *) 0;

NEARDATA struct monst *migrating_mons = (struct monst *) 0;

NEARDATA struct autopickup_exception *apelist =

(struct autopickup_exception *)0;

NEARDATA struct mvitals mvitals[NUMMONS];

NEARDATA long domove_attempting = 0L;

NEARDATA long domove_succeeded = 0L;

NEARDATA struct c_color_names c_color_names = {

"black", "amber", "golden", "light blue", "red", "green",

"silver", "blue", "purple", "white", "orange"

};

struct menucoloring *menu_colorings = NULL;

const char *c_obj_colors[] = {

"black", /* CLR_BLACK */

"red", /* CLR_RED */

"green", /* CLR_GREEN */

"brown", /* CLR_BROWN */

"blue", /* CLR_BLUE */

"magenta", /* CLR_MAGENTA */

"cyan", /* CLR_CYAN */

"gray", /* CLR_GRAY */

"transparent", /* no_color */

"orange", /* CLR_ORANGE */

"bright green", /* CLR_BRIGHT_GREEN */

"yellow", /* CLR_YELLOW */

"bright blue", /* CLR_BRIGHT_BLUE */

"bright magenta", /* CLR_BRIGHT_MAGENTA */

"bright cyan", /* CLR_BRIGHT_CYAN */

"white", /* CLR_WHITE */

};

struct c_common_strings c_common_strings = { "Nothing happens.",

"That's enough tries!",

"That is a silly thing to %s.",

"shudder for a moment.",

"something",

"Something",

"You can move again.",

"Never mind.",

"vision quickly clears.",

{ "the", "your" },

{ "mon", "you" } };

const char *materialnm[] = { "mysterious", "liquid", "wax", "organic",

"flesh", "paper", "cloth", "leather",

"wooden", "bone", "dragonhide", "iron",

"metal", "copper", "silver", "gold",

"platinum", "mithril", "plastic", "glass",

"gemstone", "stone" };

NEARDATA boolean vision_full_recalc = 0;

NEARDATA char **viz_array = 0; /* used in cansee() and couldsee() macros */

NEARDATA winid WIN_MESSAGE = WIN_ERR;

NEARDATA winid WIN_STATUS = WIN_ERR;

NEARDATA winid WIN_MAP = WIN_ERR, WIN_INVEN = WIN_ERR;

char toplines[TBUFSZ];

struct tc_gbl_data tc_gbl_data = { 0, 0, 0, 0 }; /* AS,AE, LI,CO */

char *fqn_prefix[PREFIX_COUNT] = { (char *) 0, (char *) 0, (char *) 0,

(char *) 0, (char *) 0, (char *) 0,

(char *) 0, (char *) 0, (char *) 0,

(char *) 0 };

#ifdef PREFIXES_IN_USE

char *fqn_prefix_names[PREFIX_COUNT] = {

"hackdir", "leveldir", "savedir", "bonesdir", "datadir",

"scoredir", "lockdir", "sysconfdir", "configdir", "troubledir"

};

NEARDATA struct savefile_info sfcap = {

#ifdef NHSTDC

0x00000000UL

0x00000000L

#if defined(COMPRESS) || defined(ZLIB_COMP)

| SFI1_EXTERNALCOMP

#if defined(ZEROCOMP)

| SFI1_ZEROCOMP

#if defined(RLECOMP)

| SFI1_RLECOMP

,

#ifdef NHSTDC

0x00000000UL, 0x00000000UL

0x00000000L, 0x00000000L

};

NEARDATA struct savefile_info sfrestinfo, sfsaveinfo = {

#ifdef NHSTDC

0x00000000UL

0x00000000L

#if defined(COMPRESS) || defined(ZLIB_COMP)

| SFI1_EXTERNALCOMP

#if defined(ZEROCOMP)

| SFI1_ZEROCOMP

#if defined(RLECOMP)

| SFI1_RLECOMP

,

#ifdef NHSTDC

0x00000000UL, 0x00000000UL

0x00000000L, 0x00000000L

};

struct plinemsg_type *plinemsg_types = (struct plinemsg_type *) 0;

#ifdef PANICTRACE

const char *ARGV0;

unsigned nhUse_dummy = 0;

decl_init()

{

return;

}