Add a new bigroom variant "two hexagons"

This commit is contained in:
Pasi Kallinen
2024-12-21 12:11:03 +02:00
parent e7a714849e
commit f7e86aa150
6 changed files with 91 additions and 1 deletions

85
dat/bigrm-12.lua Normal file
View File

@@ -0,0 +1,85 @@
-- NetHack bigroom bigrm-12.lua $NHDT-Date: $ $NHDT-Branch: NetHack-3.7 $
-- Copyright (c) 2024 by Pasi Kallinen
-- NetHack may be freely redistributed. See license for details.
--
-- Two hexagons
des.level_flags("mazelevel", "noflipy");
des.level_init({ style = "solidfill", fg = " " });
des.map([[
....................... .......................
......................... .........................
........................... ...........................
............................. .............................
........PPPPPPPPPPPPPPP........ ........LLLLLLLLLLLLLLL........
........PPPPPPPPPPPPPPPPP........ ........LLLLLLLLLLLLLLLLL........
........PPPWWWWWWWWWWWWWPPP...............LLLZZZZZZZZZZZZZLLL........
........PPPWWWWWWWWWWWWWWWPPP.............LLLZZZZZZZZZZZZZZZLLL........
........PPPWWWWWWWWWWWWWWWWWPPP...........LLLZZZZZZZZZZZZZZZZZLLL........
........PPPWWWWWWWWWWWWWWWPPP.............LLLZZZZZZZZZZZZZZZLLL........
........PPPWWWWWWWWWWWWWPPP...............LLLZZZZZZZZZZZZZLLL........
........PPPPPPPPPPPPPPPPP........ ........LLLLLLLLLLLLLLLLL........
........PPPPPPPPPPPPPPP........ ........LLLLLLLLLLLLLLL........
............................. .............................
........................... ...........................
......................... .........................
....................... .......................
]]);
-- maybe replace lavawalls/waterwalls with stone walls
if percent(20) then
if percent(50) then
des.replace_terrain({ fromterrain = "W", toterrain = "-" });
end
if percent(50) then
des.replace_terrain({ fromterrain = "Z", toterrain = "-" });
end
end
-- maybe replace pools with floor and then possibly walls with pools
if percent(25) then
des.replace_terrain({ fromterrain = "P", toterrain = "." });
if percent(75) then
des.replace_terrain({ fromterrain = "W", toterrain = "P" });
end
end
if percent(25) then
des.replace_terrain({ fromterrain = "L", toterrain = "." });
if percent(75) then
des.replace_terrain({ fromterrain = "Z", toterrain = "L" });
end
end
-- maybe make both sides have the same terrain
if percent(20) then
if percent(50) then
-- both are lava
des.replace_terrain({ fromterrain = "P", toterrain = "L" });
des.replace_terrain({ fromterrain = "W", toterrain = "Z" });
else
-- both are water
des.replace_terrain({ fromterrain = "L", toterrain = "P" });
des.replace_terrain({ fromterrain = "Z", toterrain = "W" });
end
end
des.region(selection.area(00,00,75,19), "lit")
des.non_diggable();
des.wallify();
des.stair("up");
des.stair("down");
for i = 1,15 do
des.object();
end
for i = 1,6 do
des.trap();
end
for i = 1,28 do
des.monster();
end

View File

@@ -70,7 +70,7 @@ dungeon = {
base = 10,
range = 3,
chance = 40,
nlevels = 11
nlevels = 12
},
{
name = "medusa",

View File

@@ -1423,6 +1423,8 @@
"$(NH_DAT_DIR)/Bar-strt.lua",
"$(NH_DAT_DIR)/bigrm-1.lua",
"$(NH_DAT_DIR)/bigrm-10.lua",
"$(NH_DAT_DIR)/bigrm-11.lua",
"$(NH_DAT_DIR)/bigrm-12.lua",
"$(NH_DAT_DIR)/bigrm-2.lua",
"$(NH_DAT_DIR)/bigrm-3.lua",
"$(NH_DAT_DIR)/bigrm-4.lua",

View File

@@ -449,6 +449,7 @@ CLEAN_FILE += $(NHLUAH)
LUALIST = air Arc-fila Arc-filb Arc-goal Arc-loca Arc-strt \
asmodeus astral baalz Bar-fila Bar-filb Bar-goal \
Bar-loca Bar-strt bigrm-1 bigrm-10 bigrm-11 bigrm-2 \
bigrm-12 \
bigrm-3 bigrm-4 bigrm-5 bigrm-6 bigrm-7 bigrm-8 \
bigrm-9 castle Cav-fila Cav-filb Cav-goal Cav-loca \
Cav-strt dungeon earth fakewiz1 fakewiz2 fire \

View File

@@ -554,6 +554,7 @@ LUA_FILES = $(DAT)\air.lua $(DAT)\Arc-fila.lua $(DAT)\Arc-filb.lua \
$(DAT)\Bar-fila.lua $(DAT)\Bar-filb.lua $(DAT)\Bar-goal.lua \
$(DAT)\Bar-loca.lua $(DAT)\Bar-strt.lua $(DAT)\bigrm-1.lua \
$(DAT)\bigrm-10.lua $(DAT)\bigrm-11.lua $(DAT)\bigrm-2.lua \
$(DAT)\bigrm-12.lua \
$(DAT)\bigrm-3.lua $(DAT)\bigrm-4.lua $(DAT)\bigrm-5.lua \
$(DAT)\bigrm-6.lua $(DAT)\bigrm-7.lua $(DAT)\bigrm-8.lua \
$(DAT)\bigrm-9.lua $(DAT)\castle.lua $(DAT)\Cav-fila.lua \

View File

@@ -32,6 +32,7 @@
<Luafiles Include = "bigrm-1.lua"/>
<Luafiles Include = "bigrm-10.lua"/>
<Luafiles Include = "bigrm-11.lua"/>
<Luafiles Include = "bigrm-12.lua"/>
<Luafiles Include = "bigrm-2.lua"/>
<Luafiles Include = "bigrm-3.lua"/>
<Luafiles Include = "bigrm-4.lua"/>