fd55d9118e
Game is playable, and should compile on linux and Windows. Assumes you have a lua 5.3 library available. Removes level compiler and associated files. Replaces special level des-files with lua scripts. Exposes some NetHack internals to lua: - des-table with commands to create special levels - nh-table with NetHack core commands - nhc-table with some constants - u-table with some player-specific data (u-struct) - selection userdata Adds some rudimentary tests. Adds new extended command #wizloadlua to run a specific script, and #wizloaddes to run a specific level-creation script. nhlib.lua is loaded for every lua script. Download and untar lua: mkdir lib cd lib curl -R -O http://www.lua.org/ftp/lua-5.3.5.tar.gz tar zxf lua-5.3.5.tar.gz Then make nethack normally.
99 lines
3.8 KiB
Lua
99 lines
3.8 KiB
Lua
-- NetHack 3.6 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("Norn", 35, 10)
|
|
-- 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 })
|
|
|