room/huette14.c

inherit "/std/room";

#include __PATH__(1)"defs.h"

private void delayed();


protected void create() {
  ::create();

  SetProp(P_INT_SHORT, "Eine schummrige Huette");
  SetProp(P_INT_LONG, BSLF(
    "Noch ein leerer Raum. Moment - nicht ganz, da ist ein haesslicher Fleck "
    "auf dem Boden."));

  SetProp(P_LIGHT, 1);
  SetProp(P_INDOORS, 1);
  SetProp(P_LIGHT_TYPE, LT_GLOWING);

  AddDetail("fleck", function string() {
    if (find_call_out(#'delayed) == -1)
      call_out(#'delayed, 3);
    else
      return BSLF("Nicht so schnell hintereinander! Willst Du das Mud mit "
        "Callouts fluten?");

    return BSLF("Ja, dieser Fleck ist wirklich haesslich.");
  });
}

private void delayed() {
  if (ENV(TP) == TO)
    tell_object(TP, BSPS(
      "WER IST HIER HAESSLICH?!",
      "Eine Stimme droehnt: "));
}