Add several convenience functions. Fix some bugs regarding misuse of readparam()

1 files changed, 0 insertions, 31 deletions

diff --git a/npc/commands/changesex.txt b/npc/commands/changesex.txt
deleted file mode 100755
index de20d91b..00000000
--- a/npc/commands/changesex.txt
+++ /dev/null
@@ -1,31 +0,0 @@
--	script	@changesex	NPC32767,{
-    callfunc "argv_splitter";
-    .@n$ = if_then_else(@argv$[1] != "", "char", "") + "changecharsex()";
-    if (GM < CMD_CHANGESex && GM < G_SYSOP) goto L_GM; // check if you can use it on self
-    .@target_id = BL_ID;
-    if (@argv$[1] != "") set .@target_id, getcharid(3, @argv$[1]);
-    if (@argv$[1] != "" && !(isloggedin(.@target_id))) goto L_Failed; // do NOT fallback to self
-    if (@argv$[1] != "" && GM < CMD_CHARCHANGESex && GM < G_SYSOP) goto L_GM; // when target is not self, use charchangecharsex() permission
-
-    set .@s, 3; // default to non-binary
-    if (@argv$[0] == "M" || @argv$[0] == "m") set .@s, 1;
-    if (@argv$[0] == "F" || @argv$[0] == "f") set .@s, 0;
-    Sex = .@s, .@target_id;
-    gmlog "@"+.@n$+" " + @args$;
-    message strcharinfo(0), .@n$+" : The operation succeeded.";
-    end;
-
-L_Failed:
-    // XXX: should we allow GMs to change Sex of users that are not logged in?
-    message strcharinfo(0), .@n$+" : Impossible to attach to the target player. Did you try putting the name in \"quotation marks\"?";
-    end;
-
-L_GM:
-    message strcharinfo(0), .@n$+" : GM command is level "+ if_then_else(@argv$[1] != "", CMD_CHARCHANGESex, CMD_CHANGESex) +", but you are level " + GM;
-    end;
-
-OnInit:
-    registercmd chr(ATCMD_SYMBOL) + "changecharsex()", strnpcinfo(0);
-    registercmd chr(ATCMD_SYMBOL) + "charchangecharsex()", strnpcinfo(0);
-    end;
-}