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>.
110 lines
4.1 KiB
Lua
110 lines
4.1 KiB
Lua
-- NetHack 3.7 Healer.des $NHDT-Date: 1432512784 2015/05/25 00:13:04 $ $NHDT-Branch: master $:$NHDT-Revision: 1.10 $
|
|
-- Copyright (c) 1989 by Jean-Christophe Collet
|
|
-- Copyright (c) 1991, 1993 by M. Stephenson, P. Winner
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
--
|
|
--
|
|
-- The "start" level for the quest.
|
|
--
|
|
-- Here you meet your (besieged) class leader, Hippocrates
|
|
-- and receive your quest assignment.
|
|
--
|
|
des.level_init({ style = "solidfill", fg = " " });
|
|
|
|
des.level_flags("mazelevel", "noteleport", "hardfloor")
|
|
|
|
des.map([[
|
|
PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP
|
|
PPPP........PPPP.....PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP.P..PPPPP......PPPPPPPP
|
|
PPP..........PPPP...PPPPP.........................PPPP..PPPPP........PPPPPPP
|
|
PP............PPPPPPPP..............................PPP...PPPP......PPPPPPPP
|
|
P.....PPPPPPPPPPPPPPP................................PPPPPPPPPPPPPPPPPPPPPPP
|
|
PPPP....PPPPPPPPPPPP...................................PPPPP.PPPPPPPPPPPPPPP
|
|
PPPP........PPPPP.........-----------------------........PP...PPPPPPP.....PP
|
|
PPP............PPPPP....--|.|......S..........S.|--.....PPPP.PPPPPPP.......P
|
|
PPPP..........PPPPP.....|.S.|......-----------|S|.|......PPPPPP.PPP.......PP
|
|
PPPPPP......PPPPPP......|.|.|......|...|......|.|.|.....PPPPPP...PP.......PP
|
|
PPPPPPPPPPPPPPPPPPP.....+.|.|......S.\.S......|.|.+......PPPPPP.PPPP.......P
|
|
PPP...PPPPP...PPPP......|.|.|......|...|......|.|.|.......PPPPPPPPPPP.....PP
|
|
PP.....PPP.....PPP......|.|S|-----------......|.S.|......PPPPPPPPPPPPPPPPPPP
|
|
PPP..PPPPP...PPPP.......--|.S..........S......|.|--.....PPPPPPPPP....PPPPPPP
|
|
PPPPPPPPPPPPPPPP..........-----------------------..........PPPPP..........PP
|
|
PPPPPPPPPPPPPPPPP........................................PPPPPP............P
|
|
PPP.............PPPP...................................PPP..PPPP..........PP
|
|
PP...............PPPPP................................PPPP...PPPP........PPP
|
|
PPP.............PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP....PPPPPP
|
|
PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP
|
|
]]);
|
|
|
|
des.replace_terrain({ region={01,01, 74,18}, fromterrain="P", toterrain=".", chance=10 })
|
|
|
|
-- Dungeon Description
|
|
des.region(selection.area(00,00,75,19), "lit")
|
|
-- Stairs
|
|
des.stair("down", 37,9)
|
|
-- Portal arrival point
|
|
des.levregion({ region = {04,12,04,12}, type="branch" })
|
|
-- altar for the Temple
|
|
des.altar({ x=32,y=09,align="neutral",type="altar" })
|
|
-- Doors
|
|
des.door("locked",24,10)
|
|
des.door("closed",26,08)
|
|
des.door("closed",27,12)
|
|
des.door("locked",28,13)
|
|
des.door("closed",35,07)
|
|
des.door("locked",35,10)
|
|
des.door("locked",39,10)
|
|
des.door("closed",39,13)
|
|
des.door("locked",46,07)
|
|
des.door("closed",47,08)
|
|
des.door("closed",48,12)
|
|
des.door("locked",50,10)
|
|
-- Hippocrates
|
|
des.monster({ id = "Hippocrates", coord = {37, 10}, inventory = function()
|
|
des.object({ id = "silver dagger", spe = 5 });
|
|
end })
|
|
-- The treasure of Hippocrates
|
|
des.object("chest", 37, 10)
|
|
-- intern guards for the audience chamber
|
|
des.monster("attendant", 29, 08)
|
|
des.monster("attendant", 29, 09)
|
|
des.monster("attendant", 29, 10)
|
|
des.monster("attendant", 29, 11)
|
|
des.monster("attendant", 40, 09)
|
|
des.monster("attendant", 40, 10)
|
|
des.monster("attendant", 40, 11)
|
|
des.monster("attendant", 40, 13)
|
|
-- Non diggable walls
|
|
des.non_diggable(selection.area(00,00,75,19))
|
|
-- Random traps
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
des.trap()
|
|
-- Monsters on siege duty.
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("rabid rat")
|
|
des.monster("giant eel")
|
|
des.monster("shark")
|
|
des.monster(";")
|
|
des.monster({ class = "D", peaceful=0 })
|
|
des.monster({ class = "D", peaceful=0 })
|
|
des.monster({ class = "D", peaceful=0 })
|
|
des.monster({ class = "D", peaceful=0 })
|
|
des.monster({ class = "D", peaceful=0 })
|
|
des.monster({ class = "S", peaceful=0 })
|
|
des.monster({ class = "S", peaceful=0 })
|
|
des.monster({ class = "S", peaceful=0 })
|
|
des.monster({ class = "S", peaceful=0 })
|
|
des.monster({ class = "S", peaceful=0 })
|