Files
nethack/dat/bigrm-2.lua
2022-05-10 11:26:52 -04:00

62 lines
2.5 KiB
Lua

-- NetHack bigroom bigrm-2.lua $NHDT-Date: 1652196021 2022/05/10 15:20:21 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.1 $
-- Copyright (c) 1989 by Jean-Christophe Collet
-- Copyright (c) 1990 by M. Stephenson
-- NetHack may be freely redistributed. See license for details.
--
des.level_init({ style = "solidfill", fg = " " });
des.level_flags("mazelevel", "noflip");
des.map([[
---------------------------------------------------------------------------
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
|.........................................................................|
---------------------------------------------------------------------------
]]);
-- Dungeon Description
des.region(selection.area(01,01,73,16),"lit");
local choice = math.random(0, 3)
if choice == 0 then
des.region(selection.area(01,07,22,09),"unlit");
des.region(selection.area(24,01,50,05),"unlit");
des.region(selection.area(24,11,50,16),"unlit");
des.region(selection.area(52,07,73,09),"unlit");
elseif choice == 1 then
des.region(selection.area(24,01,50,16),"unlit");
elseif choice == 2 then
des.region(selection.area(01,01,22,16),"unlit");
des.region(selection.area(52,01,73,16),"unlit");
end
-- Stairs
des.stair("up");
des.stair("down");
-- Non diggable walls
des.non_diggable();
-- Objects
for i = 1,15 do
des.object();
end
-- Random traps
for i = 1,6 do
des.trap();
end
-- Random monsters.
for i = 1,28 do
des.monster();
end