From b3f44a8e8ef767617c5e09ba689c16aa3c00d448 Mon Sep 17 00:00:00 2001
From: gumi <git@gumi.ca>
Date: Sun, 26 Apr 2020 20:27:54 -0400
Subject: add buildin getnpcsubtype() to get nd->subtype

---
 src/emap/script_buildins.c | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

(limited to 'src/emap/script_buildins.c')

diff --git a/src/emap/script_buildins.c b/src/emap/script_buildins.c
index 2899cc3..94ed92d 100644
--- a/src/emap/script_buildins.c
+++ b/src/emap/script_buildins.c
@@ -2349,6 +2349,30 @@ BUILDIN(isInstance)
     return true;
 }
 
+BUILDIN(getNpcSubtype)
+{
+    TBL_NPC *nd = map->id2bl(st->oid);
+
+    if (script_hasdata(st, 2))
+    {
+        if (script_isstringtype(st, 2)) {
+            nd = npc->name2id(script_getstr(st, 2));
+        } else {
+            nd = map->id2bl(script_getnum(st, 2));
+        }
+    }
+
+    if (!nd)
+    {
+        ShowWarning("npc not found\n");
+        script->reportsrc(st);
+        return false;
+    }
+
+    script_pushint(st, nd->subtype);
+    return true;
+}
+
 /*==========================================
  * return the battle stats of a structure
  * Supported values are most of UDT_* ones
-- 
cgit v1.2.3-60-g2f50