// huan.c 血刀刀法「幻影」#include <ansi.h>inherit F_SSERVER;int perform(object me, object target){	object weapon;	string msg;	if (! target) target = offensive_target(me);	if (! target || ! me->is_fighting(target))		return notify_fail("血刀刀法「幻影」只能對(duì)戰(zhàn)斗中的對(duì)手使用。\n");	if (! objectp(weapon = me->query_temp("weapon")) ||            (string)weapon->query("skill_type") != "blade")		return notify_fail("你使用的武器不對(duì)。\n");	if (target->is_busy())		return notify_fail(target->name() + "目前正自顧不暇，放膽攻擊吧！\n");			if ((int)me->query_skill("xue-dao", 1) < 80)		return notify_fail("你的血刀刀法不夠嫻熟，不會(huì)使用「幻影」。\n");        if (me->query("neili") < 60)                return notify_fail("你現(xiàn)在真氣不夠，無(wú)法使用「幻影」。\n");        if (me->query_skill_mapped("blade") != "xue-dao")                return notify_fail("你沒(méi)有激發(fā)血刀刀法，不能使用「幻影」。\n");       if (! living(target))              return notify_fail("對(duì)方都已經(jīng)這樣了，用不著這么費(fèi)力吧？\n");	msg = HIR "$N" HIR "使出血刀刀法絕技，把手中的" +              weapon->name() + HIR "舞得飛快，幻起層層刀影逼向$n"              HIR "！\n";        me->add("neili", -50);	if (random(me->query("combat_exp")) > (int)target->query("combat_exp") / 2)        {		msg += HIR "結(jié)果$p" HIR "被$P" HIR "鬧個(gè)手忙腳亂，"                       "只能緊守門(mén)戶，不敢擅動(dòng)！\n" NOR;		target->start_busy((int)me->query_skill("blade") / 50 + 3);	} else        {		msg += "可是$p" HIR "看破了$P" HIR "的企圖，并"                       "不慌張，應(yīng)對(duì)自如。\n" NOR;		me->start_busy(1);	}	message_combatd(msg, me, target);	return 1;}