c6d09a58d6
If an old port is resurrected to work with current version code, its files can be relocated to the appropriate sys or win folder as required. In the meantime, the burden of upkeep can be avoided for the stuff in the outdated folder for now.
49 lines
1.2 KiB
C
49 lines
1.2 KiB
C
/* NetHack 3.6 dprintf.c $NHDT-Date: 1432512798 2015/05/25 00:13:18 $ $NHDT-Branch: master $:$NHDT-Revision: 1.7 $ */
|
|
/* Copyright (c) Jon W{tte, 1993. */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#include "hack.h"
|
|
#include "macwin.h"
|
|
|
|
static Boolean
|
|
KeyDown(unsigned short code)
|
|
{
|
|
unsigned char keys[16];
|
|
|
|
GetKeys((void *) keys);
|
|
return ((keys[code >> 3] >> (code & 7)) & 1) != 0;
|
|
}
|
|
|
|
void
|
|
dprintf(char *format, ...)
|
|
{
|
|
char buffer[500];
|
|
va_list list;
|
|
int doit;
|
|
#define DO_DEBUGSTR 1
|
|
#define DO_PLINE 2
|
|
|
|
if (flags.debug) {
|
|
doit = 0;
|
|
if (macFlags.hasDebugger && KeyDown(0x39)) { /* Caps Lock */
|
|
doit = DO_DEBUGSTR;
|
|
} else if (KeyDown(0x3B) && iflags.window_inited && /* Control */
|
|
(WIN_MESSAGE != -1)
|
|
&& theWindows[WIN_MESSAGE].its_window) {
|
|
doit = DO_PLINE;
|
|
}
|
|
|
|
if (doit) {
|
|
va_start(list, format);
|
|
vsprintf(&buffer[1], format, list);
|
|
va_end(list);
|
|
|
|
if (doit == DO_DEBUGSTR) {
|
|
buffer[0] = strlen(&buffer[1]);
|
|
DebugStr((uchar *) buffer);
|
|
} else if (doit == DO_PLINE)
|
|
pline("%s", &buffer[1]);
|
|
}
|
|
}
|
|
}
|