2962e623d0
* Update Mac port to new options system. * Update Mac-specific documentation. * Remove hardcoded version strings. * Remove obsolete popup_dialog.
66 lines
1.4 KiB
C
66 lines
1.4 KiB
C
/* SCCS Id: @(#)mactopl.c 3.1 91/07/23 */
|
|
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#include "hack.h"
|
|
#include "mactty.h"
|
|
#include "macwin.h"
|
|
#include "macpopup.h"
|
|
|
|
char
|
|
queued_resp(char *resp) {
|
|
char buf[30];
|
|
if (try_key_queue(buf)) {
|
|
if (!resp || strchr(resp, buf[0]))
|
|
return buf[0];
|
|
if (digit(buf[0]) && strchr(resp, '#')) {
|
|
yn_number = atoi(buf);
|
|
return '#';
|
|
}
|
|
}
|
|
return '\0';
|
|
}
|
|
|
|
|
|
char
|
|
topl_yn_function(const char *query, const char *resp, char def) {
|
|
char buf[30];
|
|
char c = queued_resp((char *) resp);
|
|
if (!c) {
|
|
enter_topl_mode((char *) query);
|
|
topl_set_resp((char *) resp, def);
|
|
|
|
do {
|
|
c = readchar();
|
|
if (c && resp && !strchr(resp, c)) {
|
|
nhbell();
|
|
c = '\0';
|
|
}
|
|
} while (!c);
|
|
|
|
topl_set_resp("", '\0');
|
|
leave_topl_mode(buf);
|
|
if (c == '#')
|
|
yn_number = atoi(buf);
|
|
}
|
|
return c;
|
|
}
|
|
|
|
|
|
char
|
|
mac_yn_function(query, resp, def)
|
|
const char *query,*resp;
|
|
char def;
|
|
/*
|
|
* Generic yes/no function. 'def' is the default (returned by space or
|
|
* return; 'esc' returns 'q', or 'n', or the default, depending on
|
|
* what's in the string. The 'query' string is printed before the user
|
|
* is asked about the string.
|
|
* If resp is NULL, any single character is accepted and returned.
|
|
*/
|
|
{
|
|
return topl_yn_function(query, resp, def);
|
|
}
|
|
|
|
/* mactopl.c */
|