yi.c

C实现的MUD,对大家基本入门网络游戏很有帮助!

// yi.c 百花错易

#include <ansi.h>
#include <combat.h>

#define YI "「" HIW "百花错易" NOR "」"

inherit F_SSERVER;
 
int perform(object me, object target)
{
        string msg;
        int ap, dp;
        int count;
        int i;
 
        if (! target)
        {
                me->clean_up_enemy();
                target = me->select_opponent();
        }


        if (! target || ! me->is_fighting(target))
                return notify_fail(YI "只能对战斗中的对手使用。\n");
 
        if (me->query_temp("weapon") || me->query_temp("secondary_weapon"))
                return notify_fail(YI "只能空手施展。\n");
                
        if (me->query("max_neili") < 3000)
                return notify_fail("你的内力的修为不够，现在无法使用" YI "。\n");

        if ((int)me->query_skill("force") < 280)
                return notify_fail("你的内功火候不足，无法使用" YI "。\n");

        if ((int)me->query_skill("baihua-cuoquan", 1) < 150)
                return notify_fail("你的百花错拳火候不够，无法使用" YI "。\n");
 	if( (int)me->query_skill("yunlong-shengong", 1) < 100 )
		return notify_fail("你的云龙神功不够高。\n");
        if (me->query_skill_prepared("unarmed") != "baihua-cuoquan")
                return notify_fail("你现在没有准备使用百花错拳，无法使用" YI "。\n");

        if ((int)me->query("neili") < 500)
                return notify_fail("你的真气不够，无法运用" YI "。\n");

        if (! living(target))
                return notify_fail("对方都已经这样了，用不着这么费力吧？\n");

        msg = HIW "$N" HIW "大喝一声，双掌纷飞，擒拿手中夹着鹰爪功，左手查"
              "拳，右手绵掌。\n攻出去是八卦掌，收回时已是太极拳，\n诸家杂陈，"
              "毫无规律，铺天盖地向$n" HIW "狂涌而去。\n" NOR;

        ap = me->query_skill("unarmed") + me->query("str") * 10;
        dp = target->query_skill("parry") + target->query("dex") * 10;

        if (ap / 2 + random(ap) > dp)
        {
                count = ap / 12;
                msg += HIR "$n" HIR "只见$P" HIR "运拳如奔，快拳缤纷递出，"
                       "顿感头晕目眩，不知该如何抵挡。\n" NOR;
        } else
        {
                msg += HIY "$n" HIY "只见$p" HIY "运拳如奔，快拳缤纷递出，"
                       "连忙振作精神勉强抵挡。\n" NOR;
                count = 0;
        }

        message_vision(msg, me, target);
        me->add_temp("apply/attack", count);

        me->add("neili", -300);

        for (i = 0; i < 8; 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->start_busy(2);
        me->add_temp("apply/attack", -count);

        return 1;
}