diff --git a/p/service/loco/obj/fwsaveserv.c b/p/service/loco/obj/fwsaveserv.c
new file mode 100644
index 0000000..a228994
--- /dev/null
+++ b/p/service/loco/obj/fwsaveserv.c
@@ -0,0 +1,35 @@
+/***************************************************************************
+
+ Forward-Server: Lade-/Speicherserver.
+  Dieser Teilserver hat die Aufgabe, einzelne Teile der forwardliste 
+  auf Anfrage zu laden und 
+
+ Teil des MG-Mailsystems
+ (C) 1996 Loco@Morgengrauen
+
+ Es gilt dasselbe Copyright wie fuer mailer.c, bitte dort nachlesen.
+
+***************************************************************************/
+
+#include "/mail/post.h"
+
+mixed data;
+
+create() {
+  seteuid(getuid());
+}
+
+mapping LoadData(string file) {
+  if (!stringp(file)||sizeof(file)>1||file>"z"||file<"a")
+    return 0;
+  restore_object(FWSAVEFILE(file));
+  return data;
+}
+
+int SaveData(string file, mapping what) {
+//  if (geteuid(previous_object())!=geteuid()) return 0;
+  data=what;
+  save_object(FWSAVEFILE(file));
+  data=0;
+  return 1;
+}