hack.monst.c revision 1.7
1/* $NetBSD: hack.monst.c,v 1.7 2011/08/16 09:26:22 christos Exp $ */ 2 3/* 4 * Copyright (c) 1985, Stichting Centrum voor Wiskunde en Informatica, 5 * Amsterdam 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions are 10 * met: 11 * 12 * - Redistributions of source code must retain the above copyright notice, 13 * this list of conditions and the following disclaimer. 14 * 15 * - Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * - Neither the name of the Stichting Centrum voor Wiskunde en 20 * Informatica, nor the names of its contributors may be used to endorse or 21 * promote products derived from this software without specific prior 22 * written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS 25 * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 26 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A 27 * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER 28 * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 29 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 30 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 31 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 32 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 33 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 34 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 35 */ 36 37/* 38 * Copyright (c) 1982 Jay Fenlason <hack@gnu.org> 39 * All rights reserved. 40 * 41 * Redistribution and use in source and binary forms, with or without 42 * modification, are permitted provided that the following conditions 43 * are met: 44 * 1. Redistributions of source code must retain the above copyright 45 * notice, this list of conditions and the following disclaimer. 46 * 2. Redistributions in binary form must reproduce the above copyright 47 * notice, this list of conditions and the following disclaimer in the 48 * documentation and/or other materials provided with the distribution. 49 * 3. The name of the author may not be used to endorse or promote products 50 * derived from this software without specific prior written permission. 51 * 52 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, 53 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY 54 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL 55 * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, 56 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 57 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 58 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 59 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 60 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 61 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 62 */ 63 64#include <sys/cdefs.h> 65#ifndef lint 66__RCSID("$NetBSD: hack.monst.c,v 1.7 2011/08/16 09:26:22 christos Exp $"); 67#endif /* not lint */ 68 69#include "hack.h" 70#include "extern.h" 71#include "def.eshk.h" 72 73const struct permonst mons[CMNUM + 2] = { 74 {"bat", 'B', 1, 22, 8, 1, 4, 0}, 75 {"gnome", 'G', 1, 6, 5, 1, 6, 0}, 76 {"hobgoblin", 'H', 1, 9, 5, 1, 8, 0}, 77 {"jackal", 'J', 0, 12, 7, 1, 2, 0}, 78 {"kobold", 'K', 1, 6, 7, 1, 4, 0}, 79 {"leprechaun", 'L', 5, 15, 8, 1, 2, 0}, 80 {"giant rat", 'r', 0, 12, 7, 1, 3, 0}, 81 {"acid blob", 'a', 2, 3, 8, 0, 0, 0}, 82 {"floating eye", 'E', 2, 1, 9, 0, 0, 0}, 83 {"homunculus", 'h', 2, 6, 6, 1, 3, 0}, 84 {"imp", 'i', 2, 6, 2, 1, 4, 0}, 85 {"orc", 'O', 2, 9, 6, 1, 8, 0}, 86 {"yellow light", 'y', 3, 15, 0, 0, 0, 0}, 87 {"zombie", 'Z', 2, 6, 8, 1, 8, 0}, 88 {"giant ant", 'A', 3, 18, 3, 1, 6, 0}, 89 {"fog cloud", 'f', 3, 1, 0, 1, 6, 0}, 90 {"nymph", 'N', 6, 12, 9, 1, 2, 0}, 91 {"piercer", 'p', 3, 1, 3, 2, 6, 0}, 92 {"quasit", 'Q', 3, 15, 3, 1, 4, 0}, 93 {"quivering blob", 'q', 3, 1, 8, 1, 8, 0}, 94 {"violet fungi", 'v', 3, 1, 7, 1, 4, 0}, 95 {"giant beetle", 'b', 4, 6, 4, 3, 4, 0}, 96 {"centaur", 'C', 4, 18, 4, 1, 6, 0}, 97 {"cockatrice", 'c', 4, 6, 6, 1, 3, 0}, 98 {"gelatinous cube", 'g', 4, 6, 8, 2, 4, 0}, 99 {"jaguar", 'j', 4, 15, 6, 1, 8, 0}, 100 {"killer bee", 'k', 4, 14, 4, 2, 4, 0}, 101 {"snake", 'S', 4, 15, 3, 1, 6, 0}, 102 {"freezing sphere", 'F', 2, 13, 4, 0, 0, 0}, 103 {"owlbear", 'o', 5, 12, 5, 2, 6, 0}, 104 {"rust monster", 'R', 10, 18, 3, 0, 0, 0}, 105 {"scorpion", 's', 5, 15, 3, 1, 4, 0}, 106 {"tengu", 't', 5, 13, 5, 1, 7, 0}, 107 {"wraith", 'W', 5, 12, 5, 1, 6, 0}, 108#ifdef NOWORM 109 {"wumpus", 'w', 8, 3, 2, 3, 6, 0}, 110#else 111 {"long worm", 'w', 8, 3, 5, 1, 4, 0}, 112#endif /* NOWORM */ 113 {"large dog", 'd', 6, 15, 4, 2, 4, 0}, 114 {"leocrotta", 'l', 6, 18, 4, 3, 6, 0}, 115 {"mimic", 'M', 7, 3, 7, 3, 4, 0}, 116 {"troll", 'T', 7, 12, 4, 2, 7, 0}, 117 {"unicorn", 'u', 8, 24, 5, 1, 10, 0}, 118 {"yeti", 'Y', 5, 15, 6, 1, 6, 0}, 119 {"stalker", 'I', 8, 12, 3, 4, 4, 0}, 120 {"umber hulk", 'U', 9, 6, 2, 2, 10, 0}, 121 {"vampire", 'V', 8, 12, 1, 1, 6, 0}, 122 {"xorn", 'X', 8, 9, -2, 4, 6, 0}, 123 {"xan", 'x', 7, 18, -2, 2, 4, 0}, 124 {"zruty", 'z', 9, 8, 3, 3, 6, 0}, 125 {"chameleon", ':', 6, 5, 6, 4, 2, 0}, 126 {"dragon", 'D', 10, 9, -1, 3, 8, 0}, 127 {"ettin", 'e', 10, 12, 3, 2, 8, 0}, 128 {"lurker above", '\'', 10, 3, 3, 0, 0, 0}, 129 {"nurse", 'n', 11, 6, 0, 1, 3, 0}, 130 {"trapper", ',', 12, 3, 3, 0, 0, 0}, 131 {"purple worm", 'P', 15, 9, 6, 2, 8, 0}, 132 {"demon", '&', 10, 12, -4, 1, 4, 0}, 133 {"minotaur", 'm', 15, 15, 6, 4, 10, 0}, 134 {"shopkeeper", '@', 12, 18, 0, 4, 8, sizeof(struct eshk)} 135}; 136 137const struct permonst pm_ghost = {"ghost", ' ', 10, 3, -5, 1, 1, sizeof(plname)}; 138const struct permonst pm_wizard = { 139 "wizard of Yendor", '1', 15, 12, -2, 1, 12, 0 140}; 141#ifdef MAIL 142const struct permonst pm_mail_daemon = {"mail daemon", '2', 100, 1, 10, 0, 0, 0}; 143#endif /* MAIL */ 144const struct permonst pm_eel = {"giant eel", ';', 15, 6, -3, 3, 6, 0}; 145 146void * 147monster_private(struct monst *mon) 148{ 149 return mon->mextra; 150} 151