20cbadcf85
Allow killing your quest leader, just to make games winnable if you converted before doing the quest. Boost the quest leaders and give them some equipment. King Arthur gets Excalibur. Killing quest leader gives really bad luck and makes your god angry at you, and killing quest guardians gives smaller penalties. This is based on both the EvilHack implementation by k21971 <keith.simpson1971@gmail.com>, and xNetHack implementation by copperwater <aosdict@gmail.com>.
102 lines
3.9 KiB
Lua
102 lines
3.9 KiB
Lua
-- NetHack 3.7 Valkyrie.des $NHDT-Date: 1553807172 2019/03/28 21:06:12 $ $NHDT-Branch: NetHack-3.6.2-beta01 $:$NHDT-Revision: 1.15 $
|
|
-- Copyright (c) 1989 by Jean-Christophe Collet
|
|
-- Copyright (c) 1991-2 by M. Stephenson
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
--
|
|
--
|
|
-- The "start" level for the quest.
|
|
--
|
|
-- Here you meet your (besieged) class leader, the Norn,
|
|
-- and receive your quest assignment.
|
|
--
|
|
|
|
des.level_flags("mazelevel", "noteleport", "hardfloor", "icedpools")
|
|
des.level_init({ style = "solidfill", fg = "I" })
|
|
|
|
local pools = selection.new()
|
|
-- random locations
|
|
for i = 1,13 do
|
|
pools:set();
|
|
end
|
|
-- some bigger ones
|
|
pools = pools | selection.grow(selection.set(selection.new()), "west")
|
|
pools = pools | selection.grow(selection.set(selection.new()), "north")
|
|
pools = pools | selection.grow(selection.set(selection.new()), "random")
|
|
|
|
-- Lava pools surrounded by water
|
|
des.terrain(pools:clone():grow("all"), "P")
|
|
des.terrain(pools, "L")
|
|
|
|
des.map([[
|
|
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx...xxxxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx..{..xxxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.....xxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.xxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx..xxxxxxxxxxxxxxxxxxx
|
|
xxxxxxxx.....xxxxxxxxxxxxx|----------------|xxxxxxxxxxx.xxxxxxxxxxxxxxxxxxxx
|
|
xxxxxxx..xxx...xxxxxxxxxxx|................|xxxxxxxxxx..xxxxxxxxxxxxxxxxxxxx
|
|
xxxxxx..xxxxxx......xxxxx.|................|.xxxxxxxxx.xxxxxxxxxxxxxxxxxxxxx
|
|
xxxxx..xxxxxxxxxxxx.......+................+...xxxxxxx.xxxxxxxxxxxxxxxxxxxxx
|
|
xxxx..xxxxxxxxx.....xxxxx.|................|.x...xxxxx.xxxxxxxxxxxxxxxxxxxxx
|
|
xxx..xxxxxxxxx..xxxxxxxxxx|................|xxxx.......xxxxxxxxxxxxxxxxxxxxx
|
|
xxxx..xxxxxxx..xxxxxxxxxxx|----------------|xxxxxxxxxx...xxxxxxxxxxxxxxxxxxx
|
|
xxxxxx..xxxx..xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx...xxxxxxxxxxxxxxxxx
|
|
xxxxxxx......xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx...xxxxxxxxxxxxxxx
|
|
xxxxxxxxx...xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx...x......xxxxxx
|
|
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.........xxxxx
|
|
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx.......xxxxxx
|
|
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
|
|
]]);
|
|
-- Dungeon Description
|
|
des.region(selection.area(00,00,75,19), "lit")
|
|
des.region(selection.area(27,08,42,12), "lit")
|
|
-- Portal arrival point
|
|
des.levregion({ region = {66,17,66,17}, type="branch" })
|
|
-- Stairs
|
|
des.stair("down", 18,01)
|
|
des.feature("fountain", 53,02)
|
|
-- Doors
|
|
des.door("locked",26,10)
|
|
des.door("locked",43,10)
|
|
-- Norn
|
|
des.monster({ id = "Norn", coord = {35, 10}, inventory = function()
|
|
des.object({ id = "banded mail", spe = 5 });
|
|
des.object({ id = "long sword", spe = 4 });
|
|
end })
|
|
-- The treasure of the Norn
|
|
des.object("chest", 36, 10)
|
|
-- valkyrie guards for the audience chamber
|
|
des.monster("warrior", 27, 08)
|
|
des.monster("warrior", 27, 09)
|
|
des.monster("warrior", 27, 11)
|
|
des.monster("warrior", 27, 12)
|
|
des.monster("warrior", 42, 08)
|
|
des.monster("warrior", 42, 09)
|
|
des.monster("warrior", 42, 11)
|
|
des.monster("warrior", 42, 12)
|
|
-- Non diggable walls
|
|
des.non_diggable(selection.area(26,07,43,13))
|
|
-- Random traps
|
|
des.trap("fire")
|
|
des.trap("fire")
|
|
des.trap("fire")
|
|
des.trap("fire")
|
|
des.trap("fire")
|
|
des.trap("fire")
|
|
-- Monsters on siege duty.
|
|
des.monster("fire ant", 04, 12)
|
|
des.monster("fire ant", 08, 08)
|
|
des.monster("fire ant", 14, 04)
|
|
des.monster("fire ant", 17, 11)
|
|
des.monster("fire ant", 24, 10)
|
|
des.monster("fire ant", 45, 10)
|
|
des.monster("fire ant", 54, 02)
|
|
des.monster("fire ant", 55, 07)
|
|
des.monster("fire ant", 58, 14)
|
|
des.monster("fire ant", 63, 17)
|
|
des.monster({ id = "fire giant", x=18, y=01, peaceful = 0 })
|
|
des.monster({ id = "fire giant", x=10, y=16, peaceful = 0 })
|
|
|