// tuoboseng.c
// Date: YZC 96/01/19

inherit NPC;

void create()
{
        set_name("托钵僧", ({"tuobo seng","seng"}));
        set("title", "少林弟子");
        set("long",
                "他是一位未通世故的青年和尚，脸上挂着孩儿般的微笑。\n"
        );

        set("gender", "男性");
        set("attitude", "heroism");
        set("class", "bonze");

        set("age", 20);
        set("shen_type", 1);
        set("str", 15);
        set("int", 30);
        set("con", 30);
        set("dex", 18);
        set("max_qi", 280);
        set("max_jing", 300);
        set("neili", 380);
        set("max_neili", 380);
        set("jiali", 27);
        set("combat_exp", 10000);
        set("shen_type", 1);
        set("chat_chance", 30);

        set("chat_msg", ({
                "托钵僧说道: 请这位施主化几两银子给贫僧，积点阴德，造福众生。\n",
                (: random_move :)
        }) );

        set_skill("force", 41);
        set_skill("unarmed", 41);
        set_skill("dodge", 41);
        set_skill("parry", 41);
        set_skill("shaolin-shenfa", 42);
        set_skill("jingang-quan", 41);
        set_skill("yijin-jing", 41);

        map_skill("force", "yijin-jing");
        map_skill("dodge", "shaolin-shenfa");
        map_skill("unarmed", "jingang-quan");
        map_skill("parry", "jingang-quan");

        create_family("少林派", 40, "弟子");
        setup();
        carry_object("/d/city/obj/cloth")->wear();

        setup();

}

int accept_object
(object me, object ob)
{
        object ling;
//add by look@SJ because 玩家私藏宝物。
//add by caiji@SJ because 天龙寺出家弟子进不了少林。
                if( ob->query("money_id") && ob->value() >= 10000 && ((me->query("class") != "bonze"&&(me->query("family/family_name") != "少林派"))
                 || me->query("gender")== "女性")) 
        {
                command("smile");
            command("say 阿弭陀佛，多谢这位" + RANK_D->query_respect(me) + " ！");
            command("say " + RANK_D->query_respect(me) + 
            "如此乐善好施，兼又身怀绝艺，本寺方丈正欲一晤天下英雄，不知可愿赴少林寺内一游？");
            ling=new("/d/shaolin/obj/tie-ling");
            ling->move(me);
            message_vision("托钵僧给$N一块铁铸令牌。\n", me);
            command("say 此牌限时一日，逾时失效，请于限时前离寺，否则多有不便，切记切记！"); 
        }
                else return notify_fail("托钵僧说道：" + RANK_D->query_respect(me) + "送贫僧这些东西，不知是何用意？\n");
        return 1;
}
