72db7ca912
- avoid strict aliasing violations, but adding an intermediate function.
151 lines
6.0 KiB
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;
|
|
}
|