play.c

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

// play.c 奏“碧海潮生”曲

#include <ansi.h>

inherit F_CLEAN_UP;

int exert(object me, object target)
{
	object *ob;
	object weapon;
	int i, skill, damage;

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

//	if (!weapon = me->query_temp("weapon"))
//		return notify_fail("你要用什么来吹奏？\n");

//       if (!weapon->id("xiao"))
//		return notify_fail("你手里的兵器不是箫！\n");

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

	skill = me->query_skill("force");

	me->add("neili", -150);
	me->receive_damage("qi", 15);

	me->start_busy(3);
	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( !living(ob[i]) || ob[i]==me ) continue;
                if( !ob[i]->is_fighting(me) ) continue;
                if( ob[i]==me ) continue;
		if (skill / 2 + random(skill / 2) < (int)ob[i]->query("con") * 2) continue;

		if (!userp(ob[i]) || ob[i]->query("age") >= 16) {
			damage = skill - ((int)ob[i]->query("max_neili") / 8) + 10;
			if( damage > 0 ) {
				ob[i]->receive_damage("jing", damage * 2, me);
				if( (int)ob[i]->query("neili") < skill * 2)
					ob[i]->receive_wound("jing", damage, 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);
			}
		}
		else
			tell_object(ob[i], "你的年纪尚小，听了一阵，没有什么特别的感受。\n");
	}

	return 1;
}