From 33a5b1981c53103f0fd6ef032d48d5556f838310 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sun, 1 Jul 2018 18:35:42 -0300
Subject: *Mwhahahahah* if it works, Evil @Saulc will be pleased...
 *mwhahahaahahah*

---
 db/re/skill_db.conf  | 10 +++++++++
 npc/magic/zarkor.txt | 63 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 npc/scripts.conf     |  3 +++
 3 files changed, 76 insertions(+)
 create mode 100644 npc/magic/zarkor.txt

diff --git a/db/re/skill_db.conf b/db/re/skill_db.conf
index 4642154de..7675593b3 100644
--- a/db/re/skill_db.conf
+++ b/db/re/skill_db.conf
@@ -38334,6 +38334,16 @@ skill_db: (
 		Passive: true
 	}
 },
+// 20022 end of Evol Reserved Space
+{
+	Id: 20023
+	Name: "TMW2_ZARKOR"
+	Description: "Summon Cave Maggot"
+	MaxLevel: 1
+	SkillType: {
+		Self: true
+	}
+},
 {
 	Id: 20031
 	Name: "TMW2_FAKESKILL"
diff --git a/npc/magic/zarkor.txt b/npc/magic/zarkor.txt
new file mode 100644
index 000000000..00fa109c3
--- /dev/null
+++ b/npc/magic/zarkor.txt
@@ -0,0 +1,63 @@
+// TMW2 script
+// Author: Jesusalva <admin@tmw2.org>
+//
+// Magic Script: TMW2_ZARKOR
+// 
+// Spawns a Cave Maggot.
+
+
+-	script	sk#zarkor	32767,{
+    end;
+
+OnNone:
+    end;
+
+OnCall:
+    // PRE EXECUTION
+    // Check Skill
+    if (getskilllv(TMW2_ZARKOR) < 1)
+        end;
+
+    // Check cooldown
+    if (@skzarkor_cooldown > gettimetick(0))
+        end;
+
+    // Check mana
+    if (Sp < 400)
+        end;
+
+    // Other requeriments
+    if (countitem(ZarkorScroll) < 1)
+        end;
+
+    // EXECUTION
+    // Apply costs
+    heal 0, -400;
+
+    // Cause effect
+    getmapxy(.@map$,.@x,.@y,0);
+    monster(.@map$, .@x, .@y, "Summoned Monster", CaveMaggot, 1, "sk#zarkor::OnNone", Size_Medium, 1);
+    /*
+<size> can be:
+	Size_Medium = medium (default)
+	Size_Small = small
+	Size_Large = big
+
+<ai> can be:
+	0 = none (default)
+	1 = attack/friendly
+	2 = sphere (Alchemist skill)
+	3 = flora (Alchemist skill)
+	4 = zanzou (Kagerou/Oboro skill)
+
+    */
+
+    // POST EXECUTION
+    // set cooldown
+    @skzarkor_cooldown=gettimetick(0)+20;
+    end;
+
+OnInit:
+    bindatcmd "sk-zarkor", "sk#zarkor::OnCall", 0, 100, 0;
+    end;
+}
diff --git a/npc/scripts.conf b/npc/scripts.conf
index edb00633e..69261c6a9 100644
--- a/npc/scripts.conf
+++ b/npc/scripts.conf
@@ -75,5 +75,8 @@
 // config script
 "npc/config/hairstyle_config.txt",
 
+// Magic Commands
+"npc/magic/zarkor.txt",
+
 // Maps specific scripts
 @include "npc/_import.txt"
-- 
cgit v1.2.3-60-g2f50