From 0f7b6075c82c005d454000b39b4c5185993f0011 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 17 Aug 2019 17:13:54 -0300
Subject: Simple quest on Thorn, for no real reason, but you might do it anyway
 for completion. Remember: Completing this quest affect the ferry fee!

---
 npc/014-4/thorn.txt    | 29 ++++++++++++++++++++++++++++-
 npc/functions/util.txt |  8 ++++++--
 2 files changed, 34 insertions(+), 3 deletions(-)

(limited to 'npc')

diff --git a/npc/014-4/thorn.txt b/npc/014-4/thorn.txt
index 2b9846981..2547ddd88 100644
--- a/npc/014-4/thorn.txt
+++ b/npc/014-4/thorn.txt
@@ -22,7 +22,34 @@
         goto L_SpringQuest;
 
 L_Main:
-    close;
+    next;
+    .@q=getq(HurnscaldQuest_Thorn);
+    if (.@q == 0) {
+        mesn;
+        mesq l("I'm actually half-wose. This means part of me is tree.");
+        next;
+        mesn;
+        mesq l("I can walk, I'm just... Trapped here. That's why I need someone to help me to cultivate my wose part!");
+        next;
+        mesn;
+        mesq l("Could you please bring me @@ @@ and @@ @@? I'll give you a bunch of herbs if you help me!", 12, getitemlink(Root), 35, getitemlink(Acorn));
+        next;
+        mesc l("Give him the materials he asked for?");
+        if (askyesno() == ASK_YES) {
+            inventoryplace ShadowHerb, 8, ArtichokeHerb, 12;
+            if (!transcheck(Root, 12, Acorn, 35))
+                close;
+            getitem ShadowHerb, 8;
+            getitem ArtichokeHerb, 12;
+            getexp 600, 120; // Reference: Level 20
+            mesn;
+            mesq l("Thanks for helping me out. I know this is nothing, but please accept these herbs I've collected.");
+            setq HurnscaldQuest_Thorn, 1;
+        }
+    }
+    closeclientdialog;
+    goodbye;
+    end;
 
 L_OutOfSeason:
     mesn;
diff --git a/npc/functions/util.txt b/npc/functions/util.txt
index d97a7c9b6..31789ee92 100644
--- a/npc/functions/util.txt
+++ b/npc/functions/util.txt
@@ -223,7 +223,7 @@ function	script	reputation	{
 
 
 
-    // Hurnscald Quests (9 points)
+    // Hurnscald Quests (11 points)
     } else if (getarg(0) == "Hurns") {
 
         // Alan Quest (+1 rep)
@@ -269,8 +269,12 @@ function	script	reputation	{
         if (getq(HurnscaldQuest_Lieutenant) >= 10)
             .@nr=.@nr+1;
 
+        // Thorn Quest (+1 rep)
+        if (getq(HurnscaldQuest_Thorn) >= 11)
+            .@nr=.@nr+1;
+
         // HURNSCALD Magical Forumula
-        .@nr=.@nr*100/9;
+        .@nr=.@nr*100/10;
 
 
 
-- 
cgit v1.2.3-70-g09d2