From 25765c78caa010323f566de88a80480397894b77 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 1 Jun 2019 20:37:32 -0300
Subject: Sealed Shrine - Main Barrier

---
 npc/015-8/sealedshrine.txt | 55 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 55 insertions(+)

(limited to 'npc/015-8/sealedshrine.txt')

diff --git a/npc/015-8/sealedshrine.txt b/npc/015-8/sealedshrine.txt
index 19e63b127..eb0eb0c75 100644
--- a/npc/015-8/sealedshrine.txt
+++ b/npc/015-8/sealedshrine.txt
@@ -4,6 +4,7 @@
 // Description:
 //    SEALED SHRINE submodule - Sagratha's Cave - 015-8
 // Uses setq3 - setq1 stage 3
+// NPC_FAKIR + NPC_STATUE_FAFA
 
 // Check for validity
 function	script	SaggySealCheck	{
@@ -16,6 +17,8 @@ function	script	SaggySealCheck	{
         sc_end SC_OVERLAPEXPUP;
         sc_start SC_OVERLAPEXPUP, 300000, -20;
         warp "Save", 0, 0;
+        closeclientdialog;
+        end;
         return false;
     }
 
@@ -442,3 +445,55 @@ OnTouch:
     end;
 }
 
+
+
+
+
+// Magic Barrier
+015-8,94,104,0	script	Dog Statue#Saggy	NPC_STATUE_FAFA,{
+OnDialog:
+    mesn;
+    mesq l("This is a magical barrier, powered by three seals in your part.");
+    next;
+    mesn;
+    mesq l("You must break all three seals to cross this barrier! For that, walk on them!");
+    next;
+    mesn;
+    mesq l("Breaking a seal is easy, just flow mana on it for enough time to it shatter.");
+    next;
+    mesn;
+    mesq l("I, Fafa, the Magical Statue, grant you this power! Prove your worth! And never run from the seal, or die for your cowardice!");
+    close;
+
+OnInit:
+    .distance=5;
+    end;
+}
+
+015-8,91,100,0	script	#SaggyBarrier	NPC_HIDDEN,5,0,{
+    end;
+
+OnTouch:
+    if (!SaggySealCheck()) {
+        slide 93, 106;
+        end;
+    }
+    .@q=getq(HurnscaldQuest_Sagratha);
+    .@q3=getq3(HurnscaldQuest_Sagratha);
+
+    // Magic Number
+    if (.@q3 == 7) {
+        npctalk3 l("The seals having been broken, the barrier was weakened! You did it! The path is now open!");
+        setq1 HurnscaldQuest_Sagratha, 4;
+        setq3 HurnscaldQuest_Sagratha, 0;
+        slide 93, 106;
+    } else {
+        getmapxy(.@m$, .@x, .@y, 0);
+        slide .@x, .@y-3;
+        dispbottom l("A powerful magic barrier repels you!");
+        addtimer(200, "Dog Statue#Saggy::OnDialog");
+    }
+    end;
+
+}
+
-- 
cgit v1.2.3-60-g2f50