guinu.c

C实现的MUD,对大家基本入门网络游戏很有帮助!

// dtz.c

inherit NPC;
int random_action();
void create()
{
        set_name("龟奴", ({ "guinu" }) );
        set("gender", "男性" );
        set("age", random(25)+15);
        set("long", "一个为千金楼效力，正在看门的龟奴\n");
	set("per",30);
        set("combat_exp", 800000);
	set("no_arrest",1);
        set("attitude", "heroism");
        set_skill("unarmed", 200);
        set_skill("parry", 200);
	set_skill("dodge", 200);
        set("chat_chance", 2);
        set("chat_msg", ({
                (: random_action :)
        }) );
        set("inquiry", ([
                "湖上八娇" : "哦，她们都住在荷花荡上．\n",
                "湖上柳" : "她胃口可大呢．没几两金子都别想看到她笑．\n",
                "liu" : "她胃口可大呢．没几两金子都别想看到她笑．\n",
        ]) );


	setup();
	add_money("gold", 1);
        carry_object("clone/cloth/cloth")->wear();
        
}

int random_action()
{
int permit;
permit=(int) environment(this_object())->query("enter_permission");
	if(!permit)
switch(random(5)){
	case 0:
		command("zzz");
		break;
	case 1:
		command("yawn");
		break;
	case 2:
		command("bored");
		break;
		}
	else
switch(random(5)){
        case 0:
message_vision("$N啧啧嘴，向你夸道：千金楼的姑娘，全城最红的！\n",this_object());
                break;
        case 1:
message_vision("$N打量了你几眼：有钱就是大爷！您请上千金楼雅间！\n",this_object());
                break;
                }

}