miaoshou.c

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

// 妙手空空 by oldsix
//modify by ksusan 7/29/97 16:55

#include <ansi.h>

inherit F_SSERVER;
int perform(object me, object target)
{
	string msg;
	int k;
	object thing,*inv;
	if( !target ) target = offensive_target(me);

	if( !target || !target->is_character() || !me->is_fighting(target) )
	return notify_fail("妙手空空只能对战斗中的对手使用。\n");
        if (me->query_skill("huntian-qigong", 1)<120)
                return notify_fail("你的本门内功火候未到，！\n");
		
	if( (int)me->query_skill("begging",1)<80)
	return notify_fail("你的妙手空空不够娴熟，不会使用「妙手空空」。\n");
	if( (int)me->query_skill("xiaoyaoyou",1)<80)
	return notify_fail("你的本门身法不够敏捷，不能使用「妙手空空」。\n");
	if( (int)me->query_skill("checking",1)<80)
	return notify_fail("你的道听途说不够，不能使用「妙手空空」。\n");

	if( (int)me->query("neili")<200)
	return notify_fail("你现在内力太弱，不能使用「妙手空空」。\n");

	if(me->query("qi")<50)
	return notify_fail("你现在气不足，无法使用「妙手空空」。\n");
	if(me->query_temp("have_pfm"))
	return notify_fail("你刚展施完特殊招式，内息还没调整过来。\n");
	me->set_temp("have_pfm",1);
	msg = CYN "$N突然身形一展，使出「妙手空空」向$n怀中伸去！\n"NOR;
	k=me->query("oldsix_flag/tanyunshou");
	if(!k||k==0)	k=2;
	if(random(me->query("combat_exp"))>target->query("combat_exp")/3)	{
		
	me->add("neili",-random(100));
	me->add("qi",-20-random(50));
	me->start_busy(1);
	inv=all_inventory(target);
		if(!sizeof(inv))	{
			msg +=CYN"$n身上空空如也，$N什么也没「探」到！\n"NOR;
		}
		else	{
			thing=inv[random(sizeof(inv))];
		if( (thing->query("equipped"))
		|| (int)thing->query("no_get")
		|| (int)thing->query("no_drop")
		|| (int)thing->query("ownmake"))
		msg +=CYN"$n双手紧紧抓住"+thing->query("name")+"没让$N得逞！\n"NOR;
	else 	{
		if(thing->query("equipped"))	thing->unequip();
		thing->move(me);
		msg +=CYN"$N妙手空空，从$n身上得到"+thing->query("unit")+thing->query("name")+"！\n"NOR;
	}
			}
	} else 
		{
		me->add("neili",-5);
		me->start_busy(3);
		msg += CYN"可是$p看破了$P的企图，身形一晃闪了开去。\n"NOR;
		}
	message_vision(msg, me, target);
	call_out("do_reset",6,me);
	return 1;
}

void do_reset(object me)
{
        if( !objectp(me))       return;
        if( (int)me->query_temp("have_pfm"))
                me->delete_temp("have_pfm");
}