From 41d379f07621dc9411412865455a33947579501b Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 2 May 2020 09:41:18 -0300
Subject: Arthur now gives a reward to the guild representative.

---
 npc/014-4/kamelot.txt |  1 +
 npc/042-0/arthur.txt  | 24 ++++++++++++++++++++++--
 2 files changed, 23 insertions(+), 2 deletions(-)

(limited to 'npc')

diff --git a/npc/014-4/kamelot.txt b/npc/014-4/kamelot.txt
index 7911f31fe..6d4e377ef 100644
--- a/npc/014-4/kamelot.txt
+++ b/npc/014-4/kamelot.txt
@@ -20,6 +20,7 @@
     // 16 - Magic Seal 02 Broken
     // 32 - Door opened
     // 64 - Boss defeated
+    // 128 - Guild Reward Claimed
 // $KAMELOT_KEYMASK [ guild_id ] = (bitmask) Keys and Lockpicks
     // 1 - Treasure A (Boss Room key)
     // 2 - Treasure B
diff --git a/npc/042-0/arthur.txt b/npc/042-0/arthur.txt
index f8b1a8f91..798343aeb 100644
--- a/npc/042-0/arthur.txt
+++ b/npc/042-0/arthur.txt
@@ -13,7 +13,6 @@
     if (.@pos > GPOS_VICELEADER) goto L_Refusal;
     if (!$KAMELOT_COOLDOWN[.@g]) goto L_Tutorial;
     if ($KAMELOT_QUEST[.@g] & 1) goto L_Progress;
-    // TODO: Curse lifted scene until next week
     goto L_Prologue;
 
 L_Prologue:
@@ -117,13 +116,34 @@ OnSmash:
 
 //////////////////////////////////////////////////////////////////////////
 L_Progress:
-    // TODO: Victory Reward
+    if ($KAMELOT_QUEST[.@g] & 64) goto L_Reward;
     npctalk l("What are you still doing here?! GO!!");
     mes l("Read tutorial again?");
     next;
     if (askyesno() == ASK_YES) goto L_Tutorial;
     close;
 
+L_Reward:
+    .@cn=$KAMELOT_MX[.@g]/3;
+    mesn;
+    mesq l("Thanks for vanishing the source of the curse.");
+    next;
+    mesn;
+    mesq l("Since Merlin left in an expedition with Morgan, strange things have been happening in Kamelot.");
+    next;
+    mesn;
+    mesq l("Please accept this reward from my part. And if anything else happens again, I'll leave the doors open for you and your guild.");
+    next;
+    warp "014-4", 67, 27;
+    if ($KAMELOT_QUEST[.@g] & 128)
+        close;
+    $KAMELOT_QUEST[.@g]=$KAMELOT_QUEST[.@g]|128;
+    getitem GuildCoin, .@cn;
+    guildgetexp(.@cn*1000);
+    // TODO: Make this a decent reward
+    getitembound any(SilverRing, GoldenRing), 1, 2;
+    close;
+
 //////////////////////////////////////////////////////////////////////////
 L_Tutorial:
     // Update variable
-- 
cgit v1.2.3-70-g09d2