#include "undef.h"
#include "exits.h"

Zone		= haven
Author		= "Unknown"

EndZone		= haven


Mobile		= bard
Name	= "The Bard"
Location	= haven@haven
Strength	= 50
Armor		= 0
Damage		= 10
Aggression      = 0
Speed           = 0
Desc		= "
An ageless bard sits on a stool by the fire, strumming a mandolin and telling
cryptic tales of times long-past."
Trap		= all
@
void mob_haven_bard(int event)
{  char *str;
   switch(event) {
   case E_ONCOMM:
      if ((str = strstr(param_s.buf,"help")) != NULL)
      {  sprintf(param_s.buf,"Don't loose faith, you can do it");
      } else if ((str = strstr(param_s.buf,"how")) != NULL)
      {  sprintf(param_s.buf,"Miracles happen when you least expect them.");
      } else if ((str = strstr(param_s.buf,"SHUT UP")) != NULL)
      {  sprintf(param_s.buf,"Okay, I won't say another word.");
      } 
      else 
         sprintf(param_s.buf,"Unbelievable... it speaks!");
      param_s.ret = 0;
      break;
   default: break;
   }
}
@
EndTrap
EndMobile		= bard


Object      	= mistletoe
Altname	= "sprig"
Location	= IN_ROOM:haven@haven
OFlags		= NoGet
Desc0   	= "A sprig of mistletoe hangs by the fireplace."
Examine   	= "
You notice with some amusement that the Bard has positioned himself directly
underneath.  Well don't just stand there, kiss him!"
EndObject		= mistletoe

Object      	= fire
Location	= IN_ROOM:haven@haven
OFlags		= NoGet, Lit, Extinguish
EndObject 		= fire


Location	= "haven"
South		= blizzard@blizzard
West		= gate@blizzard
North		= haven2@haven
LFlags		= party
Title		= "&+WWarm Haven&*"
Desc		= ^
   After hours of trudging through the snow you come upon a tiny inn.  A sign
above the door says "Warm Haven -- Abandon Cold, All Ye Who Enter."  The room
is crowded with burly adventurers, shy novices, and the bustling of serving
wenches and bar-maids trying to take everyone's orders.
   The main door is to the south, while a side-door heads west into the frozen
wastes.  A number of urchins are gathered around the crackling fire to hear
tales and songs from the Bard.
   To the north you can enter the small sleeping quarters of the inn.
^
EndLocation	= "haven"


Location	= "haven2"
South		= haven@haven
LFlags		= Private, NoMobiles
Title		= "&+WThe Sleeping Quarters&*"
Desc		= ^
   You walk into the sleeping quarters of the Warm Haven. Several beds are
standing here for tired travellers to take a rest on. Some of the beds are
already occupied. 
   The room is quite silent in comparison to the busy tavern room to the
south.
^
EndLocation	= "haven2"