NetBSD/games/hack/hack.monst.c

151 lines
6.0 KiB
C

/* $NetBSD: hack.monst.c,v 1.7 2011/08/16 09:26:22 christos Exp $ */
/*
* Copyright (c) 1985, Stichting Centrum voor Wiskunde en Informatica,
* Amsterdam
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are
* met:
*
* - Redistributions of source code must retain the above copyright notice,
* this list of conditions and the following disclaimer.
*
* - Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* - Neither the name of the Stichting Centrum voor Wiskunde en
* Informatica, nor the names of its contributors may be used to endorse or
* promote products derived from this software without specific prior
* written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
* IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
* PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
* OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
* PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
/*
* Copyright (c) 1982 Jay Fenlason <hack@gnu.org>
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
* AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
* THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#include <sys/cdefs.h>
#ifndef lint
__RCSID("$NetBSD: hack.monst.c,v 1.7 2011/08/16 09:26:22 christos Exp $");
#endif /* not lint */
#include "hack.h"
#include "extern.h"
#include "def.eshk.h"
const struct permonst mons[CMNUM + 2] = {
{"bat", 'B', 1, 22, 8, 1, 4, 0},
{"gnome", 'G', 1, 6, 5, 1, 6, 0},
{"hobgoblin", 'H', 1, 9, 5, 1, 8, 0},
{"jackal", 'J', 0, 12, 7, 1, 2, 0},
{"kobold", 'K', 1, 6, 7, 1, 4, 0},
{"leprechaun", 'L', 5, 15, 8, 1, 2, 0},
{"giant rat", 'r', 0, 12, 7, 1, 3, 0},
{"acid blob", 'a', 2, 3, 8, 0, 0, 0},
{"floating eye", 'E', 2, 1, 9, 0, 0, 0},
{"homunculus", 'h', 2, 6, 6, 1, 3, 0},
{"imp", 'i', 2, 6, 2, 1, 4, 0},
{"orc", 'O', 2, 9, 6, 1, 8, 0},
{"yellow light", 'y', 3, 15, 0, 0, 0, 0},
{"zombie", 'Z', 2, 6, 8, 1, 8, 0},
{"giant ant", 'A', 3, 18, 3, 1, 6, 0},
{"fog cloud", 'f', 3, 1, 0, 1, 6, 0},
{"nymph", 'N', 6, 12, 9, 1, 2, 0},
{"piercer", 'p', 3, 1, 3, 2, 6, 0},
{"quasit", 'Q', 3, 15, 3, 1, 4, 0},
{"quivering blob", 'q', 3, 1, 8, 1, 8, 0},
{"violet fungi", 'v', 3, 1, 7, 1, 4, 0},
{"giant beetle", 'b', 4, 6, 4, 3, 4, 0},
{"centaur", 'C', 4, 18, 4, 1, 6, 0},
{"cockatrice", 'c', 4, 6, 6, 1, 3, 0},
{"gelatinous cube", 'g', 4, 6, 8, 2, 4, 0},
{"jaguar", 'j', 4, 15, 6, 1, 8, 0},
{"killer bee", 'k', 4, 14, 4, 2, 4, 0},
{"snake", 'S', 4, 15, 3, 1, 6, 0},
{"freezing sphere", 'F', 2, 13, 4, 0, 0, 0},
{"owlbear", 'o', 5, 12, 5, 2, 6, 0},
{"rust monster", 'R', 10, 18, 3, 0, 0, 0},
{"scorpion", 's', 5, 15, 3, 1, 4, 0},
{"tengu", 't', 5, 13, 5, 1, 7, 0},
{"wraith", 'W', 5, 12, 5, 1, 6, 0},
#ifdef NOWORM
{"wumpus", 'w', 8, 3, 2, 3, 6, 0},
#else
{"long worm", 'w', 8, 3, 5, 1, 4, 0},
#endif /* NOWORM */
{"large dog", 'd', 6, 15, 4, 2, 4, 0},
{"leocrotta", 'l', 6, 18, 4, 3, 6, 0},
{"mimic", 'M', 7, 3, 7, 3, 4, 0},
{"troll", 'T', 7, 12, 4, 2, 7, 0},
{"unicorn", 'u', 8, 24, 5, 1, 10, 0},
{"yeti", 'Y', 5, 15, 6, 1, 6, 0},
{"stalker", 'I', 8, 12, 3, 4, 4, 0},
{"umber hulk", 'U', 9, 6, 2, 2, 10, 0},
{"vampire", 'V', 8, 12, 1, 1, 6, 0},
{"xorn", 'X', 8, 9, -2, 4, 6, 0},
{"xan", 'x', 7, 18, -2, 2, 4, 0},
{"zruty", 'z', 9, 8, 3, 3, 6, 0},
{"chameleon", ':', 6, 5, 6, 4, 2, 0},
{"dragon", 'D', 10, 9, -1, 3, 8, 0},
{"ettin", 'e', 10, 12, 3, 2, 8, 0},
{"lurker above", '\'', 10, 3, 3, 0, 0, 0},
{"nurse", 'n', 11, 6, 0, 1, 3, 0},
{"trapper", ',', 12, 3, 3, 0, 0, 0},
{"purple worm", 'P', 15, 9, 6, 2, 8, 0},
{"demon", '&', 10, 12, -4, 1, 4, 0},
{"minotaur", 'm', 15, 15, 6, 4, 10, 0},
{"shopkeeper", '@', 12, 18, 0, 4, 8, sizeof(struct eshk)}
};
const struct permonst pm_ghost = {"ghost", ' ', 10, 3, -5, 1, 1, sizeof(plname)};
const struct permonst pm_wizard = {
"wizard of Yendor", '1', 15, 12, -2, 1, 12, 0
};
#ifdef MAIL
const struct permonst pm_mail_daemon = {"mail daemon", '2', 100, 1, 10, 0, 0, 0};
#endif /* MAIL */
const struct permonst pm_eel = {"giant eel", ';', 15, 6, -3, 3, 6, 0};
void *
monster_private(struct monst *mon)
{
return mon->mextra;
}