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.
92 lines
3.7 KiB
Lua
92 lines
3.7 KiB
Lua
-- NetHack 3.6 Samurai.des $NHDT-Date: 1432512783 2015/05/25 00:13:03 $ $NHDT-Branch: master $:$NHDT-Revision: 1.11 $
|
|
-- Copyright (c) 1989 by Jean-Christophe Collet
|
|
-- Copyright (c) 1991-92 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, Lord Sato
|
|
-- and receive your quest assignment.
|
|
--
|
|
des.level_init({ style = "solidfill", fg = " " });
|
|
|
|
des.level_flags("mazelevel", "noteleport", "hardfloor")
|
|
|
|
des.map([[
|
|
..............................................................PP............
|
|
...............................................................PP...........
|
|
..........---------------------------------------------------...PPP.........
|
|
..........|......|.........|...|..............|...|.........|....PPPPP......
|
|
......... |......|.........S...|..............|...S.........|.....PPPP......
|
|
..........|......|.........|---|..............|---|.........|.....PPP.......
|
|
..........+......|.........+...-------++-------...+.........|......PP.......
|
|
..........+......|.........|......................|.........|......PP.......
|
|
......... |......---------------------++--------------------|........PP.....
|
|
..........|.................................................|.........PP....
|
|
..........|.................................................|...........PP..
|
|
..........----------------------------------------...-------|............PP.
|
|
..........................................|.................|.............PP
|
|
.............. ................. .........|.................|..............P
|
|
............. } ............... } ........|.................|...............
|
|
.............. ........PP....... .........|.................|...............
|
|
.....................PPP..................|.................|...............
|
|
......................PP..................-------------------...............
|
|
............................................................................
|
|
............................................................................
|
|
]]);
|
|
-- Dungeon Description
|
|
des.region(selection.area(00,00,75,19), "lit")
|
|
des.region({ region={18,03, 26,07}, lit=1, type="throne", prefilled=1 })
|
|
-- Portal arrival zone
|
|
des.levregion({ region = {62,12,70,17}, type="branch" })
|
|
-- Stairs
|
|
des.stair("down", 29,04)
|
|
-- Doors
|
|
des.door("locked",10,06)
|
|
des.door("locked",10,07)
|
|
des.door("closed",27,04)
|
|
des.door("closed",27,06)
|
|
des.door("closed",38,06)
|
|
des.door("locked",38,08)
|
|
des.door("closed",39,06)
|
|
des.door("locked",39,08)
|
|
des.door("closed",50,04)
|
|
des.door("closed",50,06)
|
|
-- Lord Sato
|
|
des.monster("Lord Sato", 20, 04)
|
|
-- The treasure of Lord Sato
|
|
des.object("chest", 20, 04)
|
|
-- roshi guards for the audience chamber
|
|
des.monster("roshi", 18, 04)
|
|
des.monster("roshi", 18, 05)
|
|
des.monster("roshi", 18, 06)
|
|
des.monster("roshi", 18, 07)
|
|
des.monster("roshi", 26, 04)
|
|
des.monster("roshi", 26, 05)
|
|
des.monster("roshi", 26, 06)
|
|
des.monster("roshi", 26, 07)
|
|
-- 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({ id = "ninja", x=64, y=00, peaceful=0 })
|
|
des.monster("wolf", 65, 01)
|
|
des.monster({ id = "ninja", x=67, y=02, peaceful=0 })
|
|
des.monster({ id = "ninja", x=69, y=05, peaceful=0 })
|
|
des.monster({ id = "ninja", x=69, y=06, peaceful=0 })
|
|
des.monster("wolf", 69, 07)
|
|
des.monster({ id = "ninja", x=70, y=06, peaceful=0 })
|
|
des.monster({ id = "ninja", x=70, y=07, peaceful=0 })
|
|
des.monster({ id = "ninja", x=72, y=01, peaceful=0 })
|
|
des.monster("wolf", 75, 09)
|
|
des.monster({ id = "ninja", x=73, y=05, peaceful=0 })
|
|
des.monster({ id = "ninja", x=68, y=02, peaceful=0 })
|
|
des.monster("stalker")
|