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.
98 lines
2.7 KiB
Lua
98 lines
2.7 KiB
Lua
-- NetHack 3.6 sokoban.des $NHDT-Date: 1432512784 2015/05/25 00:13:04 $ $NHDT-Branch: master $:$NHDT-Revision: 1.13 $
|
|
-- Copyright (c) 1998-1999 by Kevin Hugo
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
--
|
|
--
|
|
-- In case you haven't played the game Sokoban, you'll learn
|
|
-- quickly. This branch isn't particularly difficult, just time
|
|
-- consuming. Some players may wish to skip this branch.
|
|
--
|
|
-- The following actions are currently permitted without penalty:
|
|
-- Carrying or throwing a boulder already in inventory
|
|
-- (player or nonplayer).
|
|
-- Teleporting boulders.
|
|
-- Digging in the floor.
|
|
-- The following actions are permitted, but with a luck penalty:
|
|
-- Breaking boulders.
|
|
-- Stone-to-fleshing boulders.
|
|
-- Creating new boulders (e.g., with a scroll of earth).
|
|
-- Jumping.
|
|
-- Being pulled by a thrown iron ball.
|
|
-- Hurtling through the air from Newton's 3rd law.
|
|
-- Squeezing past boulders when naked or as a giant.
|
|
-- These actions are not permitted:
|
|
-- Moving diagonally between two boulders and/or walls.
|
|
-- Pushing a boulder diagonally.
|
|
-- Picking up boulders (player or nonplayer).
|
|
-- Digging or walking through walls.
|
|
-- Teleporting within levels or between levels of this branch.
|
|
-- Using cursed potions of gain level.
|
|
-- Escaping a pit/hole (e.g., by flying, levitation, or
|
|
-- passing a dexterity check).
|
|
-- Bones files are not permitted.
|
|
|
|
|
|
--## Bottom (first) level of Sokoban ###
|
|
des.level_init({ style = "solidfill", fg = " " });
|
|
|
|
des.level_flags("mazelevel", "noteleport", "hardfloor", "premapped", "solidify");
|
|
|
|
des.map([[
|
|
------ -----
|
|
|....| |...|
|
|
|....----...|
|
|
|...........|
|
|
|..|-|.|-|..|
|
|
---------|.---
|
|
|......|.....|
|
|
|..----|.....|
|
|
--.| |.....|
|
|
|.|---|.....|
|
|
|...........|
|
|
|..|---------
|
|
----
|
|
]]);
|
|
des.levregion({ region = {06,04,06,04}, type = "branch" })
|
|
des.stair("up", 06,06)
|
|
des.region(selection.area(00,00,13,12), "lit")
|
|
des.non_diggable(selection.area(00,00,13,12))
|
|
des.non_passwall(selection.area(00,00,13,12))
|
|
|
|
-- Boulders
|
|
des.object("boulder",02,02)
|
|
des.object("boulder",02,03)
|
|
--
|
|
des.object("boulder",10,02)
|
|
des.object("boulder",09,03)
|
|
des.object("boulder",10,04)
|
|
--
|
|
des.object("boulder",08,07)
|
|
des.object("boulder",09,08)
|
|
des.object("boulder",09,09)
|
|
des.object("boulder",08,10)
|
|
des.object("boulder",10,10)
|
|
|
|
-- Traps
|
|
des.trap("pit",03,06)
|
|
des.trap("pit",04,06)
|
|
des.trap("pit",05,06)
|
|
des.trap("pit",02,08)
|
|
des.trap("pit",02,09)
|
|
des.trap("pit",04,10)
|
|
des.trap("pit",05,10)
|
|
des.trap("pit",06,10)
|
|
des.trap("pit",07,10)
|
|
|
|
-- A little help
|
|
des.object("earth",02,11)
|
|
des.object("earth",03,11)
|
|
|
|
-- Random objects
|
|
des.object({ class = "%" });
|
|
des.object({ class = "%" });
|
|
des.object({ class = "%" });
|
|
des.object({ class = "%" });
|
|
des.object({ class = "=" });
|
|
des.object({ class = "/" });
|
|
|