From cc190fcba8d954d5782a65f7312b2f5dd2f43f10 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Tue, 19 Jun 2018 01:18:24 -0300
Subject: Okay, only the items (Potion + Grimorie) missing, and Nard's part.

---
 npc/014-3/fountain.txt  | 65 +++++++++++++++++++++++++++++++++++++++++++++++++
 npc/functions/class.txt | 21 +++++++++++++++-
 2 files changed, 85 insertions(+), 1 deletion(-)

diff --git a/npc/014-3/fountain.txt b/npc/014-3/fountain.txt
index 65d7416bb..bfe9b6507 100644
--- a/npc/014-3/fountain.txt
+++ b/npc/014-3/fountain.txt
@@ -6,6 +6,8 @@
 //    Hurnscald doesn't have a well
 
 014-3,151,117,0	script	Fountain#Hurns	NPC_NO_SPRITE,{
+    if (ST_TIER == 5 && gettimetick(2) < QUEST_ELEVARTEMPO) goto L_Tier2;
+
     mes col("There is fresh water here. I could use it to fill a bottle.", 9);
     mes col("But I probably should not do it. It might be poisoned!", 9);
     close;
@@ -43,6 +45,69 @@ L_NotEnoughMoney:
     mes l("You don't have enough gold! You need @@ gp.", .@Cost);
     close;
 
+
+L_Tier2:
+    mesn;
+    mes col("WHAT ARE YOU GOING TO DO?", 9);
+    next;
+    select
+        l("Do nothing"), // 1
+        l("Drink the potion"), // 2
+        l("Pour the potion"), // 3
+        l("Wash yourself with the potion"), // 4
+        l("Burn the potion"), // 5
+        l("Drink the potion, and say magic words"), // 6
+        l("Say magic words"), // 7
+        l("Do a weird dance"), // 8
+        l("Blame Saulc"); // 9
+
+    mes "";
+    if (@menu == 1)
+        close;
+
+    if (@menu == 3)
+        goto L_Tier2Ok;
+
+    if (@menu <= 6)
+        goto L_Failed;
+
+    if (@menu == 9)
+        mes col("Whatever you're blaming Saulc about, this one time, he is innocent.", 9);
+    mes col("Nothing happens.", 9);
+    close;
+
+L_Failed:
+    mesn strcharinfo(0);
+    mesq l("Ah no... That's not what I had to do... I wasted the potion...");
+    QUEST_ELEVARTEMPO=gettimetick(2);
+    close;
+
+L_Tier2Ok:
+    mes col("You pour the whole potion on the fountain.", 9);
+    next;
+    mes col("You hear birds singing! That is what you had to do!", 9);
+    next;
+    mes col("Your body starts to glow. You're not sure why, the fountain did that!", 9);
+    next;
+    mesn;
+    mes l("I am the Magic Fountain of Hurnscald. You are qualified.");
+    next;
+    mesn;
+    mes l("Your next step is to get the book of the Second Sage Of Fate.");
+    next;
+    mesn;
+    mes l("I predict you're closer to find the Secret Of Mana, and therefore, be part on saving our world.");
+    next;
+    mesn;
+    mes l("I will empower you with raw mana, and your time will start running out again.");
+    next;
+    // 4~6 minutes to finish in average. Each level grants 4~6 extra seconds.
+    QUEST_ELEVARTEMPO=gettimetick(2)+rand((BaseLevel*4),(BaseLevel*6));
+    ST_TIER=6;
+    mesn;
+    mesq l("Run like the wind, @@! For you shall have only @@ to finish the ritual!", strcharinfo(0), FuzzyTime(QUEST_ELEVARTEMPO,2,2));
+    close;
+
 OnInit:
     .COST_PER_BOTTLE = 0;
     .sex = G_MALE;
diff --git a/npc/functions/class.txt b/npc/functions/class.txt
index 7158c6c5e..b1e404a24 100644
--- a/npc/functions/class.txt
+++ b/npc/functions/class.txt
@@ -158,11 +158,29 @@ L_T2_Fail:
             next;
             mesn;
             mes col("YOU WILL BE PENALIZED WITH 60% OF HEALTH.", 1);
-            mes col("IF YOU DIE, YOU'LL SUFFER THE PENALTY.", 1);
+            mes col("IF YOU DIE, YOU'LL SUFFER THE EXP PENALTY.", 1);
             percentheal -60, -100;
             close;
         }
     }
+
+    if (ST_TIER == 7) {
+        if (1) {//countitem(Grimorie) > 0) {
+            //delitem Grimorie, 1;
+            dispbottom l("Blame Jesusalva");
+            close;
+        } else {
+            mesn;
+            mes col("WARNING. YOU ARE CHEATING THE GRIMORIE QUEST.", 1);
+            next;
+            mesn;
+            mes col("YOU WILL BE PENALIZED WITH 70% OF HEALTH.", 1);
+            mes col("IF YOU DIE, YOU'LL SUFFER THE EXP PENALTY.", 1);
+            percentheal -70, -100;
+            close;
+        }
+    }
+
     mes col(".:: Mission Failed ::.", 1);
     mes col("You ran out of time.", 1);
     mes "";
@@ -271,6 +289,7 @@ L_T2_S4:
     delitem MauveHerb, .@r;
     ST_TIER=5;
     getexp .@r*3, 0;
+    //getitem MagicPotion, 1;
 
     mesq col("You quickly give him the herbs, and he skillfully mix them on a potion.", 9);
     next;
-- 
cgit v1.2.3-60-g2f50