From 08268b51173bdc1ae12d359b24b0e0562156a8d2 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Tue, 28 Jul 2020 21:50:18 -0300
Subject: Move POL_LocToTP from Politics to Utils

---
 npc/functions/util.txt | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

(limited to 'npc/functions/util.txt')

diff --git a/npc/functions/util.txt b/npc/functions/util.txt
index e0c1b93d8..125f60044 100644
--- a/npc/functions/util.txt
+++ b/npc/functions/util.txt
@@ -921,6 +921,33 @@ function	script	gettimeparam	{
 }
 
 
+// Convert LOC (uppercase) to a TP variable
+// POL_LocToTP( {TOWNCODE} )
+function	script	POL_LocToTP	{
+    .@tw$=strtoupper(getarg(0, LOCATION$));
+
+    if (.@tw$ == "TULIM")
+        return TP_TULIM;
+
+    if (.@tw$ == "HALIN")
+        return TP_HALIN;
+
+    if (.@tw$ == "HURNS")
+        return TP_HURNS;
+
+    if (.@tw$ == "LOF")
+        return TP_LOF;
+
+    if (.@tw$ == "NIVAL")
+        return TP_NIVAL;
+
+    if (.@tw$ == "FROSTIA")
+        return TP_FROSTIA;
+
+    return Exception("Invalid town requested / POL_LocToTP", RB_DEFAULT|RB_SPEECH, -1);
+}
+
+
 // Upon entering a town
 // EnterTown( LocName )
 function	script	EnterTown	{
-- 
cgit v1.2.3-70-g09d2