tianwaifeiyin.c

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

// tianwaifeiyin.c 天外飞音
#include <ansi.h>
#include <skill.h>
#include <weapon.h>
#include <combat.h>

inherit F_SSERVER;
int perform(object me, object target)
{
	object *ob;
	int i, skill, damage;

	if( (int)me->query("neili") < 500 )
		return notify_fail("你的内力不够。\n");
	if(me->query_skill("art",1)<100)
		return notify_fail("你的琴术不够。\n");
	if(me->query_skill("xuantian-wuji",1)<100)
		return notify_fail("你的玄天无极功不够。\n");
//	if (! present("gu zheng", me))
//		return notify_fail("你弹什么？\n"); 
	skill = me->query_skill("force");

	me->add("neili", -500);
	me->receive_damage("qi", 10);

	if( environment(me)->query("no_fight") )
		return notify_fail("这里不能攻击别人! \n");
	me->receive_damage("qi", 10);

	me->start_busy(3);
	message_combatd(
        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;
		if(ob[i]->query_temp("no_kill")> 0 )
		{	tell_object(ob[i], HIC"你只觉听得心旷神怡，无比舒坦......\n"NOR);
			ob[i]->add("jing", 1);
		continue;
		}

		if(ob[i]->query("shen")> 0 )
		{	tell_object(ob[i], HIC"你只觉听得心旷神怡，无比舒坦......\n"NOR);
			ob[i]->add("jing", 1);
		continue;
		}
		
		damage = skill*2 - ((int)ob[i]->query("max_neili") / 10);
		if( damage > 0 ) {
			ob[i]->receive_damage("qi", damage * 2 );
			if( (int)ob[i]->query("neili") < (int)me->query("max_neili") )		{
			if( (int)ob[i]->query("max_neili") > 10 ){				
				ob[i]->add("max_neili", -5);
		}
			if( (int)ob[i]->query("max_jing") > 10 ){				
				ob[i]->add("max_jing", -5);
		}
		}
		if( !me->is_killing(ob[i]) )
			me->fight_ob(ob[i]);

		if( !ob[i]->is_killing(me) )
			ob[i]->fight_ob(me);
		tell_object(ob[i], HIR"你只觉听得心烦意乱，气血一阵翻腾，逆转到丹田......\n"NOR);
		}
	}

	return 1;
}