#include <ansi.h>#include <combat.h>#define CHU "「" HIM "孤雁出群" NOR "」"inherit F_SSERVER;int perform(object me, object target){        int damage;        string msg;        int ap, dp;        if (! target) target = offensive_target(me);        if (! target || ! me->is_fighting(target))                return notify_fail(CHU "只能對戰斗中的對手使用。\n");        if (me->query_temp("weapon") || me->query_temp("secondary_weapon"))                return notify_fail(CHU "只能空手施展。\n");        if ((int)me->query_skill("tongbi-zhang", 1) < 80)                return notify_fail("你通臂六合掌不夠嫻熟，難以施展" CHU "。\n");        if (me->query_skill("force") < 80)                return notify_fail("你的內功修為不夠，難以施展" CHU "。\n");        if ((int)me->query("neili") < 120)                return notify_fail("你現在的真氣不夠，難以施展" CHU "。\n");        if (! living(target))                return notify_fail("對方都已經這樣了，用不著這么費力吧？\n");        ap = me->query("combat_exp");        dp = target->query("combat_exp");        msg = HIC "\n$N" HIC "騰空而起，施展出絕招「" HIM "孤雁出群" HIC "」，"              "\n猶如一只大雁臨空而下，雙掌猛地拍向$n" HIC "。\n" NOR;        if (ap / 2 + random(ap) > dp)        {                damage = (int)me->query_skill("strike", 1);                damage = damage+100+random(100);                         target->add("qi",-damage);		target->add("eff_qi",-damage);                msg +=HIR "但見$N" HIR "雙掌拍來，掌風作響，"                                           "當真迅捷無比。$n" HIR "頓覺心驚膽戰，"                                           "毫無招架之力，微作遲疑間$N" HIR "\n這掌"                                           "已正中$n" HIR "胸口，頓將$p震退數步。"                                           " \n" NOR;                me->start_busy(2);                me->add("neili", -80);        } else        {                msg = CYN "$n" CYN "見$N" CYN "這掌拍來，內力"                      "充盈，只得向后一縱，才躲過這一掌。\n" NOR;                me->start_busy(2);                me->add("neili", -100);        }        message_vision(msg, me, target);        return 1;}