From 7db84053b350e028196d81e537dcc509f02008e5 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Mon, 21 Oct 2019 13:19:39 -0300
Subject: Rewrite Zarkor skill

---
 npc/functions/hub.txt |  3 +++
 npc/magic/zarkor.txt  | 14 ++++++++++++++
 2 files changed, 17 insertions(+)

(limited to 'npc')

diff --git a/npc/functions/hub.txt b/npc/functions/hub.txt
index d83c30c65..aa5265b32 100644
--- a/npc/functions/hub.txt
+++ b/npc/functions/hub.txt
@@ -193,6 +193,9 @@ function	script	HUB_SkillInvoke	{
         //case TMW2_SPEECH:
             UserCtrlPanel();
             break;
+        case TMW2_ZARKOR:
+            SK_zarkor();
+            break;
     }
 
     // Debug
diff --git a/npc/magic/zarkor.txt b/npc/magic/zarkor.txt
index 64d86d70c..b205fcf92 100644
--- a/npc/magic/zarkor.txt
+++ b/npc/magic/zarkor.txt
@@ -6,6 +6,17 @@
 // Spawns a Cave Maggot.
 // This is to test stuff, more than to create anything really.
 
+function	script	SK_zarkor	{
+    // Set skill
+    @sk=TMW2_ZARKOR;
+
+    // Summon Magic
+    SummonMagic(@sk, CaveMaggot, 2, @skillLv);
+
+    // Get a single mana experience point (this is NOT used by Mana Stone)
+    GetManaExp(@sk, 1);
+    return;
+}
 
 -	script	sk#zarkor	32767,{
     end;
@@ -17,6 +28,9 @@ OnFriendlyDeath:
 */
 
 OnCall:
+    // Deprecated
+    end;
+
     // Other requeriments
     if (countitem(ZarkorScroll) < 1) {
         dispbottom l("You need @@ to cast this skill.", getitemlink(ZarkorScroll));
-- 
cgit v1.2.3-60-g2f50