#include <ansi.h>#include <combat.h>#define FEI "「" HIY "飛龍在天" NOR "」"inherit F_SSERVER;int perform(object me, object target){        string msg;        int ap, dp;        int i, count;        if (! target) target = offensive_target(me);        if (! target || ! me->is_fighting(target))                return notify_fail(FEI "只能對戰斗中的對手使用。\n");        if (me->query_temp("weapon") || me->query_temp("secondary_weapon"))                return notify_fail(FEI "只能空手使用。\n");        if ((int)me->query_skill("xianglong-zhang", 1) < 150)                return notify_fail("你降龍十八掌火候不夠，難以施展" FEI "。\n");        if ((int)me->query_skill("force") < 300)                return notify_fail("你的內功修為不夠，難以施展" FEI "。\n");        if ((int)me->query("max_neili") < 3000)                return notify_fail("你的內力修為不夠，難以施展" FEI "。\n");        if ((int)me->query("neili") < 500)                return notify_fail("你現在的真氣不足，難以施展" FEI "。\n");        if (! living(target))                return notify_fail("對方都已經這樣了，用不著這么費力吧？\n");        msg = HIY "$N" HIY "施出降龍十八掌「" HIW "飛龍在天"              HIY "」，雙掌翻滾，宛如一條神龍攀蜒于九天之上"              "。\n" NOR;          ap = me->query("combat_exp", 1);        dp = target->query("combat_exp", 1);        if (ap / 2 + random(ap) > dp)        {                msg += HIR "$n" HIR "面對$N" HIR "這排山倒海般的攻"                       "勢，完全無法抵擋，招架散亂，連連退后。\n" NOR;                count = me->query_skill("xianglong-zhang",1) / 20;        } else        {                msg += HIC "$n" HIC "心底微微一驚，心知不妙，急忙"                       "凝聚心神，竭盡所能化解$N" HIC "數道掌力。\n" NOR;                count = 0;        }        message_combatd(msg, me, target);        me->add_temp("apply/attack", count);        me->add_temp("apply/damage", 300);        for (i = 0; i < 6; i++)        {                if (! me->is_fighting(target))                        break;                if (random(5) < 2 && ! target->is_busy())                        target->start_busy(2);                COMBAT_D->do_attack(me, target, 0, 0);        }        me->add("neili", -300);        me->start_busy(2);        me->add_temp("apply/attack", -count);        me->add_temp("apply/damage", -300);        return 1;}