Difference between revisions of "Manual:DIL Manual/delete player()"

From DikuMUD Wiki
Jump to navigation Jump to search
(XML import)
 
(XML import)
 
Line 1: Line 1:
−
 
−
 
 
<span id="bpdp"></span>
 
<span id="bpdp"></span>
  
Line 19: Line 17:
 
         err:integer;
 
         err:integer;
 
  code
 
  code
−
{
+
dilend
  
−
if(self.type != UNIT_ST_PC) quit;
 
  
−
if (self.level>200)
 
−
        goto admin_delete;
 
  
−
  :char_delete:
+
  ---~---~---~---~---~---~---~---~---
−
        if (arg!="self forever")
 
−
                {
 
−
                sendtext ("To delete your char type:  'delete self forever'&amp;n",self);
 
−
                quit;
 
−
                }
 
  
−
  err:=loadstr("delete.txt",temp);
+
  </i><!--ENDCODE-->
  
−
if (err&lt;1)
 
−
        goto no_insure;
 
  
−
  sendtext (temp,self);
+
  ---~---~---~---~---~---~---~---~---
 +
<span id="bpdp"></span>
  
−
  sendtext ("If your sure you still want to delete your character, 'say delete me'&amp;n",self);
+
  '''Function:''' <i><!--CODE-->delete_player( s : string ) ;</i><!--ENDCODE-->
−
  sendtext ("Doing anything else will abort the deletion.&amp;n",self);
 
  
−
  wait (SFB_CMD, self==activator);
+
  <!--TERM-->  '''s'''
−
  if (command ("say"))
+
  <!--DEFINITION-->        the player name you want to delete
  
−
        if (argument=="delete me")
+
This function deletes a player but it doesn't check to see if it
−
        if (self.extra.[CLAN_RANK]!=null)
+
was deleted or if it even existed you will have to do that with 'isplayer'.
−
                exec ("cdefect",self);
+
'''Example:'''
−
                delete_player(self.name);
+
<i><!--CODE-->
 +
---~---~---~---~---~---~---~---~---
  
−
  sendtext("Deletion aborted&amp;n",self);
+
  dilbegin aware do_delete (arg:string);
−
 
+
  var
−
  quit;
+
         temp:string;
−
 
+
         err:integer;
−
         :no_insure:
+
  code
−
                if (self.extra.[CLAN_RANK]!=null)
+
dilend
−
                exec ("cdefect",self);
 
−
                        delete_player(self.name);
 
−
 
 
−
quit;
 
−
         :admin_delete:
 
−
        if (arg=="self forever")
 
−
                goto char_delete;
 
−
if (arg==""){
 
−
sendtext("You must supply a characters name to delete one.&amp;n",self);
 
−
quit;
 
−
  }
 
−
 
 
−
if (arg==self.name){
 
−
sendtext ("To delete self you need to type 'delete self forever'&amp;n",self);
 
−
quit;
 
−
}
 
−
 
 
−
if (not isplayer(arg))
 
−
        {
 
−
        sendtext (arg+" is not a character.&amp;n",self);
 
−
        quit;
 
−
        }
 
−
dilcopy ("god_delete@clans("+arg+")",self);
 
−
 
 
−
        sendtext (arg+" has been deleted.&amp;n",self);
 
−
quit;
 
−
}
 
−
dilend
 
  
  

Latest revision as of 22:32, 4 December 2025

Function:  delete_player( s : string ) ;

  s
         the player name you want to delete

This function deletes a player but it doesn't check to see if it
was deleted or if it even existed you will have to do that with 'isplayer'.
Example:

---~---~---~---~---~---~---~---~---

dilbegin aware do_delete (arg:string);
var
        temp:string;
        err:integer;
code

dilend 


---~---~---~---~---~---~---~---~---





---~---~---~---~---~---~---~---~---


Function:  delete_player( s : string ) ;

  s
         the player name you want to delete

This function deletes a player but it doesn't check to see if it
was deleted or if it even existed you will have to do that with 'isplayer'.
Example:

---~---~---~---~---~---~---~---~---

dilbegin aware do_delete (arg:string);
var
        temp:string;
        err:integer;
code

dilend 


---~---~---~---~---~---~---~---~---





---~---~---~---~---~---~---~---~---
Retrieved from "http://wiki.dikumud.net/index.php?title=Manual:DIL_Manual/delete_player()&oldid=1143"