summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--npc/commands/kami.txt12
-rw-r--r--npc/functions/hub.txt1
2 files changed, 13 insertions, 0 deletions
diff --git a/npc/commands/kami.txt b/npc/commands/kami.txt
index f5ab1423c..8cb21bbea 100644
--- a/npc/commands/kami.txt
+++ b/npc/commands/kami.txt
@@ -83,12 +83,24 @@ OnChamp:
closeclientdialog;
end;
+OnHarm:
+ harm(getcharid(3), 500, 1);
+ end;
+
+OnHarm2:
+ .@id=getcharid(3);
+ detachrid();
+ harm(.@id, 500, 1);
+ end;
+
OnInit:
bindatcmd "k", "@k::OnCall", 60, 80, 1;
bindatcmd "servmsg", "@k::OnServMsg", 80, 99, 1;
bindatcmd "blessing", "@k::OnBuff", 99, 100, 1;
bindatcmd "champ", "@k::OnChamp", 99, 100, 0;
+ bindatcmd "harm", "@k::OnHarm", 80, 80, 1;
+ bindatcmd "cruelty", "@k::OnHarm2", 99, 99, 1;
bindatcmd "instcheck", "@k::OnInstCheck", 99, 100, 1;
bindatcmd "instdestr", "@k::OnInstDestroy", 99, 100, 1;
diff --git a/npc/functions/hub.txt b/npc/functions/hub.txt
index 970d7d5a4..b1e34f5b1 100644
--- a/npc/functions/hub.txt
+++ b/npc/functions/hub.txt
@@ -289,6 +289,7 @@ function script HUB_SkillInvoke {
case TMW2_JUDGMENT:
debugmes "Target: %d (%d,%d)", @skillTarget, @skillTargetX, @skillTargetY;
areasc2(getmap(), @skillTargetX, @skillTargetY, 2, 10000, SC_BLOODING, BL_MOB|BL_PC);
+ harm(@skillTarget, 1000, 1);
break;
case TMW2_PARUM:
SK_parum();