#include <sys/types.h>
#define MAXLEVEL 11
#define MAXVLEVEL 3
#define MAXX 67
#define MAXY 17
#define SCORESIZE 10
#define MAXPLEVEL 100
#define MAXMONST 56
#define SPNUM 38
#define MAXSCROLL 28
#define MAXPOTION 35
#define TIMELIMIT 30000
#define TAXRATE 1/20
#define MAXOBJ 93
struct monst {
const char *name;
char level;
short armorclass;
char damage;
char attack;
char defense;
char genocided;
char intelligence;
short gold;
short hitpoints;
unsigned long experience;
};
struct _itm {
short price;
u_char obj;
u_char arg;
char qty;
};
struct cel {
short hitp;
char mitem;
char item;
short iarg;
char know;
};
struct sphere {
struct sphere *p;
char x, y, lev;
char dir;
short lifetime;
};
#define STRENGTH 0
#define INTELLIGENCE 1
#define WISDOM 2
#define CONSTITUTION 3
#define DEXTERITY 4
#define CHARISMA 5
#define HPMAX 6
#define HP 7
#define GOLD 8
#define EXPERIENCE 9
#define LEVEL 10
#define REGEN 11
#define WCLASS 12
#define AC 13
#define BANKACCOUNT 14
#define SPELLMAX 15
#define SPELLS 16
#define ENERGY 17
#define ECOUNTER 18
#define MOREDEFENSES 19
#define WEAR 20
#define PROTECTIONTIME 21
#define WIELD 22
#define AMULET 23
#define REGENCOUNTER 24
#define MOREDAM 25
#define DEXCOUNT 26
#define STRCOUNT 27
#define BLINDCOUNT 28
#define CAVELEVEL 29
#define CONFUSE 30
#define ALTPRO 31
#define HERO 32
#define CHARMCOUNT 33
#define INVISIBILITY 34
#define CANCELLATION 35
#define HASTESELF 36
#define EYEOFLARN 37
#define AGGRAVATE 38
#define GLOBE 39
#define TELEFLAG 40
#define SLAYING 41
#define NEGATESPIRIT 42
#define SCAREMONST 43
#define AWARENESS 44
#define HOLDMONST 45
#define TIMESTOP 46
#define HASTEMONST 47
#define CUBEofUNDEAD 48
#define GIANTSTR 49
#define FIRERESISTANCE 50
#define BESSMANN 51
#define NOTHEFT 52
#define HARDGAME 53
#define CPUTIME 54
#define BYTESIN 55
#define BYTESOUT 56
#define MOVESMADE 57
#define MONSTKILLED 58
#define SPELLSCAST 59
#define LANCEDEATH 60
#define SPIRITPRO 61
#define UNDEADPRO 62
#define SHIELD 63
#define STEALTH 64
#define ITCHING 65
#define LAUGHING 66
#define DRAINSTRENGTH 67
#define CLUMSINESS 68
#define INFEEBLEMENT 69
#define HALFDAM 70
#define SEEINVISIBLE 71
#define FILLROOM 72
#define RANDOMWALK 73
#define SPHCAST 74
#define WTW 75
#define STREXTRA 76
#define TMP 77
#define LIFEPROT 78
#define OALTAR 1
#define OTHRONE 2
#define OORB 3
#define OPIT 4
#define OSTAIRSUP 5
#define OELEVATORUP 6
#define OFOUNTAIN 7
#define OSTATUE 8
#define OTELEPORTER 9
#define OSCHOOL 10
#define OMIRROR 11
#define ODNDSTORE 12
#define OSTAIRSDOWN 13
#define OELEVATORDOWN 14
#define OBANK2 15
#define OBANK 16
#define ODEADFOUNTAIN 17
#define OMAXGOLD 70
#define OGOLDPILE 18
#define OOPENDOOR 19
#define OCLOSEDDOOR 20
#define OWALL 21
#define OTRAPARROW 66
#define OTRAPARROWIV 67
#define OLARNEYE 22
#define OPLATE 23
#define OCHAIN 24
#define OLEATHER 25
#define ORING 60
#define OSTUDLEATHER 61
#define OSPLINT 62
#define OPLATEARMOR 63
#define OSSPLATE 64
#define OSHIELD 68
#define OELVENCHAIN 92
#define OSWORDofSLASHING 26
#define OHAMMER 27
#define OSWORD 28
#define O2SWORD 29
#define OSPEAR 30
#define ODAGGER 31
#define OBATTLEAXE 57
#define OLONGSWORD 58
#define OFLAIL 59
#define OLANCE 65
#define OVORPAL 90
#define OSLAYER 91
#define ORINGOFEXTRA 32
#define OREGENRING 33
#define OPROTRING 34
#define OENERGYRING 35
#define ODEXRING 36
#define OSTRRING 37
#define OCLEVERRING 38
#define ODAMRING 39
#define OBELT 40
#define OSCROLL 41
#define OPOTION 42
#define OBOOK 43
#define OCHEST 44
#define OAMULET 45
#define OORBOFDRAGON 46
#define OSPIRITSCARAB 47
#define OCUBEofUNDEAD 48
#define ONOTHEFT 49
#define ODIAMOND 50
#define ORUBY 51
#define OEMERALD 52
#define OSAPPHIRE 53
#define OENTRANCE 54
#define OVOLDOWN 55
#define OVOLUP 56
#define OHOME 69
#define OKGOLD 71
#define ODGOLD 72
#define OIVDARTRAP 73
#define ODARTRAP 74
#define OTRAPDOOR 75
#define OIVTRAPDOOR 76
#define OTRADEPOST 77
#define OIVTELETRAP 78
#define ODEADTHRONE 79
#define OANNIHILATION 80
#define OTHRONE2 81
#define OLRS 82
#define OCOOKIE 83
#define OURN 84
#define OBRASSLAMP 85
#define OHANDofFEAR 86
#define OSPHTAILSMAN 87
#define OWWAND 88
#define OPSTAFF 89
#define BAT 1
#define GNOME 2
#define HOBGOBLIN 3
#define JACKAL 4
#define KOBOLD 5
#define ORC 6
#define SNAKE 7
#define CENTIPEDE 8
#define JACULI 9
#define TROGLODYTE 10
#define ANT 11
#define EYE 12
#define LEPRECHAUN 13
#define NYMPH 14
#define QUASIT 15
#define RUSTMONSTER 16
#define ZOMBIE 17
#define ASSASSINBUG 18
#define BUGBEAR 19
#define HELLHOUND 20
#define ICELIZARD 21
#define CENTAUR 22
#define TROLL 23
#define YETI 24
#define WHITEDRAGON 25
#define ELF 26
#define CUBE 27
#define METAMORPH 28
#define VORTEX 29
#define ZILLER 30
#define VIOLETFUNGI 31
#define WRAITH 32
#define FORVALAKA 33
#define LAMANOBE 34
#define OSEQUIP 35
#define ROTHE 36
#define XORN 37
#define VAMPIRE 38
#define INVISIBLESTALKER 39
#define POLTERGEIST 40
#define DISENCHANTRESS 41
#define SHAMBLINGMOUND 42
#define YELLOWMOLD 43
#define UMBERHULK 44
#define GNOMEKING 45
#define MIMIC 46
#define WATERLORD 47
#define BRONZEDRAGON 48
#define GREENDRAGON 49
#define PURPLEWORM 50
#define XVART 51
#define SPIRITNAGA 52
#define SILVERDRAGON 53
#define PLATINUMDRAGON 54
#define GREENURCHIN 55
#define REDDRAGON 56
#define DEMONLORD 57
#define DEMONPRINCE 64
#ifndef NULL
#define NULL 0
#endif
#define BUFBIG 4096
#define MAXIBUF 4096
#define LOGNAMESIZE 40
#define PSNAMESIZE 40
#ifndef NODEFS
extern char VERSION, SUBVERSION;
extern u_char beenhere[], boldon, cheat, ckpflag;
extern const char *class[];
extern u_char course[];
extern char diagfile[], helpfile[], ckpfile[], larnlevels[],
playerids[], optsfile[1024], psname[], savefilename[],
scorefile[];
extern u_char *inbuffer;
extern u_char item[MAXX][MAXY], iven[], know[MAXX][MAXY];
extern const char *levelname[];
extern char logfile[], loginname[], logname[], lastmonst[];
extern u_char *lpbuf, *lpend;
extern u_char *lpnt, moved[MAXX][MAXY], mitem[MAXX][MAXY], monstlevel[];
extern char monstnamelist[], objnamelist[];
extern u_char nch[], ndgg[], nlpts[], nomove, nosignal, nowelcome;
extern u_char nplt[], nsw[];
extern const char *objectname[];
extern const char *potionhide[], *potionname[];
extern const char *spelcode[], *spelname[], *spelmes[];
extern char aborted[], spelweird[MAXMONST + 8][SPNUM];
extern u_char potprob[];
extern u_char predostuff, restorflag, scprob[];
extern u_char screen[MAXX][MAXY], sex;
extern const char *speldescript[];
extern const char *scrollhide[], *scrollname[];
extern u_char spelknow[];
extern u_char splev[], stealth[MAXX][MAXY], wizard;
extern short diroffx[], diroffy[], hitflag, hit2flag, hit3flag, hitp[MAXX][MAXY];
extern short iarg[MAXX][MAXY], ivenarg[], lasthx, lasthy, lastnum, lastpx,
lastpy;
extern short nobeep, oldx, oldy, playerx, playery, level;
extern int enable_scroll, srcount, yrepcount, userid, wisid,
io_outfd, io_infd;
extern gid_t gid, egid;
extern long outstanding_taxes, skill[], gltime, c[], cbak[];
extern time_t initialtime;
extern unsigned long randx;
extern struct cel *cell;
extern struct monst monster[];
extern struct sphere *spheres;
extern struct _itm itm[];
extern int rmst, lasttime;
#define newscroll() (scprob[rund(81)])
#define newpotion() (potprob[rund(41)])
#define newleather() (nlpts[rund(c[HARDGAME]?13:15)])
#define newchain() (nch[rund(10)])
#define newplate() (nplt[rund(c[HARDGAME]?4:12)])
#define newdagger() (ndgg[rund(13)])
#define newsword() (nsw[rund(c[HARDGAME]?6:13)])
#define forget() (item[playerx][playery]=know[playerx][playery]=0)
#define disappear(x,y) (mitem[x][y]=know[x][y]=0)
#ifdef VT100
#define setbold() (lprcat(boldon?"\33[1m":"\33[7m"))
#define resetbold() (lprcat("\33[m"))
#define setscroll() (lprcat("\33[20;24r"))
#define resetscroll() (lprcat("\33[;24r"))
#define clear() (lprcat("\33[2J\33[f"), cbak[SPELLS]= -50)
#define cltoeoln() lprcat("\33[K")
#else
#define ST_START 1
#define ST_END 2
#define BOLD 3
#define END_BOLD 4
#define CLEAR 5
#define CL_LINE 6
#define CL_DOWN 14
#define CURSOR 15
#define setbold() (*lpnt++ = ST_START)
#define resetbold() (*lpnt++ = ST_END)
#define setscroll() enable_scroll=1
#define resetscroll() enable_scroll=0
#define clear() (*lpnt++ =CLEAR, cbak[SPELLS]= -50)
#define cltoeoln() (*lpnt++ = CL_LINE)
#endif
#define lprc(ch) ((lpnt>=lpend)?(void)(*lpnt++ = (ch), lflush()):(void)(*lpnt++ = (ch)))
#define seedrand(x) (randx=x)
#ifdef MACRORND
#define rnd(x) ((((randx=randx*1103515245+12345)>>7)%(x))+1)
#define rund(x) ((((randx=randx*1103515245+12345)>>7)%(x)) )
#endif
#define min(x,y) (((x)>(y))?(y):(x))
#define max(x,y) (((x)>(y))?(x):(y))
#endif