// This file is part of UNItopia Mudlib.
// ----------------------------------------------------------------
// File:        /room/bsp/bsp8.c
// Description: Einfuehrungskurs - Raum 8
// Author:      Unbekannt.
// Modified by:

inherit "/i/room";

void reset() {
   if(!present("kissen",this_object()))
   {
//	Wenn kein Objekt mit der ID 'kissen' im Raum...

      object kissen; 
//	Eine Objekt-Variable deklarieren...

      kissen=clone_object("/room/bsp/obj/kissen");
//	Das Klonen des Kissens.

//	weitere Funktionen sind hier nicht noetig, alles weitere
//	macht das Kissen selbst.
//	Schau Dir den Quellcode des Kissen mit 'zmore kissen' an. */

      kissen->move(this_object());
//	 Kissen noch in den Raum bewegen ...
   }
}

void create() {
   set_short("Beispielraum Nr. 8");
   set_long("Du bist im Beispielraum Nr. 8 des Einfuehrungskurses fuer "
      "Goetter. Mit dem Zauberstab-Kommando 'zmore hier' kannst Du den "
      "Quellcode dieses Raumes anschauen. In diesem Raum wird ein "
      "Beispiel zur Verwendung der Grammatikfunktionen gegeben.\n"
      "Zu diesem Zweck liegt hier ein Kissen, dass Du dir genauer "
      "ansehen solltest. ('zmore kissen')");
   set_exits( ({"bsp9",
		"bsp7"}), 
	      ({"westen", "norden"}) );
   add_type("teleport_rein_verboten", 1);
   reset();
//	Die Gegenstaende sollen gleich beim create()-Aufruf initialisiert
//	werden, deshalb hier der (praktisch immer verwendete) reset()-Aufruf.
}