Zarkor, the Dark Invocator Quest, Prologue

5 files changed, 105 insertions, 0 deletions

diff --git a/db/constants.conf b/db/constants.conf
index bedd5e165..2d9ba7561 100644
--- a/db/constants.conf
+++ b/db/constants.conf
@@ -3932,6 +3932,7 @@ constants_db: {
     NPC_CONSTR_WORKER:      180
 
     NPC_JOURNALMAN:         309
+    NPC_MIRAJ:              323
 
     // Animated NPCs
     NPC_CONFUSED_TREE:      400
diff --git a/db/quest_db.conf b/db/quest_db.conf
index 14eca2cd4..9aab8c39e 100644
--- a/db/quest_db.conf
+++ b/db/quest_db.conf
@@ -176,6 +176,10 @@ quest_db: (
     Id: 59
     Name: "TulimsharQuest_Sailors"
 },
+{
+    Id: 60
+    Name: "TulimsharQuest_DarkInvocator"
+},
 
 // ID 71 to 90: Halinarzo Quests
 {
diff --git a/db/re/item_db.conf b/db/re/item_db.conf
index 10e51c31b..2daf2ec84 100644
--- a/db/re/item_db.conf
+++ b/db/re/item_db.conf
@@ -4091,6 +4091,17 @@ item_db: (
 	Refine: false
 	BuyingStore: true
 },
+{
+	Id: 874
+	AegisName: "EverburnPowder"
+	Name: "Everburn Powder"
+	Type: "IT_ETC"
+	Buy: 50000
+	Sell: 850
+	Weight: 100
+	Refine: false
+	BuyingStore: true
+},
 //	 <!-- Necklaces -->
 {
 	Id: 1000
diff --git a/npc/007-1/_import.txt b/npc/007-1/_import.txt
index 68eeed9ae..39dee50ca 100644
--- a/npc/007-1/_import.txt
+++ b/npc/007-1/_import.txt
@@ -5,3 +5,4 @@
 "npc/007-1/dracoula.txt",
 "npc/007-1/pylon.txt",
 "npc/007-1/tycoon.txt",
+"npc/007-1/zarkor.txt",
diff --git a/npc/007-1/zarkor.txt b/npc/007-1/zarkor.txt
new file mode 100644
index 000000000..cbc9d2657
--- /dev/null
+++ b/npc/007-1/zarkor.txt
@@ -0,0 +1,88 @@
+// TMW2 Script
+// Author: 
+//  Crazyfefe
+//  Jesusalva
+// Description:
+//  Dark Invocator Quest
+
+007-1,152,155,0	script	Zarkor	NPC_MIRAJ,{
+    .@q=getq(TulimsharQuest_DarkInvocator);
+    if (BaseLevel <= 30)
+        goto L_Weak;
+    switch (.@q) {
+        case 0:
+            goto L_Start;
+            break;
+        case 1:
+            mesn "Zarkor, the Dark Summoner";
+            mesq l("Talk to Zitoni, the Alchemist of Candor. He may look humble, but he is the greatest alchemist of this world. I need five @@.", getitemlink(EverburnPowder));
+            close;
+            break;
+    }
+    mesn;
+    mesq l("One day... One day! ONE DAY I'LL GET REVENGE ON YOU, MONSTER KING!");
+    close;
+
+L_Weak:
+    mesn;
+    mesq lg("Stay out of harm way. Nothing to see here. Stay away, pathetically weak human.");
+    close;
+
+L_Start:
+    mesn;
+    mesq l("Hey... You... Come here.");
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("I am Zarkor, the Dark Summoner. I want to do a dark summoning ritual, but there are strings attached.");
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("I need to buy your silence. I'll reward you greatly when I'm done. But first, I need to know if you'll be loyal to me.");
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("To prove me your faith, bring me 1 @@ or 1 @@.",getitemlink(Ruby),getitemlink(Topaz));
+    mesq l("Such precious gem, is not something you would give for free, unless you are interested on my... rituals.");
+    next;
+    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 bright topaz.");
+
+    mes "";
+    switch (@menu) {
+        case 1:
+            mesn;
+            mesq l("Very well. This conversation never happened.");
+            next;
+            mesn;
+            mesq l("But if you regret this choice later... You know where you can find me.");
+            close;
+            break;
+        case 2:
+            delitem Ruby, 1;
+            setq TulimsharQuest_DarkInvocator, 1;
+            break;
+        case 3:
+            delitem Topaz, 1;
+            setq TulimsharQuest_DarkInvocator, 1;
+            break;
+    }
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("Very well. I shall now share with you the details of this rite.");
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("I will summon the Monster King. Don't ask me my reasons. I know this will put Tulimshar in danger. But I will still do it.");
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("For that, I need to light five torches. The pentagram, the magic, and all the else are with me. Just light the torches.");
+    next;
+    mesn "Zarkor, the Dark Summoner";
+    mesq l("Talk to Zitoni, the Alchemist of Candor. He may look humble, but he is the greatest alchemist of this world. I need five @@.", getitemlink(EverburnPowder));
+    close;
+
+OnInit:
+    .sex = G_MALE;
+    .distance = 6;
+    end;
+
+}