xunbu3.c

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

//xunbu3.c 巡捕
//9/24/2000 BY 风狐(WFoxd)

inherit NPC;

void create()
{
	set_name("超级巡捕", ({ "xun bu", "bu" }));
	set("gender", "男性");
	set("age", 55);
	set("shen_type", 1);
	
	set("str", 34);
	set("int", 35);
	set("con", 34);
	set("dex", 38);
	
	 set("neili", 18000); 	 
	 set("max_neili", 18000);
	 set("jiali", 350);
	set_skill("dodge", 250);
	set_skill("finger", 250);
	set_skill("force", 250);
	set_skill("parry", 250);
	set_skill("strike", 250);

	set_skill("hunyuan-yiqi", 250);
	set_skill("jingang-quan", 250);
	set_skill("longzhua-gong", 250);
	set_skill("nianhua-zhi", 250);
	set_skill("sanhua-zhang", 250);
	set_skill("shaolin-shenfa", 250);
	set_skill("yijinjing", 250);

	map_skill("dodge", "shaolin-shenfa");
	map_skill("finger", "nianhua-zhi");
	map_skill("force", "yijinjing");
	map_skill("hand", "fengyun-shou");
	map_skill("parry", "nianhua-zhi");
	map_skill("strike", "sanhua-zhang");
        set_temp("apply/attack", 100);
        set_temp("apply/defense", 100);
        set_temp("apply/armor", 100);
        set_temp("apply/damage", 200);
        
	prepare_skill("finger", "nianhua-zhi");
	prepare_skill("strike", "sanhua-zhang");

	setup();

	carry_object("/clone/misc/cloth")->wear();
}
	
void kill_ob(object ob) 
{
 
 	int max_skill;

	if(query("killing"))  
		 {:: kill_ob(ob);
		  return;
	        }
	set("killing",ob);

	set("max_qi",ob->query("max_qi") + 1500); 
	set("max_jing",ob->query("max_jing") + 1500);
	set("max_neili",ob->query("max_neili"));
	set("jiali",ob->query("jiali"));
	set("combat_exp", ob->query("combat_exp") + 200000);
	set("score", ob->query("score") + 5000);
	reincarnate();
	
	set_leader(ob); 
	
	:: kill_ob(ob);
	call_out("check_status",3,ob); 
}

void check_status(object ob)
{
	if(!ob || ob->is_ghost()) {
		destruct(this_object());
		return; }  

	if(environment(ob)!=environment()) {
		this_object()->move(environment(ob));  
		message_vision("$N忽然从一旁跳出来，大吼一声：“"+ob->name()+"，哪里跑？”",this_object());
		}

	remove_call_out("check_status");
	call_out("check_status",2,ob);
}