From 71f900f17456801d1b0caae28b6ee917d65ec4a8 Mon Sep 17 00:00:00 2001
From: Pasi Kallinen <paxed@alt.org>
Date: Mon, 30 Jan 2023 17:58:51 +0200
Subject: [PATCH] Add helltweaks to fake wiz towers

---
 dat/fakewiz1.lua | 43 ++++++++++++++++++++++++++-----------------
 dat/fakewiz2.lua | 44 +++++++++++++++++++++++++++-----------------
 2 files changed, 53 insertions(+), 34 deletions(-)

diff --git a/dat/fakewiz1.lua b/dat/fakewiz1.lua
index 194ad2e93..abee299d7 100644
--- a/dat/fakewiz1.lua
+++ b/dat/fakewiz1.lua
@@ -7,7 +7,11 @@ des.level_init({ style="mazegrid", bg ="-" });
 
 des.level_flags("mazelevel");
 
-des.map([[
+local tmpbounds = selection.match("-");
+local bnds = tmpbounds:bounds();
+local bounds2 = selection.fillrect(bnds.lx, bnds.ly + 1, bnds.hx - 2, bnds.hy - 1);
+
+local fakewiz1 = des.map({ halign = "center", valign = "center", map = [[
 .........
 .}}}}}}}.
 .}}---}}.
@@ -16,20 +20,25 @@ des.map([[
 .}--.--}.
 .}}---}}.
 .}}}}}}}.
-]]);
-des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,7}, type="stair-up" })
-des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,7}, type="stair-down" })
-des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,7}, type="branch" });
-des.teleport_region({ region={01,00,79,20}, region_islev=1,exclude={2,2,6,6} })
-des.levregion({ region={4,4,4,4}, type="portal", name="wizard3" })
-des.mazewalk(08,05,"east")
-des.region({ region={04,03,06,06},lit=0,type="ordinary",irregular=1,arrival_room=true })
-des.monster("L",04,04)
-des.monster("vampire lord",03,04)
-des.monster("kraken",06,06)
--- And to make things a little harder.
-des.trap("board",04,03)
-des.trap("board",04,05)
-des.trap("board",03,04)
-des.trap("board",05,04)
+.........
+]], contents = function(rm)
+   des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,8}, type="stair-up" })
+   des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,8}, type="stair-down" })
+   des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,8}, type="branch" });
+   des.teleport_region({ region={01,00,79,20}, region_islev=1,exclude={2,2,6,6} })
+   des.levregion({ region={4,4,4,4}, type="portal", name="wizard3" })
+   des.mazewalk(08,05,"east")
+   des.region({ region={04,03,06,06},lit=0,type="ordinary",irregular=1,arrival_room=true })
+   des.monster("L",04,04)
+   des.monster("vampire lord",03,04)
+   des.monster("kraken",06,06)
+   -- And to make things a little harder.
+   des.trap("board",04,03)
+   des.trap("board",04,05)
+   des.trap("board",03,04)
+   des.trap("board",05,04)
+end
+});
 
+local protected = bounds2:negate() | fakewiz1;
+hell_tweaks(protected);
diff --git a/dat/fakewiz2.lua b/dat/fakewiz2.lua
index 1c271255a..4b81ae338 100644
--- a/dat/fakewiz2.lua
+++ b/dat/fakewiz2.lua
@@ -7,7 +7,11 @@ des.level_init({ style="mazegrid", bg ="-" });
 
 des.level_flags("mazelevel");
 
-des.map([[
+local tmpbounds = selection.match("-");
+local bnds = tmpbounds:bounds();
+local bounds2 = selection.fillrect(bnds.lx, bnds.ly + 1, bnds.hx - 2, bnds.hy - 1);
+
+local fakewiz2 = des.map({ halign = "center", valign = "center", map = [[
 .........
 .}}}}}}}.
 .}}---}}.
@@ -16,19 +20,25 @@ des.map([[
 .}--.--}.
 .}}---}}.
 .}}}}}}}.
-]]);
-des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,7}, type="stair-up" })
-des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,7}, type="stair-down" })
-des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,7}, type="branch" });
-des.teleport_region({ region={01,00,79,20}, region_islev=1,exclude={2,2,6,6} })
-des.mazewalk(08,05,"east")
-des.monster("L",04,04)
-des.monster("vampire lord",03,04)
-des.monster("kraken",06,06)
--- And to make things a little harder.
-des.trap("board",04,03)
-des.trap("board",04,05)
-des.trap("board",03,04)
-des.trap("board",05,04)
--- treasures
-des.object("\"",04,04)
+.........
+]], contents = function(rm)
+   des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,8}, type="stair-up" })
+   des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,8}, type="stair-down" })
+   des.levregion({ region={01,00,79,20}, region_islev=1, exclude={0,0,8,8}, type="branch" });
+   des.teleport_region({ region={01,00,79,20}, region_islev=1,exclude={2,2,6,6} })
+   des.mazewalk(08,05,"east")
+   des.monster("L",04,04)
+   des.monster("vampire lord",03,04)
+   des.monster("kraken",06,06)
+   -- And to make things a little harder.
+   des.trap("board",04,03)
+   des.trap("board",04,05)
+   des.trap("board",03,04)
+   des.trap("board",05,04)
+   -- treasures
+   des.object("\"",04,04)
+end
+});
+
+local protected = bounds2:negate() | fakewiz2;
+hell_tweaks(protected);
-- 
2.50.1