Add helltweaks to wizard3

dat/wizard3.lua

@@ -6,21 +6,26 @@
 des.level_init({ style="mazegrid", bg ="-" });
 
 des.level_flags("mazelevel", "noteleport", "hardfloor")
-des.map([[
+
-----------------------------.
+local tmpbounds = selection.match("-");
-|..|............S..........|.
+local bnds = tmpbounds:bounds();
-|..|..------------------S--|.
+local bounds2 = selection.fillrect(bnds.lx, bnds.ly + 1, bnds.hx - 2, bnds.hy - 1);
-|..|..|.........|..........|.
+
-|..S..|.}}}}}}}.|..........|.
+local wiz3 = des.map({ halign = "center", valign = "center", map = [[
-|..|..|.}}---}}.|-S--------|.
+----------------------------x
-|..|..|.}--.--}.|..|.......|.
+|..|............S..........|x
-|..|..|.}|...|}.|..|.......|.
+|..|..------------------S--|x
-|..---|.}--.--}.|..|.......|.
+|..|..|.........|..........|x
-|.....|.}}---}}.|..|.......|.
+|..S..|.}}}}}}}.|..........|x
-|.....S.}}}}}}}.|..|.......|.
+|..|..|.}}---}}.|-S--------|x
-|.....|.........|..|.......|.
+|..|..|.}--.--}.|..|.......|x
-----------------------------.
+|..|..|.}|...|}.|..|.......|x
-]]);
+|..---|.}--.--}.|..|.......|x
+|.....|.}}---}}.|..|.......|x
+|.....S.}}}}}}}.|..|.......|x
+|.....|.........|..|.......|x
+----------------------------x
+]], contents = function(rm)
    des.levregion({ type="stair-up", region={01,00,79,20}, region_islev=1, exclude={0,0,28,12} })
    des.levregion({ type="stair-down", region={01,00,79,20}, region_islev=1, exclude={0,0,28,12} })
    des.levregion({ type="branch", region={01,00,79,20}, region_islev=1, exclude={0,0,28,12} })
@@ -78,3 +83,8 @@ des.object("?")
    des.object("(")
    -- treasures
    des.object("\"", 11, 07)
+end
+});
+
+local protected = bounds2:negate() | wiz3;
+hell_tweaks(protected);