bing.c

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

//bing.c 官兵
// LOTS 1998/10/16

inherit NPC;

void create()
{
	set_name("官兵", ({ "guan bing", "bing" }));
	set("age", 22);
	set("gender", "男性");
	set("long", "虽然官兵的武艺不能和武林人士相比，可是他们讲究的是人多力量大。\n");
	set("attitude", "peaceful");
//	set("vendetta_mark", "authority");
//      set("pursuer", 1);

	set("str", 40);
	set("dex", 30);
	set("combat_exp", 500000);
	set("shen_type", 1);

	set_skill("cuff", 100);
	set_skill("luohan-quan", 100);
	set_skill("shaolin-shenfa", 100);
	set_skill("hunyuan-yiqi", 100);
	set_skill("dodge", 100);
	set_skill("parry", 100);
	set_skill("force", 100);
	map_skill("force", "hunyuan-yiqi");
	map_skill("cuff", "luohan-quan");
	map_skill("dodge", "shaolin-shenfa");
	map_skill("parry", "luohan-quan");

	prepare_skill("cuff", "luohan-quan");

	set_temp("apply/attack", 40);
	set_temp("apply/defense", 40);
	set_temp("apply/damage", 20);
	set_temp("apply/armor", 40);

//	if (random(2) == 1) {
//		set("chat_chance", 10);
//		set("chat_msg", ({
//			(: random_move :),
//		}));
//	}

        set("chat_chance_combat", 10);
	set("chat_msg_combat", ({
		"官兵喝道：大胆刁民，竟敢造反不成？\n",
		"官兵喝道：跑得了和尚跑不了庙，你还是快快束手就擒！\n",
	}));
	setup();
		carry_object("/d/kaifeng/obj/ironblade")->wield();
		carry_object("/d/kaifeng/obj/yayifu")->wear();
}

void init()
{
	object ob;
	::init();
	if (interactive(ob = this_player()) && 
		(int)ob->query_condition("killer")) {
		remove_call_out("kill_ob");
		call_out("kill_ob", 1, ob);
	}
}

int accept_fight(object me)
{
	command("say 大爷我正想找人杀呐，今天算你倒霉。\n");
	me->apply_condition("killer", 500);
	kill_ob(me);
	return 1;
}