63 lines
2.2 KiB
Lua
63 lines
2.2 KiB
Lua
-- NetHack yendor wizard2.lua $NHDT-Date: 1652196039 2022/05/10 15:20:39 $ $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.2 $
|
|
-- Copyright (c) 1989 by Jean-Christophe Collet
|
|
-- Copyright (c) 1992 by M. Stephenson and Izchak Miller
|
|
-- NetHack may be freely redistributed. See license for details.
|
|
--
|
|
des.level_init({ style="mazegrid", bg ="-" });
|
|
|
|
des.level_flags("mazelevel", "noteleport", "hardfloor")
|
|
|
|
local tmpbounds = selection.match("-");
|
|
local bnds = tmpbounds:bounds();
|
|
local bounds2 = selection.fillrect(bnds.lx, bnds.ly + 1, bnds.hx - 2, bnds.hy - 1);
|
|
|
|
local wiz2 = des.map({ halign = "center", valign = "center", map = [[
|
|
----------------------------x
|
|
|.....|.S....|.............|x
|
|
|.....|.-------S--------S--|x
|
|
|.....|.|.........|........|x
|
|
|..-S--S|.........|........|x
|
|
|..|....|.........|------S-|x
|
|
|..|....|.........|.....|..|x
|
|
|-S-----|.........|.....|..|x
|
|
|.......|.........|S--S--..|x
|
|
|.......|.........|.|......|x
|
|
|-----S----S-------.|......|x
|
|
|............|....S.|......|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} })
|
|
des.teleport_region({ region={01,00,79,20}, region_islev=1, exclude={0,0,27,12} })
|
|
-- entire tower in a region, constrains monster migration
|
|
des.region({ region={01,01, 26,11}, lit=0, type="ordinary", arrival_room=true })
|
|
des.region({ region={09,03, 17,09}, lit=0, type="zoo", filled=1 })
|
|
des.door("closed",15,02)
|
|
des.door("closed",11,10)
|
|
des.mazewalk(28,05,"east")
|
|
des.ladder("up", 12,01)
|
|
des.ladder("down", 14,11)
|
|
-- Non diggable walls everywhere
|
|
des.non_diggable(selection.area(00,00,27,12))
|
|
--
|
|
des.non_passwall(selection.area(00,00,27,12))
|
|
-- Random traps.
|
|
des.trap("spiked pit")
|
|
des.trap("sleep gas")
|
|
des.trap("anti magic")
|
|
des.trap("magic")
|
|
-- Some random loot.
|
|
des.object("!")
|
|
des.object("!")
|
|
des.object("?")
|
|
des.object("?")
|
|
des.object("+")
|
|
-- treasures
|
|
des.object("\"", 04, 06)
|
|
end
|
|
});
|
|
|
|
local protected = bounds2:negate() | wiz2;
|
|
hell_tweaks(protected);
|