02a48aa8cf
The consolidation of global variables from scattered source
files into decl.c and declared in decl.h was begun in 3.7.0.
Their placement in common files was done for centralized
initialization and potential re-initialization during a
"play again" scenario.
It wasn't really necessary for all of them to be housed in a
single huge structure to meet the "play again" requirement,
and the single huge structure has been a little unwieldy when
it comes to maintenance.
Following this commit, instead of one single extremely large structure
named 'g' to house all of the relocated global variables, they
are distributed into several ga through gz.
To make things easy for the developer, each variable is placed
into the struct corresponding to the starting letter of the variable.
That way, no lookup is required in order to know which struct houses
a particular variable, it is a simple match to the starting letter
for all the centralized global variables.
A global variable named 'amulets', would be found in ga.
ga.amulets
^ ^
A global varable named 'move', would be found in gm.
gm.moves
^ ^
A global variable named 'val_for_n_or_more' would be found in gv.
gv.val_for_n_or_more
^ ^
A global variable named 'youmonst' would be found in gy.
gy.youmonst
^ ^
166 lines
5.6 KiB
C
166 lines
5.6 KiB
C
/* NetHack 3.7 rip.c $NHDT-Date: 1597967808 2020/08/20 23:56:48 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.33 $ */
|
|
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
|
|
/*-Copyright (c) Robert Patrick Rankin, 2017. */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#include "hack.h"
|
|
|
|
/* Defining TEXT_TOMBSTONE causes genl_outrip() to exist, but it doesn't
|
|
necessarily have to be used by a binary with multiple window-ports */
|
|
|
|
#if defined(TTY_GRAPHICS) || defined(X11_GRAPHICS) || defined(GEM_GRAPHICS) \
|
|
|| defined(DUMPLOG) || defined(CURSES_GRAPHICS) || defined(SHIM_GRAPHICS)
|
|
#define TEXT_TOMBSTONE
|
|
#endif
|
|
#if defined(mac) || defined(__BEOS__)
|
|
#ifndef TEXT_TOMBSTONE
|
|
#define TEXT_TOMBSTONE
|
|
#endif
|
|
#endif
|
|
|
|
#ifdef TEXT_TOMBSTONE
|
|
static void center(int, char *);
|
|
|
|
#ifndef NH320_DEDICATION
|
|
/* A normal tombstone for end of game display. */
|
|
static const char *const rip_txt[] = {
|
|
" ----------",
|
|
" / \\",
|
|
" / REST \\",
|
|
" / IN \\",
|
|
" / PEACE \\",
|
|
" / \\",
|
|
" | |", /* Name of player */
|
|
" | |", /* Amount of $ */
|
|
" | |", /* Type of death */
|
|
" | |", /* . */
|
|
" | |", /* . */
|
|
" | |", /* . */
|
|
" | 1001 |", /* Real year of death */
|
|
" *| * * * | *",
|
|
" _________)/\\\\_//(\\/(/\\)/\\//\\/|_)_______", 0
|
|
};
|
|
#define STONE_LINE_CENT 28 /* char[] element of center of stone face */
|
|
#else /* NH320_DEDICATION */
|
|
/* NetHack 3.2.x displayed a dual tombstone as a tribute to Izchak. */
|
|
static const char *const rip_txt[] = {
|
|
" ---------- ----------",
|
|
" / \\ / \\",
|
|
" / REST \\ / This \\",
|
|
" / IN \\ / release of \\",
|
|
" / PEACE \\ / NetHack is \\",
|
|
" / \\ / dedicated to \\",
|
|
" | | | the memory of |",
|
|
" | | | |",
|
|
" | | | Izchak Miller |",
|
|
" | | | 1935 - 1994 |",
|
|
" | | | |",
|
|
" | | | Ascended |",
|
|
" | 1001 | | |",
|
|
" * | * * * | * * | * * * | *",
|
|
" _____)/\\|\\__//(\\/(/\\)/\\//\\/|_)________)/|\\\\_/_/(\\/(/\\)/\\/\\/|_)____",
|
|
0
|
|
};
|
|
#define STONE_LINE_CENT 19 /* char[] element of center of stone face */
|
|
#endif /* NH320_DEDICATION */
|
|
#define STONE_LINE_LEN 16 /* # chars that fit on one line
|
|
* (note 1 ' ' border) */
|
|
#define NAME_LINE 6 /* *char[] line # for player name */
|
|
#define GOLD_LINE 7 /* *char[] line # for amount of gold */
|
|
#define DEATH_LINE 8 /* *char[] line # for death description */
|
|
#define YEAR_LINE 12 /* *char[] line # for year */
|
|
|
|
static void
|
|
center(int line, char *text)
|
|
{
|
|
register char *ip, *op;
|
|
ip = text;
|
|
op = &gr.rip[line][STONE_LINE_CENT - ((strlen(text) + 1) >> 1)];
|
|
while (*ip)
|
|
*op++ = *ip++;
|
|
}
|
|
|
|
void
|
|
genl_outrip(winid tmpwin, int how, time_t when)
|
|
{
|
|
register char **dp;
|
|
register char *dpx;
|
|
char buf[BUFSZ];
|
|
register int x;
|
|
int line, year;
|
|
long cash;
|
|
|
|
gr.rip = dp = (char **) alloc(sizeof(rip_txt));
|
|
for (x = 0; rip_txt[x]; ++x)
|
|
dp[x] = dupstr(rip_txt[x]);
|
|
dp[x] = (char *) 0;
|
|
|
|
/* Put name on stone */
|
|
Sprintf(buf, "%.*s", (int) STONE_LINE_LEN, gp.plname);
|
|
center(NAME_LINE, buf);
|
|
|
|
/* Put $ on stone */
|
|
cash = max(gd.done_money, 0L);
|
|
/* arbitrary upper limit; practical upper limit is quite a bit less */
|
|
if (cash > 999999999L)
|
|
cash = 999999999L;
|
|
Sprintf(buf, "%ld Au", cash);
|
|
center(GOLD_LINE, buf);
|
|
|
|
/* Put together death description */
|
|
formatkiller(buf, sizeof buf, how, FALSE);
|
|
|
|
/* Put death type on stone */
|
|
for (line = DEATH_LINE, dpx = buf; line < YEAR_LINE; line++) {
|
|
char tmpchar;
|
|
int i, i0 = (int) strlen(dpx);
|
|
|
|
if (i0 > STONE_LINE_LEN) {
|
|
for (i = STONE_LINE_LEN; (i > 0) && (i0 > STONE_LINE_LEN); --i)
|
|
if (dpx[i] == ' ')
|
|
i0 = i;
|
|
if (!i)
|
|
i0 = STONE_LINE_LEN;
|
|
}
|
|
tmpchar = dpx[i0];
|
|
dpx[i0] = 0;
|
|
center(line, dpx);
|
|
if (tmpchar != ' ') {
|
|
dpx[i0] = tmpchar;
|
|
dpx = &dpx[i0];
|
|
} else
|
|
dpx = &dpx[i0 + 1];
|
|
}
|
|
|
|
/* Put year on stone */
|
|
year = (int) ((yyyymmdd(when) / 10000L) % 10000L);
|
|
Sprintf(buf, "%4d", year);
|
|
center(YEAR_LINE, buf);
|
|
|
|
#ifdef DUMPLOG
|
|
if (tmpwin == 0)
|
|
dump_forward_putstr(0, 0, "Game over:", TRUE);
|
|
else
|
|
#endif
|
|
putstr(tmpwin, 0, "");
|
|
|
|
for (; *dp; dp++)
|
|
putstr(tmpwin, 0, *dp);
|
|
|
|
putstr(tmpwin, 0, "");
|
|
#ifdef DUMPLOG
|
|
if (tmpwin != 0)
|
|
#endif
|
|
putstr(tmpwin, 0, "");
|
|
|
|
for (x = 0; rip_txt[x]; x++) {
|
|
free((genericptr_t) gr.rip[x]);
|
|
}
|
|
free((genericptr_t) gr.rip);
|
|
gr.rip = 0;
|
|
}
|
|
|
|
#endif /* TEXT_TOMBSTONE */
|
|
|
|
/*rip.c*/
|