summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJesusaves <cpntb1@ymail.com>2020-05-22 11:30:50 -0300
committerJesusaves <cpntb1@ymail.com>2020-05-22 11:30:50 -0300
commit60b83a9e162a51f51152f2618ee1b7e7e2c29229 (patch)
treedc4110cb58a0f362e8ac4eb97428fa0a565a8a55
parent88b71969f69550261ae16a26c7cc3f634bab8bee (diff)
downloadserverdata-60b83a9e162a51f51152f2618ee1b7e7e2c29229.tar.gz
serverdata-60b83a9e162a51f51152f2618ee1b7e7e2c29229.tar.bz2
serverdata-60b83a9e162a51f51152f2618ee1b7e7e2c29229.tar.xz
serverdata-60b83a9e162a51f51152f2618ee1b7e7e2c29229.zip
Judgement: Inflicts BLOODING on area, harms target in 1000 HP
However, target may defend itself.
-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();