From ffd7b573c0d4d0ebd4b3981fb9e867718a5849d1 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Fri, 15 Jan 2021 19:43:00 -0300
Subject: Fortress Town missing npcs

---
 npc/025-1/selim.txt | 81 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 81 insertions(+)
 create mode 100644 npc/025-1/selim.txt

(limited to 'npc/025-1/selim.txt')

diff --git a/npc/025-1/selim.txt b/npc/025-1/selim.txt
new file mode 100644
index 000000000..76fbd9b33
--- /dev/null
+++ b/npc/025-1/selim.txt
@@ -0,0 +1,81 @@
+// TMW2 scripts.
+// Author:
+//    Jesusalva
+// Description:
+//   Selim is just a barber. No puns this time.
+
+025-1,101,58,0	script	Selim	NPC_ELVEN_FEMALE_ARMOR_SHOP,{
+    function setRace {
+        clear;
+        setnpcdialogtitle l("%s - Modify Race", .name$);
+        mes l("Race") + ": " + get_race();
+        next;
+        mes l("Please select the desired race.");
+        select
+            l("Kaizei Human"),
+            l("Argaes Human"),
+            l("Tonori Human"),
+            l("Elf"),
+            l("Orc"),
+            l("Raijin"),
+            l("Tritan"),
+            l("Ukar"),
+            l("Redy"),
+            l("Savior");
+        switch (@menu)
+        {
+            default:
+                jobchange max(0, @menu-1);
+        }
+        return;
+    }
+
+
+    mesn;
+    mesq l("Hi! Do you want a hair cut?");
+
+    do
+    {
+        select
+            l("What is my current hairstyle and hair color?"),
+            l("I'd like to get a different style."),
+            l("Can you do something with my color?"),
+            rif(is_gm() || REBIRTH >= 5, l("I want to change my Race!")),
+            l("I'm fine for now, thank you.");
+
+        switch (@menu)
+        {
+            case 1:
+                BarberSayStyle 3;
+                break;
+            case 2:
+                BarberChangeStyle;
+                speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                    l("Enjoy your new style.");
+                    l("Anything else?");
+                break;
+            case 3:
+                BarberChangeColor;
+                speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                    l("I hope you like this color.");
+                    l("Anything else?");
+                break;
+            case 4:
+                setRace;
+                break;
+            case 5:
+                speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                    l("Feel free to come visit me another time.");
+
+                goodbye;
+        }
+    } while (1);
+    close;
+
+
+OnInit:
+    .sex = G_FEMALE;
+    .distance = 5;
+    end;
+}
+
-- 
cgit v1.2.3-60-g2f50