Dark Invocator Quest, completed, staging.

1 files changed, 26 insertions, 2 deletions

diff --git a/npc/007-1/zarkor.txt b/npc/007-1/zarkor.txt
index 048342ad1..5f328cde6 100644
--- a/npc/007-1/zarkor.txt
+++ b/npc/007-1/zarkor.txt
@@ -160,15 +160,39 @@ L_Ritual:
     mesn "Zarkor, the Dark Summoner";
     mes col("Zarkor starts a weird chant.", 9);
     next;
-    specialeffect(312);
+    specialeffect(52);
     mesn "Zarkor, the Dark Summoner";
     mesq l("MONSTER KING, APPEAR TO ME!");
     next;
+    mesn "MONSTER KING";
+    mes col("...Foolish human... Do you really think I will attend your summon?", 1);
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("But... But! Where are you?! That summon ritual is equivalent to GM magic!");
+    next;
+    mesn "MONSTER KING";
+    mes col("And who do you think that created GM Magic in first place, inexperienced kid?", 1);
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("You... You killed my father during Nivalis siege! I'll make you pay for that!!");
+    next;
+    mesn "MONSTER KING";
+    mes col("You humans are too greedy... Just like me. I have more important things to do, other than waste time with you.", 1);
+    next;
+    mesn "MONSTER KING";
+    mes col("Zarkor, fell a small taste of my power. That is nothing. If you can't handle that, you're not even near my lowest lieutenant.", 1);
+    mes col("And you got help from a kid, Zarkor? Luck is that kid, that I don't time to deal with them. Farewell.", 1);
+    next;
+    specialeffect(312);
+    mesn "Zarkor, the Dark Summoner";
+    mes l("GAAAAAAAAAAAAAAAAHHHHHHH!");
+    next;
     goto L_Finish;
 
 
 
 L_Finish:
+    setq TulimsharQuest_DarkInvocator, 7;
     // These values were taken from Experience table, and are magic numbers
     getexp 9174, 412;
     // Pay roughly what you spent
@@ -190,7 +214,7 @@ OnMonster:
     end;
 
 OnPCDieEvent:
-    if (getq(TulimsharQuest_DarkInvocator) == 5)
+    if (getq(TulimsharQuest_DarkInvocator) == 5 || getq(TulimsharQuest_DarkInvocator) == 6)
         setq2 TulimsharQuest_DarkInvocator, 0;
     end;