// 慕容拳法之探云手 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("探云手只能對(duì)戰(zhàn)斗中的對(duì)手使用。\n");			if( (int)me->query_skill("douzhuan-xingyi",1)<80)	return notify_fail("你的星移斗轉(zhuǎn)不夠嫻熟，不會(huì)使用「探云手」。\n");	if( (int)me->query_skill("yanling-shenfa",1)<80)	return notify_fail("你的燕靈身法不夠敏捷，不能使用「探云手」。\n");	if( (int)me->query_skill("shenyuan-gong",1)<80)	return notify_fail("你的本門(mén)內(nèi)功不夠，不能使用「探云手」。\n");	if( (int)me->query("neili")<200)	return notify_fail("你現(xiàn)在內(nèi)力太弱，不能使用「探云手」。\n");	if(me->query("qi")<50)	return notify_fail("你現(xiàn)在氣不足，無(wú)法使用「探云手」。\n");	if(me->query_temp("have_pfm"))	return notify_fail("你剛展施完特殊招式，內(nèi)息還沒(méi)調(diào)整過(guò)來(lái)。\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什么也沒(méi)「探」到！\n"NOR;		}		else	{			thing=inv[random(sizeof(inv))];		if( (thing->query("equipped")&&random(me->query("kar"))<10)		|| (int)thing->query("no_steal") || (int)thing->query("no_get"))		msg +=CYN"$n雙手緊緊抓住"+thing->query("name")+"沒(méi)讓$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(1);		msg += CYN"可是$p看破了$P的企圖，身形一晃閃了開(kāi)去。\n"NOR;		}	message_vision(msg, me, target);	call_out("do_reset",3,me);	return 1;}void do_reset(object me){        if( !objectp(me))       return;        if( (int)me->query_temp("have_pfm"))                me->delete_temp("have_pfm");}