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 2 7-- "Gnome King's Wine Cellar" 8 9des.level_init({ style = "solidfill", fg = " " }); 10 11des.level_flags("mazelevel"); 12 13des.map([[ 14--------------------------------------------------------------------------- 15|...................................................| | 16|.|---------S--.--|...|--------------------------|..| | 17|.||---| |.||-| |...|..........................|..| | 18|.||...| |-|.|.|---...|.............................| .. | 19|.||...|-|.....|....|-|..........................|..|. .. | 20|.||.....|-S|..|....|............................|..|.. | 21|.||--|..|..|..|-|..|----------------------------|..|-. | 22|.| |..|..|....|..................................|... | 23|.| |..|..|----|..-----------------------------|..|.... | 24|.|---|..|--|.......|----------------------------|..|..... | 25|...........|----.--|......................| |..|....... | 26|-----------|...|.| |------------------|.|.|-----|..|.....|.. | 27|-----------|.{.|.|--------------------|.|..........|.....|.... | 28|...............|.S......................|-------------..-----... | 29|.--------------|.|--------------------|.|......................... | 30|.................| |.....................|........ | 31--------------------------------------------------------------------------- 32]]); 33 34if percent(50) then 35 des.terrain({55,14},"-") 36 des.terrain({56,14},"-") 37 des.terrain({61,15},"|") 38 des.terrain({52,5}, "S") 39 des.door("locked", 52,5) 40end 41if percent(50) then 42 des.terrain({18,1}, "|") 43 des.terrain(selection.area(7,12, 8,13), ".") 44end 45if percent(50) then 46 des.terrain({49,4}, "|") 47 des.terrain({21,5}, ".") 48end 49if percent(50) then 50 if percent(50) then 51 des.terrain({22,1}, "|") 52 else 53 des.terrain({50,7}, "-") 54 des.terrain({51,7}, "-") 55 end 56end 57 58 59-- Dungeon Description 60des.feature("fountain", {14,13}) 61des.region(selection.area(23,03,48,06),"lit") 62des.region(selection.area(21,06,22,06),"lit") 63des.region(selection.area(14,04,14,04),"unlit") 64des.region(selection.area(10,05,14,08),"unlit") 65des.region(selection.area(10,09,11,09),"unlit") 66des.region(selection.area(15,08,16,08),"unlit") 67-- Secret doors 68des.door("locked",12,02) 69des.door("locked",11,06) 70-- Stairs 71des.stair("up", 36,04) 72-- Non diggable walls 73des.non_diggable(selection.area(00,00,52,17)) 74des.non_diggable(selection.area(53,00,74,00)) 75des.non_diggable(selection.area(53,17,74,17)) 76des.non_diggable(selection.area(74,01,74,16)) 77des.non_diggable(selection.area(53,07,55,07)) 78des.non_diggable(selection.area(53,14,61,14)) 79-- The Gnome King's wine cellar. 80-- the Trespassers sign is a long-running joke 81des.engraving({12,03}, "engrave", 82 "You are now entering the Gnome King's wine cellar.") 83des.engraving({12,04}, "engrave", "Trespassers will be persecuted!") 84des.object("booze", 10, 07) 85des.object("booze", 10, 07) 86des.object("!", 10, 07) 87des.object("booze", 10, 08) 88des.object("booze", 10, 08) 89des.object("!", 10, 08) 90des.object("booze", 10, 09) 91des.object("booze", 10, 09) 92des.object("object detection", 10, 09) 93-- Objects 94-- The Treasure chamber... 95des.object("diamond", 69, 04) 96des.object("*", 69, 04) 97des.object("diamond", 69, 04) 98des.object("*", 69, 04) 99des.object("emerald", 70, 04) 100des.object("*", 70, 04) 101des.object("emerald", 70, 04) 102des.object("*", 70, 04) 103des.object("emerald", 69, 05) 104des.object("*", 69, 05) 105des.object("ruby", 69, 05) 106des.object("*", 69, 05) 107des.object("ruby", 70, 05) 108des.object("amethyst", 70, 05) 109des.object("*", 70, 05) 110des.object("amethyst", 70, 05) 111des.object({ id="luckstone", x=70, y=05, 112 buc="not-cursed", achievement=1 }); 113-- Scattered gems... 114des.object("*") 115des.object("*") 116des.object("*") 117des.object("*") 118des.object("*") 119des.object("*") 120des.object("*") 121des.object("(") 122des.object("(") 123des.object() 124des.object() 125des.object() 126-- Random traps 127des.trap() 128des.trap() 129des.trap() 130des.trap() 131des.trap() 132des.trap() 133-- Random monsters. 134des.monster("gnome king") 135des.monster("gnome lord") 136des.monster("gnome lord") 137des.monster("gnome lord") 138des.monster("gnomish wizard") 139des.monster("gnomish wizard") 140des.monster("gnome") 141des.monster("gnome") 142des.monster("gnome") 143des.monster("gnome") 144des.monster("gnome") 145des.monster("gnome") 146des.monster("gnome") 147des.monster("gnome") 148des.monster("gnome") 149des.monster("hobbit") 150des.monster("hobbit") 151des.monster("dwarf") 152des.monster("dwarf") 153des.monster("dwarf") 154des.monster("h") 155