#include <mudlib.h>
inherit ROOM;

void reset(status arg) {
  reset_doors(arg);
  load_door(({
     "file", "room/city/mage/study2", 
     "direction", "west door",
     "long",
          "A dark door bearing spidery runes on a silvery plaque:\n"+
          "\tTenser's Study.\n",
     "key id", "silver key",
     "lock id", "silver lock",
     "lock description", "A shiny silver lock that glows softly\n",
     "closed", "locked",
     "trap on",
     "trap description", 
          "The trap appears to be some kind of shocking grasp spell.\n",
     "trap damage", (20 + random(50)),
     "trap message", "Your hand receives a shocking grasp that nearly "+
     "burning it off, \nsending you into deadly convulsions!\n",
     "trap message room",
     "@@query_name:$this_player()$@@ goes into convulsions as "+
     "@@query_pronoun:$this_player()$@@ touches the door.\n",
  }));

  if(arg) return;
  set_short("the tower of high magic");
  set_long(
     "A long spiral staircase of black iron extends downward  \n"+
     "into the darkness below. A single torch burns brightly\n"+
     "on the side of the west door, sending shadows dancing   \n"+
     "over the walls in a ghostly display of macarbe theatrics.\n");
  set_items(({
     "stairs#staircase",
          "A stairwell of cold black iron, descending downward",
     "torch",
          "A pair of torches burning brightly",
     "shadow#shadows",
          "The seem to have a life of their own...",
     "walls#wall",
          "The walls are of a cold grey stone, possibly made by magical means",
     "stone",
          "No dwarf chiselled this stone",
  }));
  set_listen("You can hear the torch flames flutter.\n");
  set_smell("You can smell the burning of pitch on the torches.\n");
  set_exits(({
     "room/city/mage/tower2", "up",
     "room/city/mage/gfloor1", "down",
  }));
  set_weather(2,1,0);    
  enable_commands();
}

void heart_beat() {
  string *messages;
  messages = ({
     "The torch flickers\n",
     "The torch splutters.\n",
     "The torch casts dancing shadows across the walls.\n",
     "The torch flutters.\n",
     "The torch light dances around the room.\n",
  });
  if(!random(10))
    tell_room(this_object(), messages[random(sizeof(messages))]);
}