From 495a42de7692534a5ece735d5f49b782be818b17 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 18 May 2019 23:15:36 -0300
Subject: Redesign some dialog in Halinarzo to “force” players to get magic.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 npc/009-2/librarian.txt |  9 +++++++--
 npc/009-2/scholar.txt   | 16 ++++++++++++++++
 2 files changed, 23 insertions(+), 2 deletions(-)

(limited to 'npc/009-2')

diff --git a/npc/009-2/librarian.txt b/npc/009-2/librarian.txt
index 1c742ddf8..72389d9b2 100644
--- a/npc/009-2/librarian.txt
+++ b/npc/009-2/librarian.txt
@@ -22,7 +22,7 @@ L_Advance:
     .@nt = getq2(General_Narrator);
     // Initial Value is 0.
     // .@nt tracks future value
-    if (!.@nt)
+    if (!.@nt || .@n == 6)
         goto L_Prologue;
 
     // If you wait 7 - instead of 3 - hours, you are abusing.
@@ -35,7 +35,12 @@ L_Advance:
     if (.@nt <= santime())
         goto L_Complete;
     mesn;
-    mesq l("Please help us with the bandits on the Canyon, and meanwhile, I'll seek the records for you. Just @@ more.", FuzzyTime(.@nt));
+    mesq l("Have you found out magic already? It should not be possible, but the girl reading the book says it is. I don't know in what to believe.");
+    next;
+    mesn;
+    mesq l("Anyway, I still need @@. You have plenty of time to do things at your own pace.", FuzzyTime(.@nt));
+    // Rule #99999999: Never tell players to grind for 3 hours you lazy dev
+    //mesq l("Please help us with the bandits on the Canyon, and meanwhile, I'll seek the records for you. Just @@ more.", FuzzyTime(.@nt));
     close;
 
 L_Prologue:
diff --git a/npc/009-2/scholar.txt b/npc/009-2/scholar.txt
index 64e5cb6c1..cade0342b 100644
--- a/npc/009-2/scholar.txt
+++ b/npc/009-2/scholar.txt
@@ -21,6 +21,8 @@
     mesc l("*sigh*");
     if (.@q < 1)
         goto L_Intro;
+    if (.@q && getq(General_Narrator) == 7)
+        goto L_NeedHelp;
     close;
 
 L_NotEnough:
@@ -32,6 +34,8 @@ L_NotEnough:
     }
     if (readparam(bInt) < $MANA_BINT+MAGIC_LVL*rand(10,13)) {
         mesq l("Out of my experience, your base intelligence may not be enough.");
+        if (!.@q)
+            mesc l("You should reset your stats and allocate some points at intelligence.");
     }
     if (.@q < 1)
         goto L_Intro;
@@ -65,6 +69,18 @@ L_Intro:
     getitem TrainingWand, 1;
     close;
 
+L_NeedHelp:
+    next;
+    mesn;
+    mesq l("Did you knew some crazy adventurers insists there is a Mana Stone on the danerous caves inside the town?");
+    next;
+    mesn;
+    mesq l("I mean, that's absurd! If there was one, it would have been taken already. Unless if grew some sencience or something.");
+    next;
+    mesn;
+    mesq l("Anyway, if you ever feel bored and wanna see what I mean by yourself, just leave the building and head west, then north. There's a small entrance there.");
+    close;
+
 OnInit:
     .sex=G_FEMALE;
     .distance=5;
-- 
cgit v1.2.3-60-g2f50