wolfdog.c

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

// wolfdog.c

inherit NPC;

void create()
{
        set_name("大狼狗", ({ "wolf dog", "dog" }) );
        set("race", "野兽");
        set("age", 4);
        set("long", "一只昂首挺胸，吐着长舌头的大狼狗。像是财主家里养的宠物。\n");
        set("attitude", "peaceful");

        set("str", 26);
        set("cor", 30);

        set("limbs", ({ "头部", "身体", "前脚", "后脚", "尾巴" }) );
        set("verbs", ({ "bite", "claw" }) );

        set("combat_exp", 1000);

        set("chat_msg_combat", ({
                (: this_object(), "random_move" :),
                "大狼狗大声吠叫：汪！汪！汪！汪！汪！汪！\n",
                "大狼狗突然跳了起来，口中乱咬，却不知道是在咬谁。\n"
        }) );

        set_temp("apply/attack", 15);
        set_temp("apply/damage", 6);
        set_temp("apply/armor", 2);

        setup();
}

void init()
{
        object ob;
        ::init();
        if (interactive(ob = this_player()) &&
                random(ob->query_kar() + ob->query_per()) < 30) {
                        remove_call_out("kill_ob");
                        call_out("kill_ob", 1, ob);
        }
}
void die()
{
        object ob;
        message_vision("$N四脚一蹬，死了！\n", this_object());
        ob = new(__DIR__"obj/goupi");
        ob->move(environment(this_object()));
        destruct(this_object());
}