wugou.c

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

// wugou.c 天下无狗
// shang 97/6

#include <ansi.h>

inherit F_SSERVER;

int perform(object me, object target)
{
        object weapon = me->query_temp("weapon");
	object *ob;
	int i, skill, damage;

	if (!objectp(weapon = me->query_temp("weapon"))
		|| (string)weapon->query("skill_type") != "staff")
			return notify_fail("你使用的武器不对。\n");

	if( (int)me->query("neili") < 2000 )
		return notify_fail("你内力不雄厚不能使用天下无狗攻击。\n");

	if( (int)me->query("neili") < 500 )
                return notify_fail("你现在没有足够的内力使用天下无狗。\n");


        if ((int)me->query("jing") < 100)
                return notify_fail("你现在没有足够的精力使用天下无狗。\n");

        if( (int)me->query_skill("dagou-bang", 1) < 200 )
                return notify_fail("你的打狗棒法火侯还没到，天下无狗使不出来。\n");

        if (me->query_skill("huntian-qigong", 1)<70)
                return notify_fail("你的本门内功火候未到，！\n");

	if( !me->is_fighting())
		return notify_fail("你不在打架，用这个做什么?\n");


	if( environment(me)->query("no_fight") )
		return notify_fail("在这里不能攻击他人。\n");

	skill = me->query_skill("dagou-bang", 1);

	me->add("neili", -300);
	me->receive_damage("jing", 20);

	me->start_busy(2);
	message_vision(
		HIY "$N使出「天下无狗」的第六变，刹时四面八方是棒，。\n" NOR, me);

	ob = all_inventory(environment(me));
	for(i=0; i<sizeof(ob); i++) {
		if( !living(ob[i]) || ob[i]==me ) continue;
                if( !ob[i]->is_fighting(me) ) continue;
                if( ob[i]==me ) continue;
	        if( !ob[i]->is_character() || ob[i]->is_corpse() ) continue;

                damage = (int)me->query_skill("dagou-bang", 1);
                damage = (int)me->query_skill("dagou-bang", 1) +damage;
                damage = random(damage)+500;
		if( damage > 2000 ) damage = 2001;
		ob[i]->receive_damage("qi", damage , me);
		ob[i]->receive_damage("jing", damage / 5 , me);
		tell_object(ob[i], "你觉得眼前一阵棒雨，挨了不少下。\n");	
		if( !me->is_killing(ob[i]) )
			me->fight_ob(ob[i]);

		if( !ob[i]->is_killing(me) )
			ob[i]->fight_ob(me);	        
	        }

	return 1;
}