summaryrefslogtreecommitdiff
path: root/world/map/npc/commands/changesex.txt
diff options
context:
space:
mode:
authormekolat <mekolat@users.noreply.github.com>2016-04-19 09:42:48 -0400
committermekolat <mekolat@users.noreply.github.com>2016-04-19 09:42:48 -0400
commitea7d999c39ead96efb6d9af7e68794c59290cf60 (patch)
tree771e06363fe2e7609847a0a63a2e499632d3d7a2 /world/map/npc/commands/changesex.txt
parent9e7f46ac732851c1359a15837c82ebf67ea2be39 (diff)
parent91fe3711fcacdfe83794b4347595e56e90e9d3a7 (diff)
downloadserverdata-ea7d999c39ead96efb6d9af7e68794c59290cf60.tar.gz
serverdata-ea7d999c39ead96efb6d9af7e68794c59290cf60.tar.bz2
serverdata-ea7d999c39ead96efb6d9af7e68794c59290cf60.tar.xz
serverdata-ea7d999c39ead96efb6d9af7e68794c59290cf60.zip
Merge self-fork from mekolat/magic-v3
Magic v3 spells
Diffstat (limited to 'world/map/npc/commands/changesex.txt')
-rw-r--r--world/map/npc/commands/changesex.txt32
1 files changed, 32 insertions, 0 deletions
diff --git a/world/map/npc/commands/changesex.txt b/world/map/npc/commands/changesex.txt
new file mode 100644
index 00000000..fca27645
--- /dev/null
+++ b/world/map/npc/commands/changesex.txt
@@ -0,0 +1,32 @@
+-|script|@changesex|32767
+{
+ callfunc "argv_splitter";
+ set .@n$, if_then_else(@argv$[1] != "", "char", "") + "changesex";
+ if (GM < CMD_CHANGESEX && GM < G_SYSOP) goto L_GM; // check if you can use it on self
+ set .@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 charchangesex 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;
+ set 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) + "changesex", strnpcinfo(0);
+ registercmd chr(ATCMD_SYMBOL) + "charchangesex", strnpcinfo(0);
+ end;
+}