From 8875cef958add4b361300c1ba108d8bf1d7995d7 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Thu, 20 Jan 2022 02:46:20 +0000
Subject: Christmas 2021 Cleanup

Contains several other bugfixes and improvements

- The Mana World Team's Chairman
- Fix Terogan Fight
- Poppet's Battle Chamber (inactive)
- `@setcells` and `@delcells`
- Fix Graveyard Ghosts
- Jande skill (inactive)
---
 npc/commands/kami.txt | 32 +++++++++++++++++++++++++++++++-
 1 file changed, 31 insertions(+), 1 deletion(-)

(limited to 'npc/commands/kami.txt')

diff --git a/npc/commands/kami.txt b/npc/commands/kami.txt
index 1211fae0..8a7622d2 100644
--- a/npc/commands/kami.txt
+++ b/npc/commands/kami.txt
@@ -26,7 +26,35 @@ OnServMsg:
     }
     end;
 
+OnSetCells:
+    if (!is_admin() && strcharinfo(0) != "Hi=)") end;
+    if (getarraysize(.@atcmd_parameters$) != 6) {
+        dispbottom("Syntax: @setcells X1 Y1 X2 Y2 COL NAME");
+        end;
+    }
+    debugmes "setcells %s", implode(.@atcmd_parameters$, " ");
+    .@x1 = atoi(.@atcmd_parameters$[0]);
+    .@y1 = atoi(.@atcmd_parameters$[1]);
+    .@x2 = atoi(.@atcmd_parameters$[2]);
+    .@y2 = atoi(.@atcmd_parameters$[3]);
+    .@cl = atoi(.@atcmd_parameters$[4]);
+    .@n$ = .@atcmd_parameters$[5];
+    setcells getmap(), .@x1, .@y1, .@x2, .@y2, .@cl, .@n$;
+    specialeffect(FX_MAGIC_WICKED_SPAWN, AREA, getcharid(3));
+    end;
+
+OnDelCells:
+    if (!is_admin() && strcharinfo(0) != "Hi=)") end;
+    debugmes "delcells %s", implode(.@atcmd_parameters$, " ");
+    delcells implode(.@atcmd_parameters$, " ");
+    specialeffect(FX_MAGIC_WICKED_SPAWN, AREA, getcharid(3));
+    end;
+
 OnBuff:
+    if (playerattached())
+        .@n$ = strtoupper(strcharinfo(0));
+    else
+        .@n$ = "THE MANA TREE";
     // Disabled command, used for debug purposes
     .@c = getunits(BL_PC, .@players, MAX_CYCLE_PC);
     for (.@i = 0; .@i < .@c; .@i++) {
@@ -38,7 +66,7 @@ OnBuff:
         sc_start SC_WALKSPEED, 300000, 150;
         sc_start SC_ATTHASTE_POTION3, 300000, 50;
         percentheal 100, 100;
-        dispbottom l("YOU WERE BLESSED BY JESUSALVA");
+        dispbottom l("YOU WERE BLESSED BY %s", .@n$);
         dispbottom l("YOU CAN FEEL THE POWER FLOWING TROUGH YOU.");
         detachrid();
     }
@@ -62,6 +90,8 @@ OnInit:
     bindatcmd "blessing", "@k::OnBuff", 99, 100, 1;
     bindatcmd "instcheck", "@k::OnInstCheck", 99, 100, 1;
     bindatcmd "instdestr", "@k::OnInstDestroy", 99, 100, 1;
+    bindatcmd "delcells", "@k::OnDelCells", 60, 100, 1;
+    bindatcmd "setcells", "@k::OnSetCells", 60, 100, 1;
     end;
 }
 
-- 
cgit v1.2.3-60-g2f50