This is amimenu.c in view mode; [Download] [Up]
/*
* amimenu.c (C) Copyright 1989 by Olaf Seibert (KosmoSoft)
*
* Originally by John Toebes.
*/
/* NetHack may be freely redistributed. See license for details. */
#define TEXT(nam,str) \
static struct IntuiText nam = \
{0,1,JAM2,0,0,0L,(UBYTE*)str,0L}
/* Commands */
TEXT(T_HELP, "? Display help menu");
TEXT(T_amp, "& Explain a command");
TEXT(T_O, "O Set options");
TEXT(T_SHELL, "! AmigaDos commands");
TEXT(T_v, "v Version number");
TEXT(T_CR, "^R Redraw screen");
TEXT(T_CP, "^P Repeat last message");
TEXT(T_Q, "Q Quit game");
TEXT(T_S, "S Save the game");
/* Inventory */
TEXT(T_i, "i Inventory");
TEXT(T_p, "p Pay your bill");
TEXT(T_d, "d Drop an object");
TEXT(T_D, "D Drop several things");
TEXT(T_COMMA, ", Pickup an object");
TEXT(T_AT, "@ Toggle pickup");
TEXT(T_SLASH, "/ Identify something");
TEXT(T_C, "C Christen a monster");
/* Actions */
TEXT(T_a, "a Apply/use something");
TEXT(T_e, "e Eat something");
TEXT(T_q, "q Quaff a potion");
TEXT(T_r, "r Read scroll/book");
TEXT(T_t, "t Throw/shoot weapon");
TEXT(T_z, "z Zap a wand");
TEXT(T_Z, "Z Cast a spell");
TEXT(T_HASH, "# Extended command");
/* Preparations */
TEXT(T_w, "w Wield a weapon");
TEXT(T_P, "P Put on ring");
TEXT(T_R, "R Remove ring");
TEXT(T_T, "T Take off armor");
TEXT(T_W, "W Wear armor");
TEXT(T_WPN, ") Current weapon");
TEXT(T_ARMOR, "[ Current armor");
TEXT(T_RING, "= Current rings");
TEXT(T_AMU, "\" Current amulet");
TEXT(T_TOOL, "( Current tools");
/* Movement */
TEXT(T_o, "o Open door");
TEXT(T_c, "c Close door");
TEXT(T_KICK, "^D Kick door");
TEXT(T_s, "s Search");
TEXT(T_UP, "< Go up stairs");
TEXT(T_DOWN, "> Go down stairs");
TEXT(T_CT, "^T Teleport");
TEXT(T_WAIT, ". Wait a moment");
TEXT(T_E, "E Engrave msg on floor");
#define IFLAGS ITEMENABLED|ITEMTEXT|HIGHCOMP
#define IDATA(cmd,str,off) 0,off,WDT,9,IFLAGS,0,(APTR)&str,NULL,cmd,0L,0
/* Commands */
#undef WDT
#define WDT 184
static struct MenuItem cmdsub[] = {
{ &cmdsub[1], IDATA('?', T_HELP, 0) }, /* Display help */
{ &cmdsub[2], IDATA('&', T_amp, 10) }, /* Explain a command */
{ &cmdsub[3], IDATA('O', T_O, 20) }, /* Set options */
{ &cmdsub[4], IDATA('!', T_SHELL, 30) }, /* AmigaDos commands */
{ &cmdsub[5], IDATA('v', T_v, 40) }, /* Version number */
{ &cmdsub[6], IDATA(022, T_CR, 50) }, /*R Redraw screen */
{ &cmdsub[7], IDATA(020 ,T_CP, 60) }, /*P Repeat last message */
{ &cmdsub[8], IDATA('Q', T_Q, 70) }, /* Quit game */
{ NULL, IDATA('S', T_S, 80) }, /* Save the game */
};
/* Inventory */
#undef WDT
#define WDT 184
static struct MenuItem invsub[] = {
{ &invsub[1], IDATA('i', T_i, 0) }, /* Inventory */
{ &invsub[2], IDATA('p', T_p, 10) }, /* Pay your bill */
{ &invsub[3], IDATA('d', T_d, 20) }, /* Drop an object */
{ &invsub[4], IDATA('D', T_D, 30) }, /* Drop several things */
{ &invsub[5], IDATA(',', T_COMMA, 40) }, /* Pickup an object */
{ &invsub[6], IDATA('/', T_SLASH, 50) }, /* Identify something */
{ NULL, IDATA('C', T_C, 60) }, /* Christen a monster */
};
/* Actions */
#undef WDT
#define WDT 184
static struct MenuItem actsub[] = {
{ &actsub[1], IDATA('a', T_a, 0) }, /* Apply/use something */
{ &actsub[2], IDATA('e', T_e, 10) }, /* Eat something */
{ &actsub[3], IDATA('q', T_q, 20) }, /* Quaff a potion */
{ &actsub[4], IDATA('r', T_r, 30) }, /* Read a scroll/spellbook */
{ &actsub[5], IDATA('t', T_t, 40) }, /* Throw/shoot weapon */
{ &actsub[6], IDATA('z', T_z, 50) }, /* Zap a wand */
{ &actsub[7], IDATA('Z', T_Z, 60) }, /* Cast a spell */
{ NULL , IDATA('#', T_HASH, 70) }, /* Extended command */
};
/* Preparations */
#undef WDT
#define WDT 144
static struct MenuItem armsub[] = {
{ &armsub[1], IDATA('w', T_w, 0) }, /* Wield a weapon */
{ &armsub[2], IDATA('R', T_R, 10) }, /* Remove ring */
{ &armsub[3], IDATA('P', T_P, 20) }, /* Put on ring */
{ &armsub[4], IDATA('T', T_T, 30) }, /* Take off armor */
{ &armsub[5], IDATA('W', T_W, 40) }, /* Wear armor */
{ &armsub[6], IDATA(')', T_WPN, 50) }, /* Current weapon */
{ &armsub[7], IDATA('[', T_ARMOR, 60) }, /* Current armor */
{ &armsub[8], IDATA('=', T_RING, 70) }, /* Current rings */
{ &armsub[9], IDATA('"', T_AMU, 80) }, /* Current amulet */
{ NULL , IDATA('(', T_TOOL, 90) }, /* Current tools */
};
/* Movement */
#undef WDT
#define WDT 192
static struct MenuItem movsub[] = {
{ &movsub[1], IDATA('o', T_o, 0) }, /* Open door */
{ &movsub[2], IDATA('c', T_c, 10) }, /* Close door */
{ &movsub[3], IDATA(004, T_KICK, 20) }, /*D Kick door */
{ &movsub[4], IDATA('s', T_s, 30) }, /* Search */
{ &movsub[5], IDATA('<', T_UP, 40) }, /* Go up stairs */
{ &movsub[6], IDATA('>', T_DOWN, 50) }, /* Go down stairs */
{ &movsub[7], IDATA(024, T_CT, 60) }, /*T Teleport */
{ &movsub[8], IDATA('.', T_WAIT, 70) }, /* Wait a moment */
{ NULL , IDATA('E', T_E, 80) }, /* Engrave msg on floor */
};
/* Menustrip */
/* Width = #letters * 8 + 8 + 10 */
struct Menu HackMenu[] = {
{ &HackMenu[1], 10,0, 72,0,MENUENABLED,"Commands", &cmdsub[0] }, /*8*/
{ &HackMenu[2], 92,0, 80,0,MENUENABLED,"Inventory", &invsub[0] }, /*9*/
{ &HackMenu[3],182,0, 64,0,MENUENABLED,"Actions", &actsub[0] }, /*7*/
{ &HackMenu[4],256,0,104,0,MENUENABLED,"Preparations", &armsub[0] }, /*12*/
{ NULL, 370,0, 72,0,MENUENABLED,"Movement", &movsub[0] }, /*8*/
};
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.