*** empty log message ***
This commit is contained in:
jwalz
178
src/rip.c
Normal file
178
src/rip.c
Normal file
@@ -0,0 +1,178 @@
|
||||
/* SCCS Id: @(#)rip.c 3.3 2001/09/24 */
|
||||
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
|
||||
/* NetHack may be freely redistributed. See license for details. */
|
||||
|
||||
#include "hack.h"
|
||||
|
||||
STATIC_DCL void FDECL(center, (int, char *));
|
||||
|
||||
extern const char *killed_by_prefix[];
|
||||
|
||||
#if defined(TTY_GRAPHICS) || defined(X11_GRAPHICS) || defined(GEM_GRAPHICS)
|
||||
# define TEXT_TOMBSTONE
|
||||
#endif
|
||||
#if defined(mac) || defined(__BEOS__) || defined(WIN32_GRAPHICS)
|
||||
# ifndef TEXT_TOMBSTONE
|
||||
# define TEXT_TOMBSTONE
|
||||
# endif
|
||||
#endif
|
||||
|
||||
#ifdef TEXT_TOMBSTONE
|
||||
|
||||
#ifndef NH320_DEDICATION
|
||||
/* A normal tombstone for end of game display. */
|
||||
static const char *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 *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 char **rip;
|
||||
|
||||
STATIC_OVL void
|
||||
center(line, text)
|
||||
int line;
|
||||
char *text;
|
||||
{
|
||||
register char *ip,*op;
|
||||
ip = text;
|
||||
op = &rip[line][STONE_LINE_CENT - ((strlen(text)+1)>>1)];
|
||||
while(*ip) *op++ = *ip++;
|
||||
}
|
||||
|
||||
|
||||
void
|
||||
genl_outrip(tmpwin, how)
|
||||
winid tmpwin;
|
||||
int how;
|
||||
{
|
||||
register char **dp;
|
||||
register char *dpx;
|
||||
char buf[BUFSZ];
|
||||
register int x;
|
||||
int line;
|
||||
|
||||
rip = dp = (char **) alloc(sizeof(rip_txt));
|
||||
for (x = 0; rip_txt[x]; x++) {
|
||||
dp[x] = (char *) alloc((unsigned int)(strlen(rip_txt[x]) + 1));
|
||||
Strcpy(dp[x], rip_txt[x]);
|
||||
}
|
||||
dp[x] = (char *)0;
|
||||
|
||||
/* Put name on stone */
|
||||
Sprintf(buf, "%s", plname);
|
||||
buf[STONE_LINE_LEN] = 0;
|
||||
center(NAME_LINE, buf);
|
||||
|
||||
/* Put $ on stone */
|
||||
#ifndef GOLDOBJ
|
||||
Sprintf(buf, "%ld Au", u.ugold);
|
||||
#else
|
||||
/* FIXME: this neglects gold in containers (which will be gone by
|
||||
now if bones have been saved). For the !GOLDOBJ configuration,
|
||||
any such gold gets added into u.ugold by done(). */
|
||||
Sprintf(buf, "%ld Au", money_cnt(invent));
|
||||
#endif
|
||||
buf[STONE_LINE_LEN] = 0; /* It could be a *lot* of gold :-) */
|
||||
center(GOLD_LINE, buf);
|
||||
|
||||
/* Put together death description */
|
||||
switch (killer_format) {
|
||||
default: impossible("bad killer format?");
|
||||
case KILLED_BY_AN:
|
||||
Strcpy(buf, killed_by_prefix[how]);
|
||||
Strcat(buf, an(killer));
|
||||
break;
|
||||
case KILLED_BY:
|
||||
Strcpy(buf, killed_by_prefix[how]);
|
||||
Strcat(buf, killer);
|
||||
break;
|
||||
case NO_KILLER_PREFIX:
|
||||
Strcpy(buf, killer);
|
||||
break;
|
||||
}
|
||||
|
||||
/* Put death type on stone */
|
||||
for (line=DEATH_LINE, dpx = buf; line<YEAR_LINE; line++) {
|
||||
register int i,i0;
|
||||
char tmpchar;
|
||||
|
||||
if ( (i0=strlen(dpx)) > STONE_LINE_LEN) {
|
||||
for(i = STONE_LINE_LEN;
|
||||
((i0 > STONE_LINE_LEN) && i); 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 */
|
||||
Sprintf(buf, "%4d", getyear());
|
||||
center(YEAR_LINE, buf);
|
||||
|
||||
putstr(tmpwin, 0, "");
|
||||
for(; *dp; dp++)
|
||||
putstr(tmpwin, 0, *dp);
|
||||
|
||||
putstr(tmpwin, 0, "");
|
||||
putstr(tmpwin, 0, "");
|
||||
|
||||
for (x = 0; rip_txt[x]; x++) {
|
||||
free((genericptr_t)rip[x]);
|
||||
}
|
||||
free((genericptr_t)rip);
|
||||
rip = 0;
|
||||
}
|
||||
|
||||
#endif /* TEXT_TOMBSTONE */
|
||||
|
||||
/*rip.c*/
|
||||
Reference in New Issue
Block a user