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

1 files changed, 35 insertions, 0 deletions

diff --git a/npc/functions/permissions.txt b/npc/functions/permissions.txt
new file mode 100644
index 00000000..96e69fde
--- /dev/null
+++ b/npc/functions/permissions.txt
@@ -0,0 +1,35 @@
+// Evol scripts.
+// Author:
+//    gumi
+// Description:
+//    checks player permissions
+//    ** admins are implicitly everything
+
+// administrator
+function	script	is_admin	{
+    return has_permission(PERM_USE_ALL_COMMANDS, getarg(0, getcharid(CHAR_ID_ACCOUNT)));
+}
+
+// any staff member
+function	script	is_trusted	{
+    return is_admin(getarg(0, getcharid(CHAR_ID_ACCOUNT))) ||
+        has_permission("show_client_version", getarg(0, getcharid(CHAR_ID_ACCOUNT)));
+}
+
+// developer
+function	script	is_dev	{
+    return is_admin(getarg(0, getcharid(CHAR_ID_ACCOUNT))) ||
+        has_permission(PERM_RECEIVE_REQUESTS, getarg(0, getcharid(CHAR_ID_ACCOUNT)));
+}
+
+// event coordinator
+function	script	is_evtc	{
+    return is_admin(getarg(0, getcharid(CHAR_ID_ACCOUNT))) ||
+        can_use_command("@monster", getarg(0, getcharid(CHAR_ID_ACCOUNT)));
+}
+
+// game master
+function	script	is_gm	{
+    return is_admin(getarg(0, getcharid(CHAR_ID_ACCOUNT))) ||
+        can_use_command("@jail", getarg(0, getcharid(CHAR_ID_ACCOUNT)));
+}