2 files changed, 84 insertions, 0 deletions
diff --git a/npc/014-5/_import.txt b/npc/014-5/_import.txt
index b404f71e4..899b521ae 100644
--- a/npc/014-5/_import.txt
+++ b/npc/014-5/_import.txt
@@ -2,4 +2,5 @@
 // This file is generated automatically. All manually added changes will be removed when running the Converter.
 "npc/014-5/_mobs.txt",
 "npc/014-5/_warps.txt",
+"npc/014-5/sagratha.txt",
 "npc/014-5/sign.txt",
diff --git a/npc/014-5/sagratha.txt b/npc/014-5/sagratha.txt
new file mode 100644
index 000000000..e47fe3fde
--- /dev/null
+++ b/npc/014-5/sagratha.txt
@@ -0,0 +1,83 @@
+// TMW2 scripts.
+// Authors:
+//    Jesusalva
+// Description:
+//    Sagratha's House Door
+
+014-5,122,137,0	script	Sagratha Door	NPC_HIDDEN,0,0,{
+    end;
+
+L_Magicless:
+    npctalk3 l("A mild magic barrier prevents you from entering.");
+    dispbottom l("If only I knew some magic...");
+    end;
+
+L_Lockpick:
+    mesn;
+    mesc l("The door is locked!");
+    select
+        l("Knock on the door?"),
+        l("Attempt to lockpick?"),
+        l("Leave it alone?");
+    mes "";
+
+    if (@menu == 1) {
+        mesn l("Sagratha");
+        mesq l("No, I don't need monster repellent nor anything! Go away!");
+        close;
+    } else if (@menu == 2) {
+        if (LockPicking(4, 5)) {
+            getexp BaseLevel*4, 5;
+            mesn;
+            mesc l("*click*");
+            next;
+            mesn l("Sagratha");
+            mesq l("Who is there? Are they trying to break my lock again?!");
+            next;
+            select
+                l("Run away?"),
+                l("Stay there?");
+            mes "";
+
+            if (@menu == 2) {
+                mesn l("Sagratha");
+                mesq l("Oh my Jesusalva - You broke my lock! Why?!");
+                next;
+                select
+                    l("I need to talk with you!"),
+                    l("No reason.");
+                mes "";
+                if (@menu == 1) {
+                    mesn l("Sagratha");
+                    mesq l("No, I don't teach magic. No, I'm not interested in @@ affairs.", get_race());
+                    next;
+                    mesn l("Sagratha");
+                    mesq l("Yes, I know when next Alliance's Council meeting will be. No, I don't need anything.");
+                    next;
+                    mesn l("Sagratha");
+                    mesq l("Now begone.");
+                } else {
+                    mesn l("Sagratha");
+                    mesq l("What?! Do my house look like the place to you pratice your thief skills?!");
+                    mesq col(l("DIE!"), 1);
+                    specialeffect(312, SELF, getcharid(3));
+                    percentheal -40, -100;
+                }
+            }
+
+        } else {
+            mesn l("Sagratha");
+            mesq l("Who is there? Are they trying to break my lock again?!");
+            mesq col(l("DIE!"), 1);
+            specialeffect(312, SELF, getcharid(3));
+            percentheal -40, -100;
+        }
+    }
+    close;
+
+OnTouch:
+    if (!MAGIC_LVL) goto L_Magicless;
+    goto L_Lockpick;
+    end;
+
+}