drift_sense.old

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

// drift_sense.c

#include <ansi.h>

//inherit SSERVER;

int conjure(object me, object target)
{
	if( me->is_fighting() )
		return notify_fail("战斗中无法使用游识神通！\n");
	if( me->query("jingli") < 75 )
		return notify_fail("你的精力不够！\n");
	if( target )
		return notify_fail("游识神通只能对自己使用！\n");
	write("你要移动到哪一个人身边？");
	input_to( (: call_other, __FILE__, "select_target", me :));
	return 1;
}

void select_target(object me, string name)
{
	object ob;

	if( !name || name=="" ) {
		write("中止施法。\n");
		return;
	}

	ob = find_player(name);
	if( !ob || !me->visible(ob) || wizardp(ob) )
		ob = find_living(name);
	if( !ob || !me->visible(ob) || wizardp(ob) ) {
		write("你无法感受到这个人的精力 ....\n");
		write("你要移动到哪一个人身边？");
		input_to( (: call_other, __FILE__, "select_target", me :));
		return;
	}
	if( me->is_fighting() ) {
		write("战斗中无法使用游识神通！\n");
		return;
	} else if( me->query("jingli") < 75 ) {
		write("你的精力不够！\n");
		return;
	}

	me->add("jingli", -75);
	me->receive_damage("jing", 30);
	
	message_vision( HIY "$N低头闭目，开始施展游识神通 ....\n" NOR, me);
	if( random(ob->query("max_jingli")) < (int)me->query("jingli") / 2 ) {
		write("你感受到对方的精力，但是不够强烈。\n");
		return;
	}
	if( random(me->query_skill("magic")) < (int)ob->query("jingli") / 50 ) {
		write("你因为不够熟练而失败了。\n");
		return;
	}
	message( "vision", HIY "\n一道耀眼的光芒忽然罩住" + me->name() 
		+ "，几秒钟後，光芒和人一齐消失得无影无踪！\n\n", environment(me), ({ me }) );
	me->move(environment(ob));
	message( "vision", HIY "\n你的眼前突然出现一团耀眼的光芒，光芒中浮现出一个人影！\n\n" NOR,
		environment(ob), ({ me }) );
}