Sketch of Sagratha - First met

1 files changed, 36 insertions, 0 deletions

diff --git a/npc/014-5-1/sagratha.txt b/npc/014-5-1/sagratha.txt
index 6091ae13b..9953a8b4e 100644
--- a/npc/014-5-1/sagratha.txt
+++ b/npc/014-5-1/sagratha.txt
@@ -55,6 +55,8 @@ function	script	SaggyMobCount	{
     if (SAGRATHA_SCORE < 0)
         goto L_Unhappy;
 
+    .@q=getq(HurnscaldQuest_Sagratha);
+
     mesn;
 
     if (.@good >= 2)
@@ -65,7 +67,12 @@ function	script	SaggyMobCount	{
         mesc l("@@ glances at you, suspicion evident in her eyes.", .name$);
 
     mesq l("Hello.");
+    next;
+
+    if (.@q == 6)
+        goto L_Reward;
 
+    // TODO: What's your name etc etc - Maybe before the dialog, in the dungeon
     // TODO: Handle the curse (menu option)
     // TODO: Collect reward (set quest status to 7)
     // TODO: Allow to return to the Sealed Shrine
@@ -76,6 +83,35 @@ function	script	SaggyMobCount	{
 
     close;
 
+L_Reward:
+    select
+        l("Hi! My name is @@.", strcharinfo(0)),
+        l("Are you Sagratha?"),
+        l("Good bye.");
+    mes "";
+    if (@menu == 3)
+        close;
+    if (@menu == 1) {
+        mesn;
+        mesq l("Ah.");
+        next;
+        select
+            l("Are you Sagratha?"),
+            l("Erm... Good bye.");
+        mes "";
+        if (@menu == 2)
+            close;
+    }
+    mesn;
+    mesq l("Yes.");
+    next;
+    mesn;
+    mesq l("Do you need something from me?");
+    next;
+    select
+        l("Not really.");
+    close;
+
 L_HatAttack:
     mesn;
     mesc l("@@ seems to be trembling with disgust as she stares at your headgear.", .name$);