#include <ansi.h>inherit NPC;void create(){        set_name("瀟湘子", ({ "xiaoxiang zi", "zi", "xiaoxiang" }));        set("title", "湘西名宿");        set("long", "他身材高瘦，臉無血色，形若僵尸。臉上隱隱透著一股青氣，手持一根哭喪棒。\n");        set("gender", "男性");        set("rank_info/respect", "道長(zhǎng)");        create_family("丐幫", 15, "弟子");        set("age", 43);        set("attitude","heroism");        set("str", 36);        set("dex", 30);        set("con", 33);        set("int", 32);        set("shen", -7000);        set("env/wimpy", 60);        set_skill("parry", 100);        set_skill("force", 100);        set_skill("dodge", 100);        set_skill("staff", 100);        set_skill("huntian-qigong", 220);               set_skill("tianshan-zhang", 220);          set_skill("xiaoyaoyou", 220);        set_skill("hand", 100);        map_skill("force", "huntian-qigong");        map_skill("dodge", "xiaoyaoyou");        map_skill("staff", "tianshan-zhang");        prepare_skill("hand", "suohou-shou");        set("combat_exp", 1000000);        set("max_qi", 5500);        set("max_jing", 5000);        set("eff_jingli", 5000);        set("neili", 20000);        set("max_neili", 20000);        set("jiali", 50);        set("inquiry", ([                        "金輪法王" : "嘿嘿，我遲早會(huì)把那個(gè)老和尚的國(guó)師名號(hào)搶過來。",            "馬光佐" : "那是個(gè)莽夫，提他做什？",            "尹克西" : "這人功夫不錯(cuò)，就是滿身的金銀太耀眼，不象個(gè)武林人士。",            "尼摩星" : "西域來的，內(nèi)功不錯(cuò)。就是，嘿嘿，心眼太小。",                   ]) );        setup();        set("chat_chance", 10);        set("chat_msg", ({            "瀟湘子眼睛向你斜望，嘴角邊微微冷笑。\n",            (: random_move :),              "瀟湘子道：「西藏武功傳自天竺，難道世上當(dāng)真有青出於藍(lán)之事麼？兄弟可有點(diǎn)不大相信了 。」\n",             (: random_move :),                  }) );        carry_object(__DIR__"obj/gangzhang")->wield();        carry_object(__DIR__"obj/greenrobe")->wear();}void kill_ob(object me){     object ob=this_object();      command("grin");      command("say 杖下領(lǐng)死吧！");      COMBAT_D->do_attack(ob, me, ob->query_temp("weapon"),1);      COMBAT_D->do_attack(ob, me, ob->query_temp("weapon"),1);      COMBAT_D->do_attack(ob, me, ob->query_temp("weapon"),1);                  COMBAT_D->do_attack(ob, me, ob->query_temp("weapon"),1);                  COMBAT_D->do_attack(ob, me, ob->query_temp("weapon"),1);                  ::kill_ob(me);}