npc.h

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

#include <ansi.h> 
 
mapping *dizhia=({
      (["cdizhi":                "大理北门",
       "weizhi2" :              "/d/dali/northgate",]),  
      (["cdizhi":                "扬州密林",
       "weizhi2" :              "/d/city/jiaowai5",]),  
     (["cdizhi":                "峨嵋草棚",
       "weizhi2" :              "/d/emei/caopeng",]),
     (["cdizhi":                "襄阳玄武内门",
       "weizhi2" :              "/d/xiangyang/northgate1",]),
     (["cdizhi":                "襄阳青龙内门",
       "weizhi2" :              "/d/xiangyang/eastgate1",]),
     (["cdizhi":                "扬州西门",
       "weizhi2" :              "/d/city/ximen",]),
     (["cdizhi":                "雪山土路",
       "weizhi2" :              "/d/xueshan/tulu2",]),
     (["cdizhi":                "苏州留园",
       "weizhi2" :              "/d/suzhou/liuyuan",]),
     (["cdizhi":                "苏州寒山寺",
       "weizhi2" :              "/d/suzhou/hanshansi",]),
     (["cdizhi":                "杭州飞来峰",
       "weizhi2" :              "/d/hangzhou/feilaifeng",]),
     (["cdizhi":                "杭州净慈寺",
       "weizhi2" :              "/d/hangzhou/jingcisi",]),
     (["cdizhi":                "杭州翠微亭",
       "weizhi2" :              "/d/hangzhou/cuiweiting",]),
     (["cdizhi":                "杭州聚景园",
       "weizhi2" :              "/d/hangzhou/jujingyuan",]),
     (["cdizhi":                "苗疆易溪部",
       "weizhi2" :              "/d/dali/yixibu",]),  
      (["cdizhi":                "扬州中央广场",
       "weizhi2" :              "/d/city/guangchang",]),  
      (["cdizhi":                "杭州沿湖大道",
       "weizhi2" :              "/d/hangzhou/dadao1",]), 
      (["cdizhi":                "杭州断桥",
       "weizhi2" :              "/d/hangzhou/duanqiao",]), 
      (["cdizhi":                "杭州灵隐寺",
       "weizhi2" :              "/d/hangzhou/lingyinsi",]), 
      (["cdizhi":                "星宿海伊犁",
       "weizhi2" :              "/d/xingxiu/beijiang",]), 
      (["cdizhi":                "武当三天门",
       "weizhi2" :              "/d/wudang/santiangate",]), 
      (["cdizhi":                "峨嵋十二盘",
       "weizhi2" :              "/d/emei/shierpan3",]), 
      (["cdizhi":                "峨嵋千佛庵",
       "weizhi2" :              "/d/emei/qianfoan",]), 
      (["cdizhi":                "峨嵋九十九道拐",
       "weizhi2" :              "/d/emei/jsjdg1",]), 
      (["cdizhi":                "明教厚土旗门",
       "weizhi2" :              "/d/mingjiao/htqmen",]), 
      (["cdizhi":                "明教烈火旗后门",
       "weizhi2" :              "/d/mingjiao/lhqhoumen",]), 
      (["cdizhi":                "福州东门",
       "weizhi2" :              "/d/fuzhou/dongmen",]), 
      (["cdizhi":                "福州北大街",
       "weizhi2" :              "/d/fuzhou/beidajie",]), 
      (["cdizhi":                "星宿海沙漠",
       "weizhi2" :              "/d/xingxiu/shamo2",]),
      (["cdizhi":                "少林寺石阶",
       "weizhi2" :              "/d/shaolin/shijie4",]),
      (["cdizhi":                "襄阳石阶",
       "weizhi2" :              "/d/xiangyang/walle1",]),
      (["cdizhi":                "华山猢狲愁",
       "weizhi2" :              "/d/huashan/husun",]),
      (["cdizhi":                "华山玉女峰",
       "weizhi2" :              "/d/huashan/yunu",]),
      (["cdizhi":                "慕容小径",
       "weizhi2" :              "/d/mr/xiaojing1-2",]),
      (["cdizhi":                "慕容柳树林",
       "weizhi2" :              "/d/mr/liulin",]),
      (["cdizhi":                "大理大和街",
       "weizhi2" :              "/d/dali/dahejiewest",]),
      (["cdizhi":                "苏州城北门",
       "weizhi2" :              "/d/suzhou/beimen",]),
      (["cdizhi":                "苏州城玄妙观",
       "weizhi2" :              "/d/suzhou/xuanmiao",]),
      (["cdizhi":                "苏州城紫金庵",
       "weizhi2" :              "/d/suzhou/zijinan",]),
      (["cdizhi":                "少林寺山门殿",
       "weizhi2" :              "/d/shaolin/smdian",]),
      (["cdizhi":                "少林寺走廊",
       "weizhi2" :              "/d/shaolin/zoulang7",]),
      (["cdizhi":                "武当山路",
       "weizhi2" :              "/d/wudang/shanlu3",]),
      (["cdizhi":                "少林寺般若堂九部",
       "weizhi2" :              "/d/shaolin/banruo9",]),
      (["cdizhi":                "雪山山脚",
       "weizhi2" :              "/d/xueshan/shanjiao",]),
      (["cdizhi":                "峨嵋九老洞",
       "weizhi2" :              "/d/emei/jiulaodong",]),
       (["cdizhi":                "峨嵋古德林",
       "weizhi2" :              "/d/emei/gudelin1",]),
        
           });
