azhu.c

来自「C实现的MUD,对大家基本入门网络游戏很有帮助!」· C语言 代码 · 共 56 行

// azhu.c

inherit NPC;
//inherit F_SKILL;
int inquiry_tanqin();

void create()
{
        set_name("阿朱", ({ "azhu", "zhu" }));
        set("long",
                "这是个身穿红衣的女郎，大约十七八岁，一脸精灵顽皮的神气。\n"
                "一张鹅蛋脸，眼珠灵动，别有一番动人风韵。\n");

        set("gender", "女性");
        set("age", 17);
        set("shen_type", 1);

        set("neili", 200);
        set("max_neili", 200);
        set("max_qi", 160);
        set("max_jing", 160);
        set_skill("force", 40);
        set_skill("unarmed", 40);
        set_skill("dodge", 30);
        set_skill("parry", 30);
        set_skill("sword", 30);
        set_temp("apply/attack", 10);
        set_temp("apply/defense", 10);
        set_temp("apply/damage", 5);

        set("combat_exp", 10000);
        set("inquiry",([
            "曼陀山庄" : "我才不敢去曼陀山庄，王夫人太霸道了!\n",
            "王语嫣" : "哎，只有她才配得上我们公子，也不知她现在怎么样了!\n",
            "阿碧" : "那小丫头也不只跑哪儿去了。\n",
            "弹琴" : ( : inquiry_tanqin : ),
        ]) );
        setup();
        carry_object(__DIR__"obj/goldring")->wear();
        carry_object(__DIR__"obj/necklace")->wear();
        carry_object(__DIR__"obj/changjian")->wield();
        carry_object(__DIR__"obj/pink_cloth")->wear();
        carry_object(__DIR__"obj/flower_shoe")->wear();
        carry_object("clone/misc/mask");
}

int inquiry_tanqin()
{
        object me=this_player();
message_vision("阿朱说道：这位"+ RANK_D->query_respect(me)+ "这么有雅兴，那我就为你弹奏一曲！
                 \n只听琴声繁复清亮，你不由的痴了。\n", me );
//        细细品来，竟是张信哲的<<爱如潮水>>!!!\n 
        message_vision("阿朱一曲终了，道个万福，说道：现丑了。\n", me );
        return 1;
}