The chasm at Sagratha's Cave is really difficult!

2 files changed, 101 insertions, 8 deletions

diff --git a/npc/015-8/_mobs.txt b/npc/015-8/_mobs.txt
index 697217687..843eed780 100644
--- a/npc/015-8/_mobs.txt
+++ b/npc/015-8/_mobs.txt
@@ -1,9 +1,9 @@
 // This file is generated automatically. All manually added changes will be removed when running the Converter.
 // Map 015-8: Ancient Hideout mobs
-015-8,99,99,69,81	monster	Mouboo	1023,32,20000,20000
-015-8,114,95,51,69	monster	Robin Bandit	1153,16,20000,20000
-015-8,89,140,62,30	monster	Angry Yellow Slime	1198,12,20000,20000
+015-8,99,99,69,81	monster	Mouboo	1023,32,30000,30000
+015-8,114,95,51,69	monster	Robin Bandit	1153,16,30000,30000
+015-8,89,140,62,30	monster	Angry Yellow Slime	1198,12,30000,30000
 015-8,97,57,62,46	monster	Old Snake	1199,12,20000,20000
-015-8,67,94,34,79	monster	Red Slime	1092,12,20000,20000
-015-8,100,56,48,36	monster	Vampire Bat	1063,14,30000,22000
-015-8,103,95,69,81	monster	Cave Maggot	1027,24,20000,20000
+015-8,67,94,34,79	monster	Red Slime	1092,12,30000,30000
+015-8,100,56,48,36	monster	Vampire Bat	1063,14,27000,22000
+015-8,103,95,69,81	monster	Cave Maggot	1027,24,30000,30000
diff --git a/npc/015-8/puzzle.txt b/npc/015-8/puzzle.txt
index 902fcc264..c8c5f6030 100644
--- a/npc/015-8/puzzle.txt
+++ b/npc/015-8/puzzle.txt
@@ -10,8 +10,101 @@
 015-8,120,158,0	script	#SaggyPuzzleChasm	NPC_HIDDEN,0,4,{
     end;
 OnTouch:
-    npctalk3 l("A huge chasm you cannot cross.");
-    end;
+    do {
+        if (@saggychasmok) {
+            slide 125, 160;
+            closedialog;
+            end;
+        }
+
+        mesc l("There is a chasm.");
+        select
+            l("Drop a coin to hear how deep it is"),
+            l("Climb on the walls!"),
+            l("Run and try jumping it!"),
+            l("Build a bridge with wooden logs!"),
+            l("Uhh... I'm scared!");
+        mes "";
+        switch (@menu) {
+        case 1:
+            if (!Zeny) {
+                mesc l("You don't have money.");
+            } else {
+                Zeny-=1;
+                mesc l("You throw a coin on the chasm.");
+                next;
+                mesc l("... ... ...");
+                next;
+                mesc l("You don't hear anything. This chasm must be incredibly deep.");
+                next;
+                mesc l("Falling means certain death.");
+            }
+            break;
+        // Let's climb the wall!
+        case 2:
+            if (readparam(bStr) < 20 || (!countitem(MinerGloves) && !countitem(LeatherGloves))) {
+                mesc l("You don't have proper equipment for it.");
+            } else {
+                mesc l("Taking your sturdy glove, you attempt to walk by the wall! You are betting your life on it!");
+                next;
+                mesc l("A stone seemed to be loose, but you barely managed to avoid falling!");
+                next;
+                mesc l("This is difficult, but you are giving your best!!");
+                next;
+                mesc l("You are close... You are almost there!");
+                next;
+                // We get a bit more than 50% - we take 60%, so your chances are
+                // higher than jumping... But you need two stats, instead of one!
+                // (Top will be 120 instead of 100 - thus, 720 out of 640)
+                .@ponderate=(readparam(bStr)+readparam(bVit))/100*60;
+                if (rand(0,1000) < 640-(.@ponderate*6)) {
+                    mesc l("But unfortunately, a loose stone lodges and you fall to your death."), 1;
+                    percentheal -100, -100;
+                    close;
+                }
+                mesc l("You succeed in crossing the chasm!");
+                @saggychasmok=true;
+            }
+            break;
+        // Let's run it!
+        case 3:
+            if (readparam(bAgi) < 20 || Weight > 1500) {
+                mesc l("You don't have enough agility / is carrying too much to attempt it.");
+            } else {
+                mesc l("You'll give your best and attempt to run!");
+                next;
+                mesc l("You take distance and...");
+                next;
+                mesc l("YOU JUMP FOR ALL IT IS WORTH!!");
+                // (You can always fall as top is 600 of 640)
+                if (rand(0,1000) < 640-(readparam(bAgi)*6)) {
+                    mesc l("But unfortunately, it was harder than you thought. You are dead."), 1;
+                    percentheal -100, -100;
+                    close;
+                }
+                mesc l("You succeed in crossing the chasm!");
+                @saggychasmok=true;
+            }
+            break;
+        // Let's make a bridge!
+        case 4:
+            if (countitem(WoodenLog) < 5 || !getskilllv(TMW2_CRAFT)) {
+                mesc l("You don't have enough wood (5 @@) or crafting skills to do it.", getitemlink(WoodenLog));
+            } else {
+                mesc l("...");
+                next;
+                mesc l("After hours of hard work...");
+                next;
+                mesc l("You succeed in crossing the chasm!");
+                @saggychasmok=true;
+            }
+            break;
+        default:
+            close;
+        }
+        next;
+    } while (true);
+    close;
 }
 
 015-8,124,158,0	script	#SaggyPuzzleChasmSkip	NPC_HIDDEN,0,4,{