// ji.c 疾電#include <ansi.h>inherit F_SSERVER;int perform(object me, object target){        mapping prepare;        string msg;        int skill;        int delta;        int i;        if (! target)        {                me->clean_up_enemy();                target = me->select_opponent();        }        if (! me->is_fighting(target))                return notify_fail("「疾電」只能對戰斗中的對手使用。\n");        if (me->query_skill_prepared("claw") != "yunlong-zhua")                return notify_fail("你沒有準備使用凝血神爪，無法施展「疾電」。\n");        skill = me->query_skill("yunlong-zhua", 1); 	if( (int)me->query_skill("yunlong-shengong", 1) < 150 )		return notify_fail("你的云龍神功不夠高。\n");        if (skill < 250)                return notify_fail("你的凝血神爪修為有限，無法使用「疾電」！\n");        if (me->query_skill("force") < 250)                return notify_fail("你的內功火候不夠，難以施展「疾電」！\n");        if (me->query("max_neili") < 2000)                return notify_fail("你的內力修為沒有達到那個境界，無法運轉內力形成「疾電」！\n");        if (me->query("neili",1) < 500)                return notify_fail("你的真氣不夠，現在無法施展「疾電」！\n");        if (me->query_temp("weapon"))                return notify_fail("你必須是空手才能施展「疾電」！\n");       if (! living(target))              return notify_fail("對方都已經這樣了，用不著這么費力吧？\n");        msg = HIR "$N" HIR "仰天一聲長嘯，飛身躍起，雙爪幻出漫天爪影，氣勢恢弘，\n宛如疾電一般籠罩$n" HIR "各處要穴！\n" NOR;        message_combatd(msg, me, target);        me->add("neili", -300);        target->add_temp("apply/attack", 60);        target->add_temp("apply/dodge", 60);        for (i = 0; i < 7; i++)        {                if (! me->is_fighting(target))                        break;                if (random(3) == 1 && ! target->is_busy())                        target->start_busy(1);                COMBAT_D->do_attack(me, target, 0, 0);        }        target->add_temp("apply/attack", -60);        target->add_temp("apply/dodge", -60);        me->start_busy(2);        return 1;}