// keeper.c

inherit NPC;

void create()
{
	set_name("ף", ({ "keeper" }) );
	set("gender", "" );
	set("age", 74);
	set("long",
		"˿ʮˣ͵ӰȻ\n");
	set("combat_exp", 1);
	set("attitude", "friendly");
	setup();
}

void init()
{	
	object ob;

	::init();
	if( interactive(ob = this_player()) && !is_fighting() ) {
		remove_call_out("greeting");
		call_out("greeting", 1, ob);
	}
}

void greeting(object ob)
{
	if( !ob || !present(ob, environment(this_object())) ) return;
	say( "ף˵λ" + RANK_D->query_respect(ob)
		+ "Ǯ°ɡ\n");
}

/*int accept_object(object who, object ob)
{
	say( "ף˵λ" + RANK_D->query_respect(who)
		+ "ǮͶ빦\䡣\n");
	return 0;
}*/
int accept_object(object who, object ob)
{
        int val;

        val = ob->value();
        if( !val )
                return notify_fail("ףƷľס\n");
        else if( val > 100 ) {
                if( (who->query("bellicosity") > 0)
                &&      (random(val/10) > (int)who->query("kar")) )
                        who->add("bellicosity", -
(random((int)who->query("kar")) + val/1000) );
        }
        say( "ף˵лλ" + RANK_D->query_respect(who)
                + "һᱣġ\n");

        return 1;
}


