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.
199 lines
7.2 KiB
Lua
199 lines
7.2 KiB
Lua
-- NetHack 3.6 mines.des $NHDT-Date: 1548631704 2019/01/27 23:28:24 $ $NHDT-Branch: NetHack-3.6.2-beta01 $:$NHDT-Revision: 1.30 $
|
|
-- Copyright (c) 1989-95 by Jean-Christophe Collet
|
|
-- Copyright (c) 1991-95 by M. Stephenson
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
--
|
|
-- "Bazaar Town" by Kelly Bailey
|
|
|
|
des.room({ type="ordinary", lit=1, x=3,y=3,
|
|
xalign="center",yalign="center", w=30,h=15,
|
|
contents = function()
|
|
des.feature("fountain", 12, 07)
|
|
des.feature("fountain", 11, 13)
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=2,y=2, w=4,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south" })
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=7,y=2, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="north" })
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=7,y=5, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south" })
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", lit=1, x=10,y=2, w=3,h=4,
|
|
contents = function()
|
|
des.monster("gnome")
|
|
des.monster("monkey")
|
|
des.monster("monkey")
|
|
des.monster("monkey")
|
|
des.door({ state = "closed", wall="south" })
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=14,y=2, w=4,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south", pos=0 })
|
|
des.monster("n")
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=16,y=5, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south" })
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", lit=0, x=19,y=2, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "locked", wall="east" })
|
|
des.monster("gnome king")
|
|
end
|
|
})
|
|
end
|
|
|
|
des.room({ type="food shop", chance=50, lit=1, x=19,y=5, w=2,h=3,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south" })
|
|
end
|
|
})
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=2,y=7, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="east" })
|
|
end
|
|
})
|
|
end
|
|
|
|
des.room({ type="tool shop", chance=50, lit=1, x=2,y=10, w=2,h=3,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south" })
|
|
end
|
|
})
|
|
|
|
des.room({ type="candle shop", lit=1, x=5,y=10, w=3,h=3,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="north" })
|
|
end
|
|
})
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=11,y=10, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "locked", wall="west" })
|
|
des.monster("G")
|
|
end
|
|
})
|
|
end
|
|
|
|
des.room({ type="shop", chance=60, lit=1, x=14,y=10, w=2,h=3,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="north" })
|
|
end
|
|
})
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=17,y=11, w=4,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="north" })
|
|
end
|
|
})
|
|
end
|
|
|
|
if math.random(0,99) < 75 then
|
|
des.room({ type="ordinary", x=22,y=11, w=2,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="south" })
|
|
des.feature("sink", 00,00)
|
|
end
|
|
})
|
|
end
|
|
|
|
des.room({ type="food shop", chance=50, lit=1, x=25,y=11, w=3,h=2,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="east" })
|
|
end
|
|
})
|
|
|
|
des.room({ type="tool shop", chance=30, lit=1, x=25,y=2, w=3,h=3,
|
|
contents = function()
|
|
des.door({ state = "closed", wall="west" })
|
|
end
|
|
})
|
|
|
|
des.room({ type="temple", lit=1, x=24,y=6, w=4,h=4,
|
|
contents = function()
|
|
des.door({ state = "closed", wall = "west" })
|
|
des.altar({ x=02, y=01, align=align[1], type="shrine" })
|
|
des.monster("gnomish wizard")
|
|
des.monster("gnomish wizard")
|
|
end
|
|
})
|
|
|
|
des.monster({ id = "watchman", peaceful = 1 })
|
|
des.monster({ id = "watchman", peaceful = 1 })
|
|
des.monster({ id = "watchman", peaceful = 1 })
|
|
des.monster({ id = "watchman", peaceful = 1 })
|
|
des.monster({ id = "watch captain", peaceful = 1 })
|
|
des.monster("gnome")
|
|
des.monster("gnome")
|
|
des.monster("gnome")
|
|
des.monster("gnome lord")
|
|
des.monster("monkey")
|
|
des.monster("monkey")
|
|
|
|
end
|
|
})
|
|
|
|
des.room({ type="ordinary",
|
|
contents = function()
|
|
des.stair("up")
|
|
end
|
|
})
|
|
|
|
des.room({ type="ordinary",
|
|
contents = function()
|
|
des.stair("down")
|
|
des.trap()
|
|
des.monster("gnome")
|
|
des.monster("gnome")
|
|
end
|
|
})
|
|
|
|
des.room({ type="ordinary",
|
|
contents = function()
|
|
des.monster("dwarf")
|
|
end
|
|
})
|
|
|
|
des.room({ type="ordinary",
|
|
contents = function()
|
|
des.trap()
|
|
des.monster("gnome")
|
|
end
|
|
})
|
|
|
|
des.random_corridors()
|