xi.c

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

// hua.c  化功大法 之 “化”字诀
// by Bbadboy

#include <ansi.h>

inherit F_SSERVER;

int perform(object me, object target)
{
        object weapon;
        int attackp, defendp;


        if( !target ) target = offensive_target(me);

        if( !target || !target->is_character() || !me->is_fighting(target) )
                return notify_fail("最温柔的一剑只能对战斗中的对手使用。\n");

        if( me->query_temp("sucked") )
                return notify_fail("你刚刚运过最温柔的一剑!\n");

        if((int)me->query_skill("chixin-qingchang-jian", 1) < 150)
                return notify_fail("你的痴心情长剑等级不够！\n");

        if (!objectp(weapon = me->query_temp("weapon")) 
        || (string)weapon->query("skill_type") != "sword")
                  return notify_fail("「温柔一剑」开始时必须有剑在手！\n");


        if( (int)me->query("neili",1) < 500 )
                return notify_fail("你的内力不够。\n");

        if( (int)target->query("max_neili") <= 100 )
                return notify_fail( target->name() + "他已经没有任何内力了！\n");

          message_vision( HIR "$N突然眼神变得极其温柔，手中宝剑轻轻的往前一送，剑刃向$n的不知什么部位飘去！\n" NOR,
                me, target );

        attackp = me->query_skill("force", 1) + me->query_skill("chixin-qingchang-jian", 1) + me->query_skill("sword", 1) / 2;
        defendp = target->query_skill("force") + target->query_skill("dodge");

        me->set_temp("sucked", 1);

        if( attackp / 2 + random(attackp) > defendp || !living(target) )
        {
                  message_vision(HIY "$p一时难以闪避，只得慌乱用双手将剑刃一夹,双手登时如被粘住一般的紧贴在剑刃上。。\n" NOR, me, target );
                tell_object(me, HIB "你见" + target->name() + "如此，当即运起北冥神功，将对方内力尽数吸来。。...\n" NOR);
                 message_vision(HIY "$p似乎想说什么，可是全身无力，现出极其痛苦的表情，双手却又抽脱不开。”\n" NOR, me, target );
                tell_object(
                        target, HIB "但觉手掌中微微一凉，内力源源不绝的顺着对方$w不住往外涌去。，\n" + 
                        "登时心中一惊，全然提不起真气收力，只得任对方吸取体内内力。。。\n" 
                        NOR);

                if( !target->is_killing(me) ) me->kill_ob(target);


                target->add("neili", -1*((int)me->query_skill("chixin-qingchang-jian", 1) + target->query("jiali")) );
                if ( target->query("neili") <1 ) target->set("neili",0);
                me->add("neili", (int)me->query_skill("chixin-qingchang-jian", 1) + target->query("jiali") );

                me->start_busy(7);
                target->start_busy(1 + random(7));
                me->add("neili", -200);

                call_out("del_sucked", 10, me);
        }
        else
        {       
                message_vision(HIY "可是$p看破了$P的企图，迅速地避开了这一剑。\n" NOR, me, target);
                me->start_busy(4);
                call_out("del_sucked", 17, me);
        }

        return 1;
}

void del_sucked(object me)
{
        if ( me->query_temp("sucked"))
        me->delete_temp("sucked");
}