void init()
{
	object ob, me;
	mapping dizhis;
	int exp, nei, nei1;

	::init();

	ob = this_player();
	me = this_object();
        nei = me->query("neili",1);
        nei1 = ob->query("neili",1);
        

	dizhis = dizhia[random(sizeof(dizhia))];
	exp = me->query("combat_exp");

      set("no_quest",1);
	set("chat_chance", 5);
	set("chat_msg", ({
		(: random_move :)
	}) );

	if (interactive(ob)
		&& !environment(ob)->query("no_fight")
//      && ob->query_condition("guanfu_task")
		&& present("wenshu", ob)
		&& (string)me->query("name") == ob->query_temp("guanfu_target")) {
			if (ob->query_temp("mark/gkill1")){
				message_vision(
				HIR"$n看到$N目光冷冷注视着自己一动不动，不由停下了脚步。\n"NOR, ob, me);

		switch(random(4)) {
           case 0:
				message_vision(
					"$n嘿嘿奸笑几声，连忙赔笑道，这位"+RANK_D->query_respect(ob)+"是"
"官府的捕头吧？！大家都是武林中人，今天能否高抬贵手？我必有重谢！你好好斟酌一下，是否愿意？\n",ob,me);
			write (HIY"你可以选择同意(yes)或者拒绝(no)。\n"NOR);
			ob->set_temp("guanf_huida1", me->query("name"));
			break;
		case 1:
			message_vision(
				HIR"$n阴笑一声说道，这麽多不怕死的？再来十个大爷我也不怕！\n"
				"随即眼睛一瞪，向着$N就冲了过去！\n"NOR,ob,me);
			me->set_leader(ob);
			remove_call_out("kill_ob");
			call_out("kill_ob", 1, ob);
			ob->delete_temp("mark/gkill1");
			break;
		case 2:
			message_vision(
	WHT"$n待$N走到近前，冷冷一笑，说道，你千里追到这里，我看你又能奈我何！\n"NOR,ob,me);
			write (WHT"你感到一股无形的杀气，心中不由一颤。\n"NOR);
			ob->delete_temp("mark/gkill1");
			break;
		case 3:
			message_vision(
			"$n忽然泪流满面，一幅可怜的神情对$N说道，小人上有老下有小，而且完全是官府被\n"
			"陷害才落此地步，望你老明察秋毫，网开一面，我今生一定感激不禁。\n",ob,me);    
           ob->delete_temp("mark/gkill1");
		}
	}
	if (ob->query_temp("mark/gkill1")
	&& (string)me->query("name") == ob->query_temp("guanfu_huida1")){
		message_vision(
			HIR"$n看到$N走到近前，狠狠的骂道，不识抬举的东西，我好言相劝没用，\n"
			"今天就让你尝尝大爷的厉害。\n"NOR,ob,me);
		me->set_leader(ob);
		remove_call_out("kill_ob");
		call_out("kill_ob", 1, ob);
		ob->delete_temp("guanf_huida1");
		ob->delete_temp("mark/gkill1");
		me->add("combat_exp",exp/4);
//           me->add("neili",exp/500);
//         me->set("combat_exp",exp+exp/4);
	}
	if (ob->query_temp("mark/gkill2")){
	switch(random(4)) {
		case 0:
			message_vision(
				HIR"$n额头青筋跳动，冷哼了一声，瞪着通红的眼睛向着$N就冲了过去。\n"NOR,
				ob,me);
			me->set_leader(ob);
			remove_call_out("kill_ob");
			call_out("kill_ob", 1, ob);
			break;
		case 1:
			message_vision(