Incomplete, but I need to save pipelines

1 files changed, 44 insertions, 11 deletions

diff --git a/npc/007-1/zarkor.txt b/npc/007-1/zarkor.txt
index e1c903136..048342ad1 100644
--- a/npc/007-1/zarkor.txt
+++ b/npc/007-1/zarkor.txt
@@ -36,15 +36,18 @@
             break;
         case 5:
             mesn "Saulc, the Bug Master";
-            mesq l("Sorry, the script is broken again. Blame the usual that the torches are nowhere to be found.");
+            mesq col("What, are we really letting you do something so insane as summoning the Monster King?! Blame Saulc!!", 9);
             next;
-            mesn "Saulc, the Bug Master";
-            mesq l("Once that gets out of the way, this NPC will be finished. See you then!");
+            mesn "Zarkor, the Dark Summoner";
+            mesq l("You didn't lit every torch yet! Hurry up!!");
             close;
-            // Locations
-            // 166, 145
-            // 65, 116
-            // 
+            break;
+        case 6:
+            if (getq2(TulimsharQuest_DarkInvocator) == 0) {
+                setq TulimsharQuest_DarkInvocator, 4;
+                goto L_Quest;
+            }                
+            goto L_Ritual;
             break;
 
     }
@@ -74,8 +77,8 @@ L_Start:
     mesn strcharinfo(0);
     select
         l("Indeed. Sorry. I'm not giving you anything."),
-        rif(countitem(Ruby) >= 1, l("I swear silence, over this bloody ruby."),
-        rif(countitem(Topaz) >= 1, l("I swear silence, over this shining topaz.");
+        rif(countitem(Ruby) >= 1, l("I swear silence, over this bloody ruby.")),
+        rif(countitem(Topaz) >= 1, l("I swear silence, over this shining topaz."));
 
     mes "";
     switch (@menu) {
@@ -148,9 +151,24 @@ L_Quest:
     setq TulimsharQuest_DarkInvocator, 5;
     close;
 
-L_Finish:
-    // Yadda yadda yadda dialog
+L_Ritual:
+    percentheal 100, 0;
+    specialeffect(56);
+    mes col("Zarkor spills many fluids on the lake, with much concentration.", 9);
+    next;
+    specialeffect(56);
+    mesn "Zarkor, the Dark Summoner";
+    mes col("Zarkor starts a weird chant.", 9);
+    next;
+    specialeffect(312);
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("MONSTER KING, APPEAR TO ME!");
+    next;
+    goto L_Finish;
+
 
+
+L_Finish:
     // These values were taken from Experience table, and are magic numbers
     getexp 9174, 412;
     // Pay roughly what you spent
@@ -158,8 +176,23 @@ L_Finish:
     // (3000*5 + 4*500G + 1000 + 5*84 + 5*66 + 5*80 + 850) = 20.000
     Zeny=Zeny+20000;
 
+    mesn;
+    mesq l("*Ugh* Thanks for your help. Here... Take this, as promised.");
+    next;
+    mesn strcharinfo(0);
+    mesq l("Are you feeling well? That was a pretty powerful attack!");
+    next;
+    mesn;
+    mesq lg("Do not worry with me, youngling... I'll be fine.");
     close;
 
+OnMonster:
+    end;
+
+OnPCDieEvent:
+    if (getq(TulimsharQuest_DarkInvocator) == 5)
+        setq2 TulimsharQuest_DarkInvocator, 0;
+    end;
 
 OnInit:
     .sex = G_MALE;