Add a stack of 2 tins of spinach near the leader on the monk quest start level and another stack of 2 blessed tins of spinach at a random spot on the monk quest locate level, to compensate for the inability to gain strength from giant corpses if they adhere to vegan or vegetarian conduct. paxed supplied the 'tinplace' magic. 4 tins of spinach aren't nearly enough to get to 18/100, but by uncursing the first pair, if necessary, and waiting until strength is at least 18, they can be eaten to add 4..40 (average 22) points of exceptional strength. (Players choosing either of those conducts for other roles or foodless for any role are on their own as far as boosting Str goes, same as before.) The special level loader needed to be modified to handle tins of spinach. It now accepts "spinach" as a fake monster type for an object of type "tin". Also added support for empty tins since it involved the same code, and use of fake monster type "empty" with object type "egg" to be able to create generic (unhatchable) eggs. (Wishing for "egg" produces those by default but it also accepts explicit "empty egg" by coincidence.)
99 lines
3.7 KiB
Lua
99 lines
3.7 KiB
Lua
-- NetHack Monk Mon-loca.lua $NHDT-Date: 1652196007 2022/05/10 15:20:07 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.1 $
|
|
-- Copyright (c) 1989 by Jean-Christophe Collet
|
|
-- Copyright (c) 1991-2 by M. Stephenson
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
--
|
|
des.level_init({ style = "solidfill", fg = " " });
|
|
|
|
des.level_flags("mazelevel");
|
|
|
|
-- 1 2 3 4 5 6 7
|
|
--123456789012345678901234567890123456789012345678901234567890123456789012345
|
|
des.map([[
|
|
---------------------------------------------------- --------
|
|
---.................................................- --.....|
|
|
---...--------........------........................--- ---...|
|
|
---.....- --.......- ----..................---- --.--
|
|
---.....---- --------- --..................-- --..|
|
|
---...----- ----.----.....----.....--- --..||
|
|
----..---- -----..--- |...--- |.......--- --...|
|
|
|...--- ----....--- |.--- |.........-- --...||
|
|
|...- ----.....--- ---- |..........---....|
|
|
|...---- ----......--- | |...|.......-....||
|
|
|......----- ---.........- | -----...|............|
|
|
|..........----- ----...........--- -------......||...........||
|
|
|..............-----................--- |............|||..........|
|
|
|-S----...............................--- |...........|| |.........||
|
|
|.....|..............------.............-----..........|| ||........|
|
|
|.....|.............-- ---.........................|| |.......||
|
|
|.....|.............- ---.....................--| ||......|
|
|
|---S--------.......---- --.................---- |.....||
|
|
|...........|..........--------..............----- ||....|
|
|
|...........|............................----- |....|
|
|
------------------------------------------ ------
|
|
]]);
|
|
-- Random Monsters
|
|
|
|
-- Dungeon Description
|
|
des.region(selection.area(00,00,75,20), "lit")
|
|
-- Stairs
|
|
des.stair("up")
|
|
des.stair("down")
|
|
-- Non diggable walls
|
|
des.non_diggable(selection.area(00,00,75,20))
|
|
-- Objects
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
des.object()
|
|
-- since vegetarian monks shouldn't eat giant corpses, give a chance for
|
|
-- Str boost that isn't throttled by exercise restrictions;
|
|
-- make a modest effort (Elbereth only) to prevent xorns from eating the tins
|
|
local tinplace = selection.negate():filter_mapchar('.')
|
|
local tinloc = tinplace:rndcoord(0)
|
|
des.object({ id="tin", coord=tinloc, quantity=2, buc="blessed",
|
|
montype="spinach" })
|
|
des.engraving({ coord=tinloc, type="burn", text="Elbereth" })
|
|
-- Random traps
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
-- Random monsters.
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("earth elemental")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|
|
des.monster("xorn")
|