diff --git a/obj/tools/logtool.c b/obj/tools/logtool.c
new file mode 100644
index 0000000..8493b75
--- /dev/null
+++ b/obj/tools/logtool.c
@@ -0,0 +1,156 @@
+// (c) by Padreic (Padreic@mg.mud.de)
+
+inherit "std/secure_thing";
+
+#include <properties.h>
+#include <wizlevels.h>
+#include <defines.h>
+#include <moving.h>
+
+#define SAVEFILE  "/players/"+geteuid()+"/.logtool"
+
+// definieren von "inline" Funktionen:
+#define allowed()   (!process_call() && PL==RPL && geteuid()==getuid(RPL))
+
+mapping logs;
+
+static void check_logs()
+{
+  filter(sort_array(m_indices(logs), #'>), lambda( ({ 'x }), ({#'?, 
+    ({#'!=, ({#'[, logs, 'x, 2}), ({#'file_time, ({#'[, logs, 'x, 0}) }) }),
+       ({#'tell_object, ({#'environment }), ({#'sprintf,
+       "Neue Eintraege in <%s>.\n", 'x }) }), 0})));
+}
+
+void create()
+{
+  if (!clonep(ME)) return;
+  ::create();
+  if (!restore_object(SAVEFILE)) {
+    logs=([ "repfile": sprintf("/log/report/%s.rep", geteuid()); 0; 0 ]);
+    if (IS_ARCH(geteuid()))
+      logs+=(["snooplog": "/log/SNOOP"; 0; 0, "killer": "/log/KILLER"; 0; 0]);
+  }
+  SetProp(P_SHORT, this_player()->Name(WESSEN)+" Logtool");
+  SetProp(P_NAME, QueryProp(P_SHORT));
+  SetProp(P_NODROP, 0);
+  SetProp(P_NEVERDROP, 0);
+  SetProp(P_AUTOLOADOBJ, 1);
+  AddId("logtool");
+  AddCmd("mark", "aktualisieren");
+  AddCmd(m_indices(logs), "read_log");
+  AddCmd("AddLog", "add_log");
+  AddCmd("DelLog", "del_log");
+}
+
+void reset()
+{
+  ::reset();
+  if (!clonep(ME) || !environment()) return;
+  call_out("check_logs", 0);
+  set_next_reset(2*__RESET_TIME__); // kein Zufall, max. Laenge
+}
+
+varargs int move(mixed dest, int method)
+{
+  int i;
+  if (!objectp(dest)) dest=find_object(dest);
+  if (!dest || !interactive(dest) || getuid(dest)!=geteuid()) 
+    return ME_CANT_BE_TAKEN;
+  i=::move(dest, method);
+  if (i!=1) return i;
+  if (environment()) call_out("check_logs", 0);
+  return 1;
+}
+
+varargs string long() 
+{
+   return "Folgende Logfiles werden derzeit von Deinem Logtool verwaltet:\n\n"
+         +implode(map(sort_array(m_indices(logs), #'>),
+          lambda( ({ 'x }), ({#'sprintf, " %1s %-14s - %s", ({#'?, ({#'!=,
+          ({#'[,logs,'x, 2}), ({#'file_time,({#'[,logs,'x, 0})})}),"*",""}),
+          ({#'sprintf, "<%s>", 'x}), ({#'[, logs, 'x, 0})}) ) ), "\n")
+         +"\n\nMit <mark> koennen alle Eintraege als gelesen markiert und "
+         +"mit Add- und\nDelLog Logfiles in die Liste aufgenommen bzw. aus "
+         +"der Liste entfernt werden.\n";
+}
+
+static int aktualisieren(string str)
+{
+  if (!allowed()) return 0;
+  if (str && str!="") {
+    if (!logs[str]) {
+      notify_fail("Ein solches Logfile ist nicht in der Liste enthalten.\n");
+      return 0;
+    }
+    logs[str, 1]=file_size(logs[str, 0]);
+    logs[str, 2]=file_time(logs[str, 0]);
+  }
+  else filter(m_indices(logs), lambda( ({ 'x }),({#', ,
+   ({#'=, ({#'[, logs, 'x, 1}), ({#'file_size, ({#'[, logs, 'x, 0}) }) }),
+   ({#'=, ({#'[, logs, 'x, 2}), ({#'file_time, ({#'[, logs, 'x, 0}) })})})));
+  write("Done!\n");
+  save_object(SAVEFILE);
+  return 1;
+}
+
+static int read_log(string str)
+{
+  int si;
+  if (!allowed()) return 0;
+  si=file_size(logs[query_verb(),0]);
+  if (str)
+    PL->more(logs[query_verb(),0]);
+  else {
+    if (si<0 || file_time(logs[query_verb(), 0])==logs[query_verb(), 2])
+      write("Keine neuen Eintraege in <"+query_verb()+">.\n");
+    else {
+      write("Folgendes ist neu in <"+query_verb()+">.\n");
+      if (si<logs[query_verb(),1])
+        PL->more(logs[query_verb(),0]);
+      else PL->More(read_bytes(logs[query_verb(),0],
+	    logs[query_verb(),1],si-logs[query_verb(),1]));
+    }
+  }
+  logs[query_verb(), 1]=si;
+  logs[query_verb(), 2]=file_time(logs[query_verb(), 0]);
+  save_object(SAVEFILE);
+  return 1;
+}
+
+static int add_log()
+{
+  string key, path, str;
+  str=PL->_unparsed_args();  
+  if (!allowed() || !str || sscanf(str, "%s %s", key, path)!=2) {
+    notify_fail("Syntax: AddLog <key> <path>\n");
+    return 0;
+  }
+  key=lower_case(key);
+  if (logs[key]) {
+    notify_fail("Es gibt schon ein Logfile mit diesem Key in der Liste.\n");
+    return 0;
+  }
+  logs+=([ key: path; 0; 0 ]);
+  AddCmd(key, "read_log");
+  save_object(SAVEFILE);
+  write("Logfile <"+key+"> in die Liste aufgenommen.\n");
+  return 1;
+}
+
+static int del_log(string str)
+{
+  if (!allowed() || !str) {
+    notify_fail("WELCHES Logfile soll aus der Liste entfernt werden?\n");
+    return 0;
+  }
+  if (!logs[str]) {
+    notify_fail("Logfile nicht in Liste enthalten.\n");
+    return 0;
+  }
+  logs=m_copy_delete(logs,str);
+  RemoveCmd(str);
+  save_object(SAVEFILE);
+  write("Logfile <"+str+"> aus Liste entfernt.\n");
+  return 1;
+}