#include <ansi.h>mixed names = ({        ({        "少林廣場","王府路","華藏庵","有所不為軒","紫霄宮大門",        "天微堂","日月坪","大雪山山谷","六和塔","全真教大門",         "墓門","桃花山莊正廳","神龍教大廳","獨尊廳","星宿海",         "雪山寺山門","一品堂大院","昆侖派山門","燕子塢","五指堂",         "朱雀外門","青龍外門","白虎外門","玄武外門","天安門",        "揚州武館","福威鏢局","玄妙觀","靈隱寺","泉州南門",        "靈州南門","諸葛亮殿","煙雨樓","南陽城","佛山南門",                        "蛇骨塔","長安樂坊","衡陽西街","喜州城","葛魯城",         "伊犁","山海關","老龍頭","長白天池","天山腳下",       "麗春院","涌泉寺","聽雨軒","五老峰","紫金城",        "松風觀","終南山腳","抱子巖","白馬潭","升仙坊",                        "嘉應門","玄妙觀","峻極禪院","俠義廳","蕭家橋",         }),        });string ask_jianxi(){     object guo,ob;      object *team;	  int i=0,count=0,minexp,maxexp;      string where;	  guo =this_object();	  ob=this_player();	  //	  if (guo->query_condition("mjb_busy"))//	  return "我沒有收到任何消息。";//guo busy time 	        if( ob->query("family/family_name") != "全真教")      return  "只有本派弟子才能做此任務!";      //too low exp      if(ob->query("combat_exp")<2000000)      return  "你的功夫太差了。不要自尋死路!";//too low exp      team=ob->query_team();      count=sizeof(team);	 // write("\n"+sprintf("%d",count));	  if(count<=1)      return "就你一個人?"; //too few people      if(count>=5)	  return "此事不宜張揚。"; //too many people	  minexp=team[0]->query("combat_exp");	  maxexp=minexp;      	  for(i=1;i<count;i++)      { if(team[i]!=0)	  { if(team[i]->query("combat_exp")<minexp)	    minexp=team[i]->query("combat_exp");		if(team[i]->query("combat_exp")>maxexp)        maxexp=team[i]->query("combat_exp");	  }	  }	  if ((maxexp-minexp)>1000000)      return "你們的武功相差太懸殊。";//exp too far     //check ok      	  where=names[0][random(60)];	  guo->apply_condition("mjb_busy",30);	  ob->set_temp("team_count",count);	  ob->apply_condition("mjb_busy",60);	  for(i=0;i<count;i++)	  team[i]->apply_condition("mjb_busy",60);	  for(i=100;i*i*i/10<=maxexp;i++);          call_out("job",60,ob,where,i,count+2);	  return    "我剛得到消息，有一伙別派弟子與我派作對。派奸細偷去了我派的機要文件\n"+		        "你們趕快去"+where+"設防阻截，把他們全部消滅。搶到文件后就地銷毀(xiaohui)。\n"+			    "肯定會有不少別派弟子接應他，多加小心。"; }void job(object ob,string where,int maxpot,int ckiller){    object *team,obj,gift;           int i=0;    // team=ob->query_team();	 //for(i=0;i<sizeof(team);i++)	 if(environment(ob)->query("short")==where&&ob->query_condition("mjb_busy"))	 {  if (ckiller>0)	    {	    if (random(19)== 0)	    {	      obj=new("quest/menpai/jobnpc/btshan");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"白駝山首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());              ob->kill(this_object());	     }	     else 	    if (random(19)== 1)	    {	      obj=new("quest/menpai/jobnpc/gumu");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"古墓派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 2)	    {	      obj=new("quest/menpai/jobnpc/gaibang");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"丐幫派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 3)	    {	      obj=new("quest/menpai/jobnpc/emei");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"峨嵋派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 4)	    {	      obj=new("quest/menpai/jobnpc/dali");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"大理國首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 5)	    {	      obj=new("quest/menpai/jobnpc/huashan");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"華山派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 6)	    {	      obj=new("quest/menpai/jobnpc/kunlun");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"昆侖派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 7)	    {	      obj=new("quest/menpai/jobnpc/shaolin");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"少林派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 8)	    {	      obj=new("quest/menpai/jobnpc/mr");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"慕容派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 9)	    {	      obj=new("quest/menpai/jobnpc/mingjiao");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"明教首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 10)	    {	      obj=new("quest/menpai/jobnpc/lingjiu");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"靈鷲宮首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 11)	    {	      obj=new("quest/menpai/jobnpc/taohua");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"桃花島首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 12)	    {	      obj=new("quest/menpai/jobnpc/xueshan1");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"雪山派護教弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 13)	    {	      obj=new("quest/menpai/jobnpc/xueshan2");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"雪山派護教法王"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 14)	    {	      obj=new("quest/menpai/jobnpc/xueshan3");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"雪山派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 15)	    {	      obj=new("quest/menpai/jobnpc/xingxiu");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"星宿派首座弟子"NOR);                   obj->move(environment(ob));              obj->kill_ob(ob);ob->kill(this_object());	     }	     else 	    if (random(19)== 16)	    {	      obj=new("quest/menpai/jobnpc/wudang");   	      obj->do_copy(ob,maxpot,3);	      obj->set("title",HIY"武當派首座弟子"NOR);