yumei.c

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

// 雨激梅花半瓣香 五展梅特殊技
// by hem
// yumei.c perform wuzhan-mei
#include <ansi.h>
inherit F_SSERVER;
int perform(object me, object target)
{      
       int damage;
       object weapon;
       object obj;
       string msg;
        if( !target ) target = offensive_target(me);
	if( !target || !target->is_character() )
	return notify_fail("「雨激梅花半瓣香」只能对对手使用。\n");

        if( (int)me->query("neili", 1) < 300 )
                return notify_fail("你现在内力太弱，不能使用「雨激梅花半瓣香」。\n");

	if(me->query_skill("wuzhan-mei")<100)
	return notify_fail("你的五展梅不够娴熟，不能运用「雨激梅花半瓣香」。\n");
	if (!objectp(weapon = me->query_temp("weapon"))
		|| (string)weapon->query("skill_type") != "sword")
		return notify_fail("你使用的武器不对。\n");

	if (!objectp(weapon = target->query_temp("weapon")))
	return notify_fail("对手并没有使用武器。\n");
	msg = HIC"$N手中剑斜斜一带，施展出「雨激梅花半瓣香」，轻飘飘压住$n的兵器！\n"NOR;
	me->start_busy(1);
	if( random( (int)me->query("combat_exp"))>random(target->query("combat_exp") ) )
	{
	msg +=HIC"只听得一阵金铁之声，$p的兵刃竟被$P震碎，碎屑如暴雨般反击向$p！\n" NOR;
	obj=target->query_temp("weapon");
	destruct(obj);
	damage = (int)me->query_skill("biyun-xinfa", 1);
                
                damage = damage + random(damage/2)+200;
                
                target->receive_damage("qi", damage);
                target->receive_wound("qi", damage);
                me->add("neili", -damage);
	if( damage < 120 )
                        msg += HIY"结果$n被激飞的兵器碎屑击中，受了点儿伤。\n"NOR;
       else if( damage < 140 )
                        msg += HIY"结果$n被激飞的兵器碎屑击中，受了些伤。\n"NOR;
        else if( damage < 180 )
                        msg += RED"结果$n被激飞的兵器碎屑击中，划出满身伤痕，其状甚惨！\n"NOR;
                else
                        msg += HIR"结果$n被激飞的兵器碎屑击中，浑身上下就如刺猬一般！\n"NOR;
                
	
        } 
	else {
	msg += "可是$p看破了$P的企图，并没有上当。\n" NOR;
	me->start_busy(2);
}
message_vision(msg, me, target);
return 1;
}