#include "path.h"
inherit "/std/underground";
object *npcs;
void reset() {
   int i;
   for(i=0;i<sizeof(npcs);i++) 
     {
      if(!npcs[i]) 
    {
     npcs[i]=clone_object(DNPC+"dhook");
     npcs[i]->move(this_object());
    }
     }
}
void setup() {
   add_property("no_undead",1); set_light(10);
   npcs = allocate(1);
   set_short("Realm of the Duergar:  Cavern Proving Grounds");
   set_long("\n   Realm of the Duergar:  Cavern Proving Grounds.\n\n"
        "     Dark and musty, this cavern reminds you of your days "
        "as a child.  Days of endless wandering through the caverns "
        "searching for food, water, and a safe place to sleep.  Now "
        "at least you have a weapon, but you also realize there are "
        "things here, somewhere, that will try to kill you.  You "
        "almost feel as if you are trapped in a maze full of hostile "
        "occupants ready to kill or be killed.  The rooms walls are "
        "rough and unevenly hewn, and a phosphoresent moss growing "
        "upon the stone is the only source of light.  Upon the floor "
        "your fears are reinforced as you note freshly spilt blood "
        "slowly coagulating in the cool surroundings.\n"
        "\n");
   add_item("floor",
        "   Dark and old stains have given a mottled look to the "
        "stone, but they are far too old to determine what it was "
        "that caused the stains.\n\n");
   add_item("blood",
        "   Freshly spilt it seems, someone passed through here "
        "recently, hopefully when you run into them they will be "
        "easily overcome.\n\n");
   add_item(({"wall", "walls", "rock", "rocks"}),
          "   Roughly cut, the walls were obviously hewn quickly "
          "with only utilitarian intentions in mind.\n\n");
   add_exit("north",NEWBIE+"dlev4_12","path");
   add_exit("south",NEWBIE+"dlev4_22","path");
   add_exit("west",NEWBIE+"dlev4_16","path");
}
void dest_me() {
   int i;
   for(i=0;i<sizeof(npcs);i++)
   if(npcs[i]) npcs[i]->dest_me();
   ::dest_me();
}