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

inherit F_CLEAN_UP;

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

	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)<60)
		return notify_fail("你的佛学心德不够，不会使用醍瑚灌顶。\n");
	if((int)me->query("mana")<100)
		return notify_fail("你的佛法不够，无法施展醍瑚灌顶。\n");
	if(! arg)
		return notify_fail("你准备对谁施展醍瑚灌顶？\n");
	ob=present(arg,environment(me));
	if(! ob || !ob->is_character() || !me->visible(ob))
		return notify_fail("这儿没有这么个人。\n");
	if( !userp(ob))	return notify_fail("你只能对玩家施展这门佛法。\n");
	if(ob==me)	return notify_fail("佛法是用来救世济人的，不是施于己身的。\n");

	me->add("mana",-100);
	message_vision(HIY"$N双手合什，口中轻诵「阿弥陀佛」。\n"NOR,me);
	tell_object(ob,HIY"你只觉一股暖流由头顶直灌丹田，全身暖洋洋的甚是舒服。\n"NOR);
	add=(int)me->query_skill("foxuexinde")+(int)me->query_kar();
	add*=3;
	ob->receive_curing("gin",add/2);
	ob->receive_heal("gin",add/2);
	ob->receive_curing("kee",add);
	ob->receive_heal("kee",add);
	ob->receive_curing("sen",add/2);
	ob->receive_heal("sen",add/2);
	return 1;
}

int help()
{
	write(@TEXT

指令格式：thgd <某人>
佛学心德学习到六十级，你便可以学得此项佛法。
此项佛法只能施于他人。可以帮助他人恢复一定
的精、气、神。恢复的点数除了与佛学心德等级
有关外，还与福缘有一定的关系。

TEXT
	);
	return 1;
}
