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() {
    /* Ueblicherweise sollte man sicherstellen, dass keine Schwemme an
       call_outs auftreten kann, denn dadurch kann man das Mud relativ leicht
       in die Knie zwingen. Gerade wenn die Callouts wie hier direkt von den
       Spieler gestarten werden koennen, ist das wichtig. Wir checken also,
       bevor wir einen neuen Callout starten, ob bereits ein Callout auf
       dieselbe Function laeuft: */
    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: "));
}