Books of Warnings

3 files changed, 41 insertions, 2 deletions

diff --git a/maps/re/018-6-3.mcache b/maps/re/018-6-3.mcache
index 8adaa3869..64a38fa62 100644
--- a/maps/re/018-6-3.mcache
+++ b/maps/re/018-6-3.mcache
diff --git a/npc/018-6-0/main.txt b/npc/018-6-0/main.txt
index 8ea6a6644..25fe3d288 100644
--- a/npc/018-6-0/main.txt
+++ b/npc/018-6-0/main.txt
@@ -84,8 +84,11 @@ OnTouch:
     mesc l("@@ You need to wait further releases to continue this quest!", b(l("WARNING:"))), 1;
     close;
     }
-    // Execute the warp
-    warp BarbaraInstCheck(3), 31, 151;
+    // Execute the warp (randomly)
+    if (any(true,false))
+        warp BarbaraInstCheck(3), 31, 151;
+    else
+        warp BarbaraInstCheck(3), 145, 26;
     end;
 
 
diff --git a/npc/018-6-3/main.txt b/npc/018-6-3/main.txt
index ab6b66c5e..203916462 100644
--- a/npc/018-6-3/main.txt
+++ b/npc/018-6-3/main.txt
@@ -376,3 +376,39 @@ OnInstanceInit:
     end;
 }
 
+018-6-3,34,148,0	script	Book#01863A	NPC_NO_SPRITE,{
+    if (!getskilllv(TMW2_ANCIENTLANGUAGES)) {
+        mesn strcharinfo(0);
+        mesc l("It's written in an ancient language, you cannot understand what's written.");
+        mesc l("The symbols at the end of the book look to be warnings, though.");
+        mesc l("I should check if I have more than enough potions and food before proceeding!");
+        mesc l("REMEMBER: FAILURE AT FINAL BOSS FIGHT WILL CAUSE QUEST TO RESET!"), 1;
+        close;
+    }
+    mes ".:: " + l("Orbyter Shrine") + " ::.";
+    mes l("This shrine is devoted to those whom shall never come back.");
+    mes l("Deep sorrow and sadness, this is the Forgotten Shrine.");
+    mes "";
+    mes l("To the wanderer: Please avoid entering on the rooms by the internal warp system.");
+    mesc l("Dangerous guardians will be summoned, so be ready for several difficult fights straight in a row!"), 1;
+    mes l("In memoriam. May those whom shall never come back find rest in their afterlifes."); // TRANSLATORS: IWS = Internal Warp System
+    mes l("May their journey be successful, may their objectives be attained, may the Mana rest in peace.");
+    mes "";
+    mes l("The Mana Guardian,");
+    //mes "MEE6 the Bot";
+    mesc "« "+l("It's too faint to read.")+" »";
+    if (!@warning) {
+        next;
+        @warning=true;
+        mesn strcharinfo(0);
+        mesc l("This shrine seems to be a dangerous place, and nobody should defile it.");
+        mesc l("I should check if I have more than enough potions and food before proceeding!");
+        mesc l("REMEMBER: FAILURE AT FINAL BOSS FIGHT WILL CAUSE QUEST TO RESET!"), 1;
+    }
+    close;
+
+OnInit:
+    .distance=3;
+    end;
+}
+