dat/Mon-goal.lua

   1 -- NetHack Monk Mon-goal.lua    $NHDT-Date: 1652196007 2022/05/10 15:20:07 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.1 $
   2 --      Copyright (c) 1989 by Jean-Christophe Collet
   3 --      Copyright (c) 1991-2 by M. Stephenson
   4 -- NetHack may be freely redistributed.  See license for details.
   5 --
   6 -- des.level_init({ style = "solidfill", fg = " " });
   7
   8 des.level_flags("mazelevel");
   9
  10 des.level_init({ style="mines", fg="L", bg=".", smoothed=false, joined=false, lit=0, walled=false })
  11
  12 des.map([[
  13 xxxxxx..xxxxxx...xxxxxxxxx
  14 xxxx......xx......xxxxxxxx
  15 xx.xx.............xxxxxxxx
  16 x....................xxxxx
  17 ......................xxxx
  18 ......................xxxx
  19 xx........................
  20 xxx......................x
  21 xxx................xxxxxxx
  22 xxxx.....x.xx.......xxxxxx
  23 xxxxx...xxxxxx....xxxxxxxx
  24 ]]);
  25 -- Dungeon Description
  26 local place = { {14,04},{13,07} }
  27 local placeidx = math.random(1, #place);
  28
  29 des.region(selection.area(00,00,25,10), "unlit")
  30 -- Stairs
  31 des.stair("up", 20,05)
  32 -- Objects
  33 des.object({ id = "lenses", coord = place[placeidx], buc="blessed", spe=0, name="The Eyes of the Overworld" })
  34 des.object()
  35 des.object()
  36 des.object()
  37 des.object()
  38 des.object()
  39 des.object()
  40 des.object()
  41 des.object()
  42 des.object()
  43 des.object()
  44 des.object()
  45 des.object()
  46 des.object()
  47 des.object()
  48 -- Random traps
  49 des.trap("fire")
  50 des.trap("fire")
  51 des.trap("fire")
  52 des.trap("fire")
  53 des.trap()
  54 des.trap()
  55 -- Random monsters.
  56 des.monster("Master Kaen",place[placeidx])
  57 des.altar({ coord = place[placeidx], align="noalign", type="altar" })
  58 des.monster("earth elemental")
  59 des.monster("earth elemental")
  60 des.monster("earth elemental")
  61 des.monster("earth elemental")
  62 des.monster("earth elemental")
  63 des.monster("earth elemental")
  64 des.monster("earth elemental")
  65 des.monster("earth elemental")
  66 des.monster("earth elemental")
  67 des.monster("xorn")
  68 des.monster("xorn")
  69 des.monster("xorn")
  70 des.monster("xorn")
  71 des.monster("xorn")
  72 des.monster("xorn")
  73 des.monster("xorn")
  74 des.monster("xorn")
  75 des.monster("xorn")