xihuazi.c

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

// xihuazi.c (kunlun)

inherit NPC;
inherit F_MASTER;

void create()
{
	set_name("西华子", ({ "xi huazi", "xi" }));
	set("long",
		"他是昆仑派第五代弟子，满腮虬髯，性子十分暴躁。\n");
	set("gender", "男性");
	set("age", 26);
	set("attitude", "peaceful");
	set("shen_type", -1);
	set("str", 30);
	set("int", 23);
	set("con", 25);
	set("dex", 28);

	set("max_qi", 800);
	set("max_qi", 800);
	set("max_jing", 600);
	set("neili", 1500);
	set("max_neili", 1500);
	set("jiali", 30);
	set("combat_exp", 400000);
	set("score", 1000);

	set_skill("force", 95);
	set_skill("xuantian-wuji", 105);
	set_skill("dodge", 80);
	set_skill("taxue-wuhen", 100);
	set_skill("parry", 100);
	set_skill("sword", 101);
	set_skill("xunlei-jian", 105);
	set_skill("cuff", 105);
	set_skill("zhentian-quan", 110);
	set_skill("throwing", 80);
	set_skill("mantian-huayu", 95);


	map_skill("force", "xuantian-wuji");
	map_skill("dodge", "taxue-wuhen");
	map_skill("sword", "xunlei-jian");
	map_skill("cuff", "zhentian-quan");
	prepare_skill("cuff", "zhentian-quan");

	create_family("昆仑派", 5, "弟子");
	setup();
	carry_object("/d/kunlun/obj/sword")->wield();
	carry_object("/d/kunlun/obj/pao3")->wear();
}

void attempt_apprentice(object ob)
{
      if(ob->query("gender")=="女性"){
	 command("fear");
	 command("say "+RANK_D->query_respect(ob)+
				"师傅不准我收女弟子，你去找我师姊去吧。");
	 return;
	 }
if(ob->query_skill("xuantian-wuji",1)<60){
	 command("hmm");
	 command("say "+RANK_D->query_respect(ob)+
				"你的玄天无极功太差，我可不想收你。");
	 return;
	 }

	 if(ob->query("appren_hezudao", 1) == 1) {
	 command("say 前辈怎敢开这等玩笑，真是折杀做晚辈的了。");
	 return;
	 }
	 command("say 既然"+RANK_D->query_respect(ob)+
				"这么努力，我就收下你吧。");
	 command("recruit " + ob->query("id"));
}