Loeschen von Spielern ermoeglichen

Schaltet ein Spieler aus, dass er in Toplisten
auftauchen will, wurde er bislang nicht sofort
geloescht. Dies passiert ab jetzt.
Interaktive Spielershells koennen ihren eigenen
Eintrag loeschen, EM+ beliebige.

Change-Id: I98792db1d7130ae3cdd5031899dde459f558cf1b
diff --git a/secure/topliste.c b/secure/topliste.c
index 3e1355c..faf5404 100644
--- a/secure/topliste.c
+++ b/secure/topliste.c
@@ -122,6 +122,22 @@
   }
 }
 
+// Falls ein Spieler sich aus Toplisten austragen will
+public varargs mixed DeletePlayer(string real_name)
+{
+  // (interaktive) Spielershells duerfen sich selber austragen, EM+ beliebige
+  // Spieler
+  if (!ARCH_SECURITY)
+  {
+      if (interactive(previous_object()))
+          real_name = previous_object()->query_real_name();
+      else
+          raise_error("Spieler aus Toplisten loeschen koennen nur Spieler "
+              "selber oder ein EM+.\n");
+  }
+  return sl_exec("DELETE FROM topliste WHERE name = ?1;", real_name);
+}
+
 public varargs < <string|int>* >* Liste(string rasse, string gilde,
                                      int limit, string sort)
 {