lpc4/lib/
lpc4/lib/doc/efun/
lpc4/lib/doc/lfun/
lpc4/lib/doc/operators/
lpc4/lib/doc/simul_efuns/
lpc4/lib/doc/types/
lpc4/lib/etc/
lpc4/lib/include/
lpc4/lib/include/arpa/
lpc4/lib/obj/d/
lpc4/lib/save/
lpc4/lib/secure/
lpc4/lib/std/
lpc4/lib/std/living/
inherit "/std/room";

object burton;

void create()
{
  set_short("The tailors");
  set_long("This is the Joe Burton's shop. He's the local tailor, hatmaker "+
    "and undertaker.");

  add_exit("east","/room/yard");

  if(!burton)
  {
    burton=clone_object("/obj/monster");
    burton->set_name("joe");
    burton->set_alt_name("mr. burton");
    burton->set_alias("joe burton");
    burton->set_short("Joe Burton the tailor");
    burton->set_long("He's the kind of jolly fellow who asks you if you want "+
    "a coffin as well while he's got your measures handy.");
    burton->set_level(9),
    burton->move(this_object());
  }
}