diff --git a/room/death/death_mark.c b/room/death/death_mark.c
new file mode 100644
index 0000000..8219016
--- /dev/null
+++ b/room/death/death_mark.c
@@ -0,0 +1,67 @@
+#pragma strict_types
+
+#include <moving.h>
+#include <properties.h>
+#include <language.h>
+
+inherit "std/thing";
+
+void create()
+{
+  ::create();
+  SetProp( P_NAME, "Stempel des Todes" );
+  SetProp( P_GENDER, MALE );
+  SetProp( P_SHORT, 0 );
+  SetProp( P_INVIS, 1 );
+  SetProp( P_NEVERDROP, 1 );
+  SetProp( P_WEIGHT, 0);
+  AddId(({"death_mark","\ndeath_mark"}));
+}
+
+void reset()
+{
+  ::reset();
+  if (environment() && !query_once_interactive(environment()))
+    remove();
+}
+
+
+/*
+ * Function name: start_death
+ * Description:   Start the death sequence.
+ */
+void start_death()
+{
+  if ( !environment() || !query_once_interactive(environment())
+       || !environment()->QueryProp(P_GHOST) )
+  {
+      destruct(this_object());
+      return;
+  }
+
+  say("Du siehst eine dunkle Gestalt, die etwas Dunst einsammelt ... oder vielleicht\n"+
+      "bildest du Dir das auch nur ein ...\n");
+ environment()->move("/room/death/virtual/death_room_"+getuid(environment()),
+		     M_GO|M_SILENT|M_NO_SHOW|M_NOCHECK);
+ // direkt in virtuellen Todesraum moven
+}
+
+protected int PreventMove(object dest, object oldenv, int method) {
+  // wenn die marke schon ein Env hat oder der move nicht in einen Spieler
+  // geht, gehts nur mit M_NOCHECK.
+  if ( (environment(this_object()) || !query_once_interactive(dest)) 
+      && !(method & M_NOCHECK)) {
+    return ME_CANT_BE_DROPPED;
+  }
+
+  return ::PreventMove(dest, oldenv, method);
+}
+
+int _query_autoloadobj() { return 1; }
+
+void init()
+{
+  ::init();
+  if (this_player() == environment())
+    start_death();
+}