Difference between revisions of "Source:NetHack 3.6.0/src/pline.c"
Jump to navigation
Jump to search
Line 19: | Line 19: | ||
<span id="line12">12. static char *FDECL(You_buf, (int));</span> | <span id="line12">12. static char *FDECL(You_buf, (int));</span> | ||
<span id="line13">13. </span> | <span id="line13">13. </span> | ||
+ | |||
+ | == pline == | ||
+ | |||
<span id="line14">14. /*VARARGS1*/</span> | <span id="line14">14. /*VARARGS1*/</span> | ||
<span id="line15">15. /* Note that these declarations rely on knowledge of the internals</span> | <span id="line15">15. /* Note that these declarations rely on knowledge of the internals</span> | ||
Line 115: | Line 118: | ||
<span id="line108">108. }</span> | <span id="line108">108. }</span> | ||
<span id="line109">109. </span> | <span id="line109">109. </span> | ||
+ | |||
+ | == Norep == | ||
+ | |||
<span id="line110">110. /*VARARGS1*/</span> | <span id="line110">110. /*VARARGS1*/</span> | ||
<span id="line111">111. void Norep</span> | <span id="line111">111. void Norep</span> | ||
Line 128: | Line 134: | ||
<span id="line121">121. }</span> | <span id="line121">121. }</span> | ||
<span id="line122">122. </span> | <span id="line122">122. </span> | ||
+ | |||
+ | == You_buf == | ||
+ | |||
<span id="line123">123. /* work buffer for You(), &c and verbalize() */</span> | <span id="line123">123. /* work buffer for You(), &c and verbalize() */</span> | ||
<span id="line124">124. static char *you_buf = 0;</span> | <span id="line124">124. static char *you_buf = 0;</span> | ||
Line 145: | Line 154: | ||
<span id="line138">138. }</span> | <span id="line138">138. }</span> | ||
<span id="line139">139. </span> | <span id="line139">139. </span> | ||
+ | |||
+ | == free_youbuf == | ||
+ | |||
<span id="line140">140. void</span> | <span id="line140">140. void</span> | ||
<span id="line141">141. free_youbuf()</span> | <span id="line141">141. free_youbuf()</span> | ||
Line 153: | Line 165: | ||
<span id="line146">146. }</span> | <span id="line146">146. }</span> | ||
<span id="line147">147. </span> | <span id="line147">147. </span> | ||
+ | |||
+ | == You == | ||
+ | |||
<span id="line148">148. /* `prefix' must be a string literal, not a pointer */</span> | <span id="line148">148. /* `prefix' must be a string literal, not a pointer */</span> | ||
<span id="line149">149. #define YouPrefix(pointer, prefix, text) \</span> | <span id="line149">149. #define YouPrefix(pointer, prefix, text) \</span> | ||
Line 171: | Line 186: | ||
<span id="line164">164. }</span> | <span id="line164">164. }</span> | ||
<span id="line165">165. </span> | <span id="line165">165. </span> | ||
+ | |||
+ | == Your == | ||
+ | |||
<span id="line166">166. /*VARARGS1*/</span> | <span id="line166">166. /*VARARGS1*/</span> | ||
<span id="line167">167. void Your</span> | <span id="line167">167. void Your</span> | ||
Line 182: | Line 200: | ||
<span id="line175">175. }</span> | <span id="line175">175. }</span> | ||
<span id="line176">176. </span> | <span id="line176">176. </span> | ||
+ | |||
+ | == You_feel == | ||
+ | |||
<span id="line177">177. /*VARARGS1*/</span> | <span id="line177">177. /*VARARGS1*/</span> | ||
<span id="line178">178. void You_feel</span> | <span id="line178">178. void You_feel</span> | ||
Line 197: | Line 218: | ||
<span id="line190">190. }</span> | <span id="line190">190. }</span> | ||
<span id="line191">191. </span> | <span id="line191">191. </span> | ||
+ | |||
+ | == You_cant == | ||
+ | |||
<span id="line192">192. /*VARARGS1*/</span> | <span id="line192">192. /*VARARGS1*/</span> | ||
<span id="line193">193. void You_cant</span> | <span id="line193">193. void You_cant</span> | ||
Line 208: | Line 232: | ||
<span id="line201">201. }</span> | <span id="line201">201. }</span> | ||
<span id="line202">202. </span> | <span id="line202">202. </span> | ||
+ | |||
+ | == pline_The == | ||
+ | |||
<span id="line203">203. /*VARARGS1*/</span> | <span id="line203">203. /*VARARGS1*/</span> | ||
<span id="line204">204. void pline_The</span> | <span id="line204">204. void pline_The</span> | ||
Line 219: | Line 246: | ||
<span id="line212">212. }</span> | <span id="line212">212. }</span> | ||
<span id="line213">213. </span> | <span id="line213">213. </span> | ||
+ | |||
+ | == There == | ||
+ | |||
<span id="line214">214. /*VARARGS1*/</span> | <span id="line214">214. /*VARARGS1*/</span> | ||
<span id="line215">215. void There</span> | <span id="line215">215. void There</span> | ||
Line 230: | Line 260: | ||
<span id="line223">223. }</span> | <span id="line223">223. }</span> | ||
<span id="line224">224. </span> | <span id="line224">224. </span> | ||
+ | |||
+ | == You_hear == | ||
+ | |||
<span id="line225">225. /*VARARGS1*/</span> | <span id="line225">225. /*VARARGS1*/</span> | ||
<span id="line226">226. void You_hear</span> | <span id="line226">226. void You_hear</span> | ||
Line 250: | Line 283: | ||
<span id="line243">243. }</span> | <span id="line243">243. }</span> | ||
<span id="line244">244. </span> | <span id="line244">244. </span> | ||
+ | |||
+ | == You_see == | ||
+ | |||
<span id="line245">245. /*VARARGS1*/</span> | <span id="line245">245. /*VARARGS1*/</span> | ||
<span id="line246">246. void You_see</span> | <span id="line246">246. void You_see</span> | ||
Line 268: | Line 304: | ||
<span id="line261">261. }</span> | <span id="line261">261. }</span> | ||
<span id="line262">262. </span> | <span id="line262">262. </span> | ||
+ | |||
+ | == verbalize == | ||
+ | |||
<span id="line263">263. /* Print a message inside double-quotes.</span> | <span id="line263">263. /* Print a message inside double-quotes.</span> | ||
<span id="line264">264. * The caller is responsible for checking deafness.</span> | <span id="line264">264. * The caller is responsible for checking deafness.</span> | ||
Line 288: | Line 327: | ||
<span id="line281">281. }</span> | <span id="line281">281. }</span> | ||
<span id="line282">282. </span> | <span id="line282">282. </span> | ||
+ | |||
+ | == raw_printf == | ||
+ | |||
<span id="line283">283. /*VARARGS1*/</span> | <span id="line283">283. /*VARARGS1*/</span> | ||
<span id="line284">284. /* Note that these declarations rely on knowledge of the internals</span> | <span id="line284">284. /* Note that these declarations rely on knowledge of the internals</span> | ||
Line 341: | Line 383: | ||
<span id="line334">334. }</span> | <span id="line334">334. }</span> | ||
<span id="line335">335. </span> | <span id="line335">335. </span> | ||
+ | |||
+ | == impossible == | ||
+ | |||
<span id="line336">336. /*VARARGS1*/</span> | <span id="line336">336. /*VARARGS1*/</span> | ||
<span id="line337">337. void impossible</span> | <span id="line337">337. void impossible</span> | ||
Line 361: | Line 406: | ||
<span id="line354">354. }</span> | <span id="line354">354. }</span> | ||
<span id="line355">355. </span> | <span id="line355">355. </span> | ||
+ | |||
+ | == align_str == | ||
+ | |||
<span id="line356">356. const char *</span> | <span id="line356">356. const char *</span> | ||
<span id="line357">357. align_str(alignment)</span> | <span id="line357">357. align_str(alignment)</span> | ||
Line 378: | Line 426: | ||
<span id="line371">371. }</span> | <span id="line371">371. }</span> | ||
<span id="line372">372. </span> | <span id="line372">372. </span> | ||
+ | |||
+ | == mstatusline == | ||
+ | |||
<span id="line373">373. void</span> | <span id="line373">373. void</span> | ||
<span id="line374">374. mstatusline(mtmp)</span> | <span id="line374">374. mstatusline(mtmp)</span> | ||
Line 472: | Line 523: | ||
<span id="line465">465. }</span> | <span id="line465">465. }</span> | ||
<span id="line466">466. </span> | <span id="line466">466. </span> | ||
+ | |||
+ | == ustatusline == | ||
+ | |||
<span id="line467">467. void</span> | <span id="line467">467. void</span> | ||
<span id="line468">468. ustatusline()</span> | <span id="line468">468. ustatusline()</span> | ||
Line 554: | Line 608: | ||
<span id="line547">547. }</span> | <span id="line547">547. }</span> | ||
<span id="line548">548. </span> | <span id="line548">548. </span> | ||
+ | |||
+ | == self_invis_message == | ||
+ | |||
<span id="line549">549. void</span> | <span id="line549">549. void</span> | ||
<span id="line550">550. self_invis_message()</span> | <span id="line550">550. self_invis_message()</span> | ||
Line 563: | Line 620: | ||
<span id="line556">556. }</span> | <span id="line556">556. }</span> | ||
<span id="line557">557. </span> | <span id="line557">557. </span> | ||
+ | |||
+ | == pudding_merge_message == | ||
+ | |||
<span id="line558">558. void</span> | <span id="line558">558. void</span> | ||
<span id="line559">559. pudding_merge_message(otmp, otmp2)</span> | <span id="line559">559. pudding_merge_message(otmp, otmp2)</span> |
Latest revision as of 22:09, 3 January 2016
Below is the full text to pline.c from the source code of NetHack 3.6.0. To link to a particular line, write [[Source:NetHack 3.6.0/src/pline.c#line123]], for example.
The NetHack General Public License applies to screenshots, source code and other content from NetHack.
This content was modified from the original NetHack source code distribution (by splitting up NetHack content between wiki pages, and possibly further editing). See the page history for a list of who changed it, and on what dates.
Contents
Top of file
/* NetHack 3.6 pline.c $NHDT-Date: 1432512770 2015/05/25 00:12:50 $ $NHDT-Branch: master $:$NHDT-Revision: 1.42 $ */
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
/* NetHack may be freely redistributed. See license for details. */
#define NEED_VARARGS /* Uses ... */ /* comment line for pre-compiled headers \
*/
#include "hack.h"
static boolean no_repeat = FALSE;
static char prevmsg[BUFSZ];
static char *FDECL(You_buf, (int));
pline
/*VARARGS1*/
/* Note that these declarations rely on knowledge of the internals
* of the variable argument handling stuff in "tradstdc.h"
*/
#if defined(USE_STDARG) || defined(USE_VARARGS)
static void FDECL(vpline, (const char *, va_list));
void pline
VA_DECL(const char *, line)
{
VA_START(line);
VA_INIT(line, char *);
vpline(line, VA_ARGS);
VA_END();
}
# ifdef USE_STDARG
static void
vpline(const char *line, va_list the_args)
# else
static void
vpline(line, the_args)
const char *line;
va_list the_args;
# endif
#else /* USE_STDARG | USE_VARARG */
# define vpline pline
void pline
VA_DECL(const char *, line)
#endif /* USE_STDARG | USE_VARARG */
{ /* start of vpline() or of nested block in USE_OLDARG's pline() */
char pbuf[3 * BUFSZ];
int ln;
xchar msgtyp;
/* Do NOT use VA_START and VA_END in here... see above */
if (!line || !*line)
return;
#ifdef HANGUPHANDLING
if (program_state.done_hup)
return;
#endif
if (program_state.wizkit_wishing)
return;
if (index(line, '%')) {
Vsprintf(pbuf, line, VA_ARGS);
line = pbuf;
}
if ((ln = (int) strlen(line)) > BUFSZ - 1) {
if (line != pbuf) /* no '%' was present */
(void) strncpy(pbuf, line, BUFSZ - 1); /* caveat: unterminated */
/* truncate, preserving the final 3 characters:
"___ extremely long text" -> "___ extremely l...ext"
(this may be suboptimal if overflow is less than 3) */
(void) strncpy(pbuf + BUFSZ - 1 - 6, "...", 3);
/* avoid strncpy; buffers could overlap if excess is small */
pbuf[BUFSZ - 1 - 3] = line[ln - 3];
pbuf[BUFSZ - 1 - 2] = line[ln - 2];
pbuf[BUFSZ - 1 - 1] = line[ln - 1];
pbuf[BUFSZ - 1] = '\0';
line = pbuf;
}
if (!iflags.window_inited) {
raw_print(line);
iflags.last_msg = PLNMSG_UNKNOWN;
return;
}
#ifndef MAC
if (no_repeat && !strcmp(line, toplines))
return;
#endif /* MAC */
if (vision_full_recalc)
vision_recalc(0);
if (u.ux)
flush_screen(1); /* %% */
msgtyp = msgtype_type(line);
if (msgtyp == MSGTYP_NOSHOW) return;
if (msgtyp == MSGTYP_NOREP && !strcmp(line, prevmsg)) return;
putstr(WIN_MESSAGE, 0, line);
/* this gets cleared after every pline message */
iflags.last_msg = PLNMSG_UNKNOWN;
strncpy(prevmsg, line, BUFSZ);
if (msgtyp == MSGTYP_STOP) display_nhwindow(WIN_MESSAGE, TRUE); /* --more-- */
#if !(defined(USE_STDARG) || defined(USE_VARARGS))
/* provide closing brace for the nested block
which immediately follows USE_OLDARGS's VA_DECL() */
VA_END();
#endif
}
Norep
/*VARARGS1*/
void Norep
VA_DECL(const char *, line)
{
VA_START(line);
VA_INIT(line, const char *);
no_repeat = TRUE;
vpline(line, VA_ARGS);
no_repeat = FALSE;
VA_END();
return;
}
You_buf
/* work buffer for You(), &c and verbalize() */
static char *you_buf = 0;
static int you_buf_siz = 0;
static char *
You_buf(siz)
int siz;
{
if (siz > you_buf_siz) {
if (you_buf)
free((genericptr_t) you_buf);
you_buf_siz = siz + 10;
you_buf = (char *) alloc((unsigned) you_buf_siz);
}
return you_buf;
}
free_youbuf
void
free_youbuf()
{
if (you_buf)
free((genericptr_t) you_buf), you_buf = (char *) 0;
you_buf_siz = 0;
}
You
/* `prefix' must be a string literal, not a pointer */
#define YouPrefix(pointer, prefix, text) \
Strcpy((pointer = You_buf((int) (strlen(text) + sizeof prefix))), prefix)
#define YouMessage(pointer, prefix, text) \
strcat((YouPrefix(pointer, prefix, text), pointer), text)
/*VARARGS1*/
void You
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
vpline(YouMessage(tmp, "You ", line), VA_ARGS);
VA_END();
}
Your
/*VARARGS1*/
void Your
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
vpline(YouMessage(tmp, "Your ", line), VA_ARGS);
VA_END();
}
You_feel
/*VARARGS1*/
void You_feel
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
if (Unaware)
YouPrefix(tmp, "You dream that you feel ", line);
else
YouPrefix(tmp, "You feel ", line);
vpline(strcat(tmp, line), VA_ARGS);
VA_END();
}
You_cant
/*VARARGS1*/
void You_cant
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
vpline(YouMessage(tmp, "You can't ", line), VA_ARGS);
VA_END();
}
pline_The
/*VARARGS1*/
void pline_The
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
vpline(YouMessage(tmp, "The ", line), VA_ARGS);
VA_END();
}
There
/*VARARGS1*/
void There
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
vpline(YouMessage(tmp, "There ", line), VA_ARGS);
VA_END();
}
You_hear
/*VARARGS1*/
void You_hear
VA_DECL(const char *, line)
{
char *tmp;
if (Deaf || !flags.acoustics)
return;
VA_START(line);
VA_INIT(line, const char *);
if (Underwater)
YouPrefix(tmp, "You barely hear ", line);
else if (Unaware)
YouPrefix(tmp, "You dream that you hear ", line);
else
YouPrefix(tmp, "You hear ", line);
vpline(strcat(tmp, line), VA_ARGS);
VA_END();
}
You_see
/*VARARGS1*/
void You_see
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
if (Unaware)
YouPrefix(tmp, "You dream that you see ", line);
else if (Blind) /* caller should have caught this... */
YouPrefix(tmp, "You sense ", line);
else
YouPrefix(tmp, "You see ", line);
vpline(strcat(tmp, line), VA_ARGS);
VA_END();
}
verbalize
/* Print a message inside double-quotes.
* The caller is responsible for checking deafness.
* Gods can speak directly to you in spite of deafness.
*/
/*VARARGS1*/
void verbalize
VA_DECL(const char *, line)
{
char *tmp;
VA_START(line);
VA_INIT(line, const char *);
tmp = You_buf((int) strlen(line) + sizeof "\"\"");
Strcpy(tmp, "\"");
Strcat(tmp, line);
Strcat(tmp, "\"");
vpline(tmp, VA_ARGS);
VA_END();
}
raw_printf
/*VARARGS1*/
/* Note that these declarations rely on knowledge of the internals
* of the variable argument handling stuff in "tradstdc.h"
*/
#if defined(USE_STDARG) || defined(USE_VARARGS)
static void FDECL(vraw_printf, (const char *, va_list));
void raw_printf
VA_DECL(const char *, line)
{
VA_START(line);
VA_INIT(line, char *);
vraw_printf(line, VA_ARGS);
VA_END();
}
# ifdef USE_STDARG
static void
vraw_printf(const char *line, va_list the_args)
# else
static void
vraw_printf(line, the_args)
const char *line;
va_list the_args;
# endif
#else /* USE_STDARG | USE_VARARG */
void raw_printf
VA_DECL(const char *, line)
#endif
{
char pbuf[3 * BUFSZ];
int ln;
/* Do NOT use VA_START and VA_END in here... see above */
if (index(line, '%')) {
Vsprintf(pbuf, line, VA_ARGS);
line = pbuf;
}
if ((ln = (int) strlen(line)) > BUFSZ - 1) {
if (line != pbuf)
line = strncpy(pbuf, line, BUFSZ - 1);
/* unlike pline, we don't futz around to keep last few chars */
pbuf[BUFSZ - 1] = '\0'; /* terminate strncpy or truncate vsprintf */
}
raw_print(line);
#if !(defined(USE_STDARG) || defined(USE_VARARGS))
VA_END(); /* (see vpline) */
#endif
}
impossible
/*VARARGS1*/
void impossible
VA_DECL(const char *, s)
{
char pbuf[2 * BUFSZ];
VA_START(s);
VA_INIT(s, const char *);
if (program_state.in_impossible)
panic("impossible called impossible");
program_state.in_impossible = 1;
Vsprintf(pbuf, s, VA_ARGS);
pbuf[BUFSZ - 1] = '\0'; /* sanity */
paniclog("impossible", pbuf);
pline("%s", pbuf);
pline("Program in disorder - perhaps you'd better #quit.");
program_state.in_impossible = 0;
VA_END();
}
align_str
const char *
align_str(alignment)
aligntyp alignment;
{
switch ((int) alignment) {
case A_CHAOTIC:
return "chaotic";
case A_NEUTRAL:
return "neutral";
case A_LAWFUL:
return "lawful";
case A_NONE:
return "unaligned";
}
return "unknown";
}
mstatusline
void
mstatusline(mtmp)
register struct monst *mtmp;
{
aligntyp alignment = mon_aligntyp(mtmp);
char info[BUFSZ], monnambuf[BUFSZ];
info[0] = 0;
if (mtmp->mtame) {
Strcat(info, ", tame");
if (wizard) {
Sprintf(eos(info), " (%d", mtmp->mtame);
if (!mtmp->isminion)
Sprintf(eos(info), "; hungry %ld; apport %d",
EDOG(mtmp)->hungrytime, EDOG(mtmp)->apport);
Strcat(info, ")");
}
} else if (mtmp->mpeaceful)
Strcat(info, ", peaceful");
if (mtmp->cham >= LOW_PM && mtmp->data != &mons[mtmp->cham])
/* don't reveal the innate form (chameleon, vampire, &c),
just expose the fact that this current form isn't it */
Strcat(info, ", shapechanger");
/* pets eating mimic corpses mimic while eating, so this comes first */
if (mtmp->meating)
Strcat(info, ", eating");
/* a stethoscope exposes mimic before getting here so this
won't be relevant for it, but wand of probing doesn't */
if (mtmp->m_ap_type)
Sprintf(eos(info), ", mimicking %s",
(mtmp->m_ap_type == M_AP_FURNITURE)
? an(defsyms[mtmp->mappearance].explanation)
: (mtmp->m_ap_type == M_AP_OBJECT)
? ((mtmp->mappearance == GOLD_PIECE)
? "gold"
: an(simple_typename(mtmp->mappearance)))
: (mtmp->m_ap_type == M_AP_MONSTER)
? an(mons[mtmp->mappearance].mname)
: something); /* impossible... */
if (mtmp->mcan)
Strcat(info, ", cancelled");
if (mtmp->mconf)
Strcat(info, ", confused");
if (mtmp->mblinded || !mtmp->mcansee)
Strcat(info, ", blind");
if (mtmp->mstun)
Strcat(info, ", stunned");
if (mtmp->msleeping)
Strcat(info, ", asleep");
#if 0 /* unfortunately mfrozen covers temporary sleep and being busy \
(donning armor, for instance) as well as paralysis */
else if (mtmp->mfrozen) Strcat(info, ", paralyzed");
#else
else if (mtmp->mfrozen || !mtmp->mcanmove)
Strcat(info, ", can't move");
#endif
/* [arbitrary reason why it isn't moving] */
else if (mtmp->mstrategy & STRAT_WAITMASK)
Strcat(info, ", meditating");
if (mtmp->mflee)
Strcat(info, ", scared");
if (mtmp->mtrapped)
Strcat(info, ", trapped");
if (mtmp->mspeed)
Strcat(info, mtmp->mspeed == MFAST ? ", fast" : mtmp->mspeed == MSLOW
? ", slow"
: ", ???? speed");
if (mtmp->mundetected)
Strcat(info, ", concealed");
if (mtmp->minvis)
Strcat(info, ", invisible");
if (mtmp == u.ustuck)
Strcat(info, sticks(youmonst.data)
? ", held by you"
: !u.uswallow ? ", holding you"
: attacktype_fordmg(u.ustuck->data,
AT_ENGL, AD_DGST)
? ", digesting you"
: is_animal(u.ustuck->data)
? ", swallowing you"
: ", engulfing you");
if (mtmp == u.usteed)
Strcat(info, ", carrying you");
/* avoid "Status of the invisible newt ..., invisible" */
/* and unlike a normal mon_nam, use "saddled" even if it has a name */
Strcpy(monnambuf, x_monnam(mtmp, ARTICLE_THE, (char *) 0,
(SUPPRESS_IT | SUPPRESS_INVISIBLE), FALSE));
pline("Status of %s (%s): Level %d HP %d(%d) AC %d%s.", monnambuf,
align_str(alignment), mtmp->m_lev, mtmp->mhp, mtmp->mhpmax,
find_mac(mtmp), info);
}
ustatusline
void
ustatusline()
{
char info[BUFSZ];
info[0] = '\0';
if (Sick) {
Strcat(info, ", dying from");
if (u.usick_type & SICK_VOMITABLE)
Strcat(info, " food poisoning");
if (u.usick_type & SICK_NONVOMITABLE) {
if (u.usick_type & SICK_VOMITABLE)
Strcat(info, " and");
Strcat(info, " illness");
}
}
if (Stoned)
Strcat(info, ", solidifying");
if (Slimed)
Strcat(info, ", becoming slimy");
if (Strangled)
Strcat(info, ", being strangled");
if (Vomiting)
Strcat(info, ", nauseated"); /* !"nauseous" */
if (Confusion)
Strcat(info, ", confused");
if (Blind) {
Strcat(info, ", blind");
if (u.ucreamed) {
if ((long) u.ucreamed < Blinded || Blindfolded
|| !haseyes(youmonst.data))
Strcat(info, ", cover");
Strcat(info, "ed by sticky goop");
} /* note: "goop" == "glop"; variation is intentional */
}
if (Stunned)
Strcat(info, ", stunned");
if (!u.usteed && Wounded_legs) {
const char *what = body_part(LEG);
if ((Wounded_legs & BOTH_SIDES) == BOTH_SIDES)
what = makeplural(what);
Sprintf(eos(info), ", injured %s", what);
}
if (Glib)
Sprintf(eos(info), ", slippery %s", makeplural(body_part(HAND)));
if (u.utrap)
Strcat(info, ", trapped");
if (Fast)
Strcat(info, Very_fast ? ", very fast" : ", fast");
if (u.uundetected)
Strcat(info, ", concealed");
if (Invis)
Strcat(info, ", invisible");
if (u.ustuck) {
if (sticks(youmonst.data))
Strcat(info, ", holding ");
else
Strcat(info, ", held by ");
Strcat(info, mon_nam(u.ustuck));
}
pline("Status of %s (%s%s): Level %d HP %d(%d) AC %d%s.", plname,
(u.ualign.record >= 20)
? "piously "
: (u.ualign.record > 13)
? "devoutly "
: (u.ualign.record > 8)
? "fervently "
: (u.ualign.record > 3)
? "stridently "
: (u.ualign.record == 3)
? ""
: (u.ualign.record >= 1)
? "haltingly "
: (u.ualign.record == 0)
? "nominally "
: "insufficiently ",
align_str(u.ualign.type),
Upolyd ? mons[u.umonnum].mlevel : u.ulevel, Upolyd ? u.mh : u.uhp,
Upolyd ? u.mhmax : u.uhpmax, u.uac, info);
}
self_invis_message
void
self_invis_message()
{
pline("%s %s.",
Hallucination ? "Far out, man! You" : "Gee! All of a sudden, you",
See_invisible ? "can see right through yourself"
: "can't see yourself");
}
pudding_merge_message
void
pudding_merge_message(otmp, otmp2)
struct obj *otmp;
struct obj *otmp2;
{
boolean visible =
cansee(otmp->ox, otmp->oy) || cansee(otmp2->ox, otmp2->oy);
boolean onfloor = otmp->where == OBJ_FLOOR || otmp2->where == OBJ_FLOOR;
boolean inpack = carried(otmp) || carried(otmp2);
/* the player will know something happened inside his own inventory */
if ((!Blind && visible) || inpack) {
if (Hallucination) {
if (onfloor) {
You_see("parts of the floor melting!");
} else if (inpack) {
Your("pack reaches out and grabs something!");
}
/* even though we can see where they should be,
* they'll be out of our view (minvent or container)
* so don't actually show anything */
} else if (onfloor || inpack) {
pline("The %s coalesce%s.", makeplural(obj_typename(otmp->otyp)),
inpack ? " inside your pack" : "");
}
} else {
You_hear("a faint sloshing sound.");
}
}
/*pline.c*/