1-- NetHack 3.7	mines.des	$NHDT-Date: 1432512783 2015/05/25 00:13:03 $  $NHDT-Branch: master $:$NHDT-Revision: 1.25 $
2--	Copyright (c) 1989-95 by Jean-Christophe Collet
3--	Copyright (c) 1991-95 by M. Stephenson
4-- NetHack may be freely redistributed.  See license for details.
5--
6-- Mine end level variant 1
7-- "Mimic of the Mines"
8
9des.level_init({ style = "solidfill", fg = " " });
10
11des.level_flags("mazelevel");
12
13des.map([[
14------------------------------------------------------------------   ------
15|                        |.......|     |.......-...|       |.....|.       |
16|    ---------        ----.......-------...........|       ---...-S-      |
17|    |.......|        |..........................-S-      --.......|      |
18|    |......-------   ---........................|.       |.......--      |
19|    |..--........-----..........................|.       -.-..----       |
20|    --..--.-----........-.....................---        --..--          |
21|     --..--..| -----------..................---.----------..--           |
22|      |...--.|    |..S...S..............---................--            |
23|     ----..-----  ------------........--- ------------...---             |
24|     |.........--            ----------              ---...-- -----      |
25|    --.....---..--                           --------  --...---...--     |
26| ----..-..-- --..---------------------      --......--  ---........|     |
27|--....-----   --..-..................---    |........|    |.......--     |
28|.......|       --......................S..  --......--    ---..----      |
29|--.--.--        ----.................---     ------..------...--         |
30| |....S..          |...............-..|         ..S...........|          |
31--------            --------------------           ------------------------
32]]);
33
34-- Dungeon Description
35local place = { {08,16},{13,07},{21,08},{41,14},{50,04},{50,16},{66,01} }
36shuffle(place)
37
38-- make the entry chamber a real room; it affects monster arrival
39des.region({ region={26,01,32,01}, lit=0, type="ordinary", irregular=1, arrival_room=true })
40des.region(selection.area(20,08,21,08),"unlit")
41des.region(selection.area(23,08,25,08),"unlit");
42-- Secret doors
43des.door("locked",07,16)
44des.door("locked",22,08)
45des.door("locked",26,08)
46des.door("locked",40,14)
47des.door("locked",50,03)
48des.door("locked",51,16)
49des.door("locked",66,02)
50-- Stairs
51des.stair("up", 36,04)
52-- Non diggable walls
53des.non_diggable(selection.area(00,00,74,17))
54-- Niches
55-- Note: place[6] empty
56des.object("diamond",place[7])
57des.object("emerald",place[7])
58des.object("worthless piece of violet glass",place[7])
59des.monster({ class="m", coord=place[7], appear_as="obj:luckstone" })
60des.object("worthless piece of white glass",place[1])
61des.object("emerald",place[1])
62des.object("amethyst",place[1])
63des.monster({ class="m", coord=place[1], appear_as="obj:flint" })
64des.object("diamond",place[2])
65des.object("worthless piece of green glass",place[2])
66des.object("amethyst",place[2])
67des.monster({ class="m", coord=place[2], appear_as="obj:flint" })
68des.object("worthless piece of white glass",place[3])
69des.object("emerald",place[3])
70des.object("worthless piece of violet glass",place[3])
71des.monster({ class="m", coord=place[3], appear_as="obj:touchstone" })
72des.object("worthless piece of red glass",place[4])
73des.object("ruby",place[4])
74des.object("flint",place[4])
75des.object("ruby",place[5])
76des.object("worthless piece of red glass",place[5])
77des.object({ id="luckstone", coord=place[5], buc="not-cursed", achievement=1 })
78-- Random objects
79des.object("*")
80des.object("*")
81des.object("*")
82des.object("*")
83des.object("*")
84des.object("*")
85des.object("*")
86des.object("(")
87des.object("(")
88des.object()
89des.object()
90des.object()
91-- Random traps
92des.trap()
93des.trap()
94des.trap()
95des.trap()
96des.trap()
97des.trap()
98-- Random monsters
99des.monster("gnome king")
100des.monster("gnome lord")
101des.monster("gnome lord")
102des.monster("gnome lord")
103des.monster("gnomish wizard")
104des.monster("gnomish wizard")
105des.monster("gnome")
106des.monster("gnome")
107des.monster("gnome")
108des.monster("gnome")
109des.monster("gnome")
110des.monster("gnome")
111des.monster("gnome")
112des.monster("gnome")
113des.monster("gnome")
114des.monster("hobbit")
115des.monster("hobbit")
116des.monster("dwarf")
117des.monster("dwarf")
118des.monster("dwarf")
119des.monster("h")
120