Import Rogue 5.2 from the Roguelike Restoration Project (r1490)
This commit is contained in:
John "Elwin" Edwards
parent
bcc2abe517
commit
9f62c197cc
44 changed files with 16770 additions and 0 deletions
325
rogue4/extern.c
Normal file
325
rogue4/extern.c
Normal file
|
|
@ -0,0 +1,325 @@
|
|||
/*
|
||||
* global variable initializaton
|
||||
*
|
||||
* @(#)extern.c 4.32 (Berkeley) 4/1/82
|
||||
*
|
||||
* Rogue: Exploring the Dungeons of Doom
|
||||
* Copyright (C) 1980, 1981, 1982 Michael Toy, Ken Arnold and Glenn Wichman
|
||||
* All rights reserved.
|
||||
*
|
||||
* See the file LICENSE.TXT for full copyright and licensing information.
|
||||
*/
|
||||
|
||||
#include <curses.h>
|
||||
#include "rogue.h"
|
||||
|
||||
bool after; /* True if we want after daemons */
|
||||
bool noscore; /* Was a wizard sometime */
|
||||
bool s_know[MAXSCROLLS]; /* Does he know what a scroll does */
|
||||
bool p_know[MAXPOTIONS]; /* Does he know what a potion does */
|
||||
bool r_know[MAXRINGS]; /* Does he know what a ring does */
|
||||
bool ws_know[MAXSTICKS]; /* Does he know what a stick does */
|
||||
bool amulet = FALSE; /* He found the amulet */
|
||||
bool askme = FALSE; /* Ask about unidentified things */
|
||||
bool door_stop = FALSE; /* Stop running when we pass a door */
|
||||
bool fight_flush = FALSE; /* True if toilet input */
|
||||
bool firstmove = FALSE; /* First move after setting door_stop */
|
||||
bool in_shell = FALSE; /* True if executing a shell */
|
||||
bool jump = FALSE; /* Show running as series of jumps */
|
||||
bool passgo = FALSE; /* Follow passages */
|
||||
bool playing = TRUE; /* True until he quits */
|
||||
bool running = FALSE; /* True if player is running */
|
||||
bool save_msg = TRUE; /* Remember last msg */
|
||||
bool slow_invent = FALSE; /* Inventory one line at a time */
|
||||
bool terse = FALSE; /* True if we should be short */
|
||||
#ifdef WIZARD
|
||||
bool wizard = FALSE; /* True if allows wizard commands */
|
||||
#endif
|
||||
|
||||
char take; /* Thing the rogue is taking */
|
||||
char prbuf[MAXSTR]; /* Buffer for sprintfs */
|
||||
char outbuf[BUFSIZ]; /* Output buffer for stdout */
|
||||
char runch; /* Direction player is running */
|
||||
char *s_names[MAXSCROLLS]; /* Names of the scrolls */
|
||||
const char *p_colors[MAXPOTIONS]; /* Colors of the potions */
|
||||
const char *r_stones[MAXRINGS]; /* Stone settings of the rings */
|
||||
const char *w_names[MAXWEAPONS + 1] = { /* Names of the various weapons */
|
||||
"mace",
|
||||
"long sword",
|
||||
"short bow",
|
||||
"arrow",
|
||||
"dagger",
|
||||
"two handed sword",
|
||||
"dart",
|
||||
"crossbow",
|
||||
"crossbow bolt",
|
||||
"spear",
|
||||
NULL /* fake entry for dragon's breath */
|
||||
};
|
||||
const char *a_names[MAXARMORS] = { /* Names of armor types */
|
||||
"leather armor",
|
||||
"ring mail",
|
||||
"studded leather armor",
|
||||
"scale mail",
|
||||
"chain mail",
|
||||
"splint mail",
|
||||
"banded mail",
|
||||
"plate mail",
|
||||
};
|
||||
const char *ws_made[MAXSTICKS]; /* What sticks are made of */
|
||||
char *release; /* Release number of rogue */
|
||||
char whoami[MAXSTR]; /* Name of player */
|
||||
char fruit[MAXSTR]; /* Favorite fruit */
|
||||
char huh[MAXSTR]; /* The last message printed */
|
||||
char *s_guess[MAXSCROLLS]; /* Players guess at what scroll is */
|
||||
char *p_guess[MAXPOTIONS]; /* Players guess at what potion is */
|
||||
char *r_guess[MAXRINGS]; /* Players guess at what ring is */
|
||||
char *ws_guess[MAXSTICKS]; /* Players guess at what wand is */
|
||||
char *ws_type[MAXSTICKS]; /* Is it a wand or a staff */
|
||||
char file_name[MAXSTR]; /* Save file name */
|
||||
char home[MAXSTR]; /* User's home directory */
|
||||
char _level[MAXLINES*MAXCOLS]; /* Level map */
|
||||
char _flags[MAXLINES*MAXCOLS]; /* Flags for each space on the map */
|
||||
|
||||
int max_level; /* Deepest player has gone */
|
||||
int ntraps; /* Number of traps on this level */
|
||||
int dnum; /* Dungeon number */
|
||||
int level = 1; /* What level rogue is on */
|
||||
int purse = 0; /* How much gold the rogue has */
|
||||
int mpos = 0; /* Where cursor is on top line */
|
||||
int no_move = 0; /* Number of turns held in place */
|
||||
int no_command = 0; /* Number of turns asleep */
|
||||
int inpack = 0; /* Number of things in pack */
|
||||
int total = 0; /* Total dynamic memory bytes */
|
||||
int lastscore = -1; /* Score before this turn */
|
||||
int no_food = 0; /* Number of levels without food */
|
||||
int count = 0; /* Number of times to repeat command */
|
||||
int fung_hit = 0; /* Number of time fungi has hit */
|
||||
int quiet = 0; /* Number of quiet turns */
|
||||
int food_left; /* Amount of food in hero's stomach */
|
||||
int group = 2; /* Current group number */
|
||||
int hungry_state = 0; /* How hungry is he */
|
||||
int fd; /* File descriptor for score file */
|
||||
int a_chances[MAXARMORS] = { /* Chance for each armor type */
|
||||
20,
|
||||
35,
|
||||
50,
|
||||
63,
|
||||
75,
|
||||
85,
|
||||
95,
|
||||
100
|
||||
};
|
||||
int a_class[MAXARMORS] = { /* Armor class for each armor type */
|
||||
8,
|
||||
7,
|
||||
7,
|
||||
6,
|
||||
5,
|
||||
4,
|
||||
4,
|
||||
3,
|
||||
};
|
||||
|
||||
long seed; /* Random number seed */
|
||||
|
||||
coord oldpos; /* Position before last look() call */
|
||||
coord delta; /* Change indicated to get_dir() */
|
||||
|
||||
THING player; /* The rogue */
|
||||
THING *cur_armor; /* What a well dresssed rogue wears */
|
||||
THING *cur_weapon; /* Which weapon he is weilding */
|
||||
THING *cur_ring[2]; /* Which rings are being worn */
|
||||
THING *lvl_obj = NULL; /* List of objects on this level */
|
||||
THING *mlist = NULL; /* List of monsters on the level */
|
||||
THING *_monst[MAXLINES*MAXCOLS]; /* Pointers for monsters at each spot */
|
||||
|
||||
WINDOW *hw; /* Used as a scratch window */
|
||||
|
||||
#define INIT_STATS { 16, 0, 1, 10, 12, "1d4", 12 }
|
||||
|
||||
struct stats max_stats = INIT_STATS; /* The maximum for the player */
|
||||
|
||||
struct room *oldrp; /* Roomin(&oldpos) */
|
||||
struct room rooms[MAXROOMS]; /* One for each room -- A level */
|
||||
struct room passages[MAXPASS] = /* One for each passage */
|
||||
{
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 },
|
||||
{ {0, 0}, {0, 0}, {0, 0}, 0, ISGONE|ISDARK, 0, 0 }
|
||||
};
|
||||
|
||||
#define ___ 1
|
||||
#define XX 10
|
||||
struct monster monsters[26] =
|
||||
{
|
||||
/* Name CARRY FLAG str, exp, lvl, amr, hpt, dmg */
|
||||
{ "giant ant", 0, ISMEAN, { XX, 9, 2, 3, ___, "1d6" } },
|
||||
{ "bat", 0, 0, { XX, 1, 1, 3, ___, "1d2" } },
|
||||
{ "centaur", 15, 0, { XX, 15, 4, 4, ___, "1d6/1d6" } },
|
||||
{ "dragon", 100, ISMEAN, { XX,6800, 10, -1, ___, "1d8/1d8/3d10" } },
|
||||
{ "floating eye",0, 0, { XX, 5, 1, 9, ___, "0d0" } },
|
||||
/* NOTE: the damage is %%% so that xstr won't merge this */
|
||||
/* string with others, since it is written on in the program */
|
||||
{ "violet fungi",0, ISMEAN, { XX, 80, 8, 3, ___, "%%%d0" } },
|
||||
{ "gnome", 10, 0, { XX, 7, 1, 5, ___, "1d6" } },
|
||||
{ "hobgoblin", 0, ISMEAN, { XX, 3, 1, 5, ___, "1d8" } },
|
||||
{ "invisible stalker",0,ISINVIS,{ XX,120, 8, 3, ___, "4d4" } },
|
||||
{ "jackal", 0, ISMEAN, { XX, 2, 1, 7, ___, "1d2" } },
|
||||
{ "kobold", 0, ISMEAN, { XX, 1, 1, 7, ___, "1d4" } },
|
||||
{ "leprechaun", 0, 0, { XX, 10, 3, 8, ___, "1d1" } },
|
||||
{ "mimic", 30, 0, { XX,100, 7, 7, ___, "3d4" } },
|
||||
{ "nymph", 100, 0, { XX, 37, 3, 9, ___, "0d0" } },
|
||||
{ "orc", 15, ISGREED,{ XX, 5, 1, 6, ___, "1d8" } },
|
||||
{ "purple worm", 70, 0, { XX,4000, 15, 6, ___, "2d12/2d4" } },
|
||||
{ "quasit", 30, ISMEAN, { XX, 32, 3, 2, ___, "1d2/1d2/1d4" } },
|
||||
{ "rust monster",0, ISMEAN, { XX, 20, 5, 2, ___, "0d0/0d0" } },
|
||||
{ "snake", 0, ISMEAN, { XX, 2, 1, 5, ___, "1d3" } },
|
||||
{ "troll", 50, ISREGEN|ISMEAN,{ XX, 120, 6, 4, ___, "1d8/1d8/2d6" } },
|
||||
{ "umber hulk", 40, ISMEAN, { XX,200, 8, 2, ___, "3d4/3d4/2d5" } },
|
||||
{ "vampire", 20, ISREGEN|ISMEAN,{ XX,350, 8, 1, ___, "1d10" } },
|
||||
{ "wraith", 0, 0, { XX, 55, 5, 4, ___, "1d6" } },
|
||||
{ "xorn", 0, ISMEAN, { XX,190, 7, -2, ___, "1d3/1d3/1d3/4d6" } },
|
||||
{ "yeti", 30, 0, { XX, 50, 4, 6, ___, "1d6/1d6" } },
|
||||
{ "zombie", 0, ISMEAN, { XX, 6, 2, 8, ___, "1d8" } }
|
||||
};
|
||||
#undef ___
|
||||
#undef XX
|
||||
|
||||
struct magic_item things[NUMTHINGS] = {
|
||||
{ 0, 27 }, /* potion */
|
||||
{ 0, 30 }, /* scroll */
|
||||
{ 0, 17 }, /* food */
|
||||
{ 0, 8 }, /* weapon */
|
||||
{ 0, 8 }, /* armor */
|
||||
{ 0, 5 }, /* ring */
|
||||
{ 0, 5 }, /* stick */
|
||||
};
|
||||
|
||||
struct magic_item s_magic[MAXSCROLLS] = {
|
||||
{ "monster confusion", 8, 140 },
|
||||
{ "magic mapping", 5, 150 },
|
||||
{ "hold monster", 3, 180 },
|
||||
{ "sleep", 5, 5 },
|
||||
{ "enchant armor", 8, 160 },
|
||||
{ "identify", 27, 100 },
|
||||
{ "scare monster", 4, 200 },
|
||||
{ "gold detection", 4, 50 },
|
||||
{ "teleportation", 7, 165 },
|
||||
{ "enchant weapon", 10, 150 },
|
||||
{ "create monster", 5, 75 },
|
||||
{ "remove curse", 8, 105 },
|
||||
{ "aggravate monsters", 4, 20 },
|
||||
{ "blank paper", 1, 5 },
|
||||
{ "genocide", 1, 300 },
|
||||
};
|
||||
|
||||
struct magic_item p_magic[MAXPOTIONS] = {
|
||||
{ "confusion", 8, 5 },
|
||||
{ "paralysis", 10, 5 },
|
||||
{ "poison", 8, 5 },
|
||||
{ "gain strength", 15, 150 },
|
||||
{ "see invisible", 2, 100 },
|
||||
{ "healing", 15, 130 },
|
||||
{ "monster detection", 6, 130 },
|
||||
{ "magic detection", 6, 105 },
|
||||
{ "raise level", 2, 250 },
|
||||
{ "extra healing", 5, 200 },
|
||||
{ "haste self", 4, 190 },
|
||||
{ "restore strength", 14, 130 },
|
||||
{ "blindness", 4, 5 },
|
||||
{ "thirst quenching", 1, 5 },
|
||||
};
|
||||
|
||||
struct magic_item r_magic[MAXRINGS] = {
|
||||
{ "protection", 9, 400 },
|
||||
{ "add strength", 9, 400 },
|
||||
{ "sustain strength", 5, 280 },
|
||||
{ "searching", 10, 420 },
|
||||
{ "see invisible", 10, 310 },
|
||||
{ "adornment", 1, 10 },
|
||||
{ "aggravate monster", 10, 10 },
|
||||
{ "dexterity", 8, 440 },
|
||||
{ "increase damage", 8, 400 },
|
||||
{ "regeneration", 4, 460 },
|
||||
{ "slow digestion", 9, 240 },
|
||||
{ "teleportation", 5, 30 },
|
||||
{ "stealth", 7, 470 },
|
||||
{ "maintain armor", 5, 380 },
|
||||
};
|
||||
|
||||
struct magic_item ws_magic[MAXSTICKS] = {
|
||||
{ "light", 12, 250 },
|
||||
{ "striking", 9, 75 },
|
||||
{ "lightning", 3, 330 },
|
||||
{ "fire", 3, 330 },
|
||||
{ "cold", 3, 330 },
|
||||
{ "polymorph", 15, 310 },
|
||||
{ "magic missile", 10, 170 },
|
||||
{ "haste monster", 9, 5 },
|
||||
{ "slow monster", 11, 350 },
|
||||
{ "drain life", 9, 300 },
|
||||
{ "nothing", 1, 5 },
|
||||
{ "teleport away", 5, 340 },
|
||||
{ "teleport to", 5, 50 },
|
||||
{ "cancellation", 5, 280 },
|
||||
};
|
||||
|
||||
struct h_list helpstr[] = {
|
||||
'?', " prints help",
|
||||
'/', " identify object",
|
||||
'h', " left",
|
||||
'j', " down",
|
||||
'k', " up",
|
||||
'l', " right",
|
||||
'y', " up & left",
|
||||
'u', " up & right",
|
||||
'b', " down & left",
|
||||
'n', " down & right",
|
||||
'H', " run left",
|
||||
'J', " run down",
|
||||
'K', " run up",
|
||||
'L', " run right",
|
||||
'Y', " run up & left",
|
||||
'U', " run up & right",
|
||||
'B', " run down & left",
|
||||
'N', " run down & right",
|
||||
't', "<dir> throw something",
|
||||
'f', "<dir> forward until find something",
|
||||
'z', "<dir> zap a wand in a direction",
|
||||
'^', "<dir> identify trap type",
|
||||
's', " search for trap/secret door",
|
||||
'>', " go down a staircase",
|
||||
'<', " go up a staircase",
|
||||
'.', " rest for a while",
|
||||
'i', " inventory",
|
||||
'I', " inventory single item",
|
||||
'q', " quaff potion",
|
||||
'r', " read paper",
|
||||
'e', " eat food",
|
||||
'w', " wield a weapon",
|
||||
'W', " wear armor",
|
||||
'T', " take armor off",
|
||||
'P', " put on ring",
|
||||
'R', " remove ring",
|
||||
'd', " drop object",
|
||||
'c', " call object",
|
||||
'D', " recall what's been discovered",
|
||||
'o', " examine/set options",
|
||||
CTRL('L'), " redraw screen",
|
||||
CTRL('R'), " repeat last message",
|
||||
ESCAPE, " cancel command",
|
||||
'!', " shell escape",
|
||||
'S', " save game",
|
||||
'Q', " quit",
|
||||
0, 0
|
||||
};
|
||||
Loading…
Add table
Add a link
Reference in a new issue