// abandon.c
#include <ansi.h>

inherit F_CLEAN_UP;

int main(object me, string arg)
{
	object ob,env;

	if(me->is_fighting() || me->is_busy())
		return notify_fail("你正忙着呢，没法使用佛法无边。\n");
	if( me->is_ghost())
		return notify_fail("死人用不了佛法！\n");
	if( environment(me)->query("no_fight"))
		return notify_fail("这儿风水不好，无法施展佛法无边。\n");
	if((int)me->query_skill("foxuexinde",1)<100)
		return notify_fail("你的佛学心德不够，不会使用佛法无边。\n");
	if((int)me->query("mana")<250)
		return notify_fail("你的佛法不够，无法施展佛法无边。\n");
	if(! arg)
		return notify_fail("你准备对谁施展佛法无边？\n");
	ob=find_player(arg);
	if(! ob || !me->visible(ob))
		return notify_fail("没有这么个玩家。\n");
	if(! env=environment(ob))
		return notify_fail("你暂时无法对"+ob->query("name")+"施法。\n");

	if(ob==me)	return notify_fail("佛法是用来救世济人的，不是施于己身的。\n");

	if( !living(ob))	return notify_fail("你得先把"+ob->query("name")+"救醒再说。\n");

	me->add("mana",-250);
	message_vision(HIY"$N双手合什，口中轻诵「阿弥陀佛」。\n"NOR,me);
	tell_object(ob,HIY"你只觉一股暖流充溢全身，甚是舒服。\n"NOR);
	ob->set("eff_kee",(int)ob->query("max_kee"));
	ob->set("kee",(int)ob->query("max_kee"));
	ob->set("eff_gin",(int)ob->query("max_gin"));
	ob->set("gin",(int)ob->query("max_gin"));
	ob->set("eff_sen",(int)ob->query("max_sen"));
	ob->set("sen",(int)ob->query("max_sen"));
	return 1;
}

int help()
{
	write(@TEXT

指令格式：ffwb <某人>
佛学心德学习到一百级，你便可以学得此项佛法。
此项佛法与醍瑚灌顶相似，只不过没有了区域限
制。而且可以全面恢复他人的精、气、神。

TEXT
	);
	return 1;
}
