找怪机器(非path类型)讨论

[ozzy]

思路:
接到任务 怪物名称name 英文名字id 地点where
判断难度等级 difficulty
定义地点 怪物所在地区map
搜索地区 路径path of map
如果地图过大分段搜索 路径分段pathpart1 pathpart2 pathpart3
如果找到了怪物 match id
停止搜索 stop search
走过了 back search
如果回头发现怪已经不在原地,继续back search
没找到 任务失败job fail

接受任务部分:
#TRIGGER {^李靖对你说道：近有(*)~((*)~)在(*)为非作歹，请速去降服！}
{#cw 303;#ts @ts;score=li;#math askli (@askli+1);monster=%1;id=%lower(%2);where=%3;kquest;findmap} {ask} 519
判断难度等级部分:
#TRIGGER {^李 靖：第(%x)个妖「@monster」没有完成。} {difficulty=%1;difficulty} {ask} 519
#ALIAS difficulty {#if (%ismember(@difficulty,"一")=1) {difficulty=1};#if (%ismember(@difficulty,"二")=1) {difficulty=2};#if (%ismember(@difficulty,"三")=1) {difficulty=3};#if (%ismember(@difficulty,"四")=1) {difficulty=4};#if (%ismember(@difficulty,"五")=1) {difficulty=5};#if (%ismember(@difficulty,"六")=1) {difficulty=6};#if (%ismember(@difficulty,"七")=1) {difficulty=7};#if (%ismember(@difficulty,"八")=1) {difficulty=8};#if (%ismember(@difficulty,"九")=1) {difficulty=9};#if (%ismember(@difficulty,"十")=1) {difficulty=10}}
定义地图
#alias {#var temp @where
path=nofind
xxx=nomap
#if %ismember( @temp, "长安城西") {
path=@mchanganwest
xxx=mchanganwest
}
#if %ismember( @temp, "长安城") {
path=@mchangan
xxx=mchangan
}
#if %ismember( @temp, "宝象国") {
path=@mbaoxiang
xxx=mbaoxiang
}
#if %ismember( @temp, "豹头山") {
path=@mbaotou
xxx=mbaotou
}
#if %ismember( @temp, "豹头二") {
path=@mbaotou2
xxx=mbaotou2
}
#if %ismember( @temp, "比丘国") {
path=@mbiqiu
xxx=mbiqiu
}
#if %ismember( @temp, "碧波潭") {
path=@mbibo
xxx=mbibo
}
#if %ismember( @temp, "车迟国") {
path=@mchechi
xxx=mchechi
}
#if %ismember( @temp, "大雪山") {
path=@mxueshan
xxx=mxueshan
}
#if %ismember( @temp, "毒敌山") {
path=@mdudi
xxx=mdudi
}
#if %ismember( @temp, "方寸山") {
path=@mfangcun
xxx=mfangcun
}
#if %ismember( @temp, "凤仙郡") {
path=@mfengxian
xxx=mfengxian
}
#if %ismember( @temp, "高老庄") {
path=@mgaozhuang
xxx=mgaozhuang
}
#if %ismember( @temp, "红楼一梦") {
path=@mhonglou
xxx=mhonglou
}
#if %ismember( @temp, "火焰山") {
path=@mfiremount
xxx=mfiremount
}
#if %ismember( @temp, "积雷山") {
path=@mjilei
xxx=mjilei
}
#if %ismember( @temp, "祭赛国") {
path=@mjisaiguo
xxx=mjisaiguo
}
#if %ismember( @temp, "金兜山") {
path=@mjindou
xxx=mjindou
}
#if %ismember( @temp, "金平府") {
path=@mjinping
xxx=mjinping
}
#if %ismember( @temp, "荆棘岭") {
path=@mjingjiling
xxx=mjingjiling
}
#if %ismember( @temp, "开封城") {
path=@mkaifeng
xxx=mkaifeng
}
#if %ismember( @temp, "灵山") {
path=@mlingshan
xxx=mlingshan
}
#if %ismember( @temp, "龙宫") {
path=@mlonggong
xxx=mlongdong
}
#if %ismember( @temp, "毛颖山") {
path=@mmaoying
xxx=mmaoying
}
#if %ismember( @temp, "梅山|灌江") {
path=@mmeishan
xxx=mmeishan
}
#if %ismember( @temp, "女儿国") {
path=@mnuerguo
xxx=mnuerguo
}
#if %ismember( @temp, "盘丝岭") {
path=@mpansi
xxx=mpansi
}
#if %ismember( @temp, "蓬莱仙岛") {
path=@mpenglai
xxx=mpenglai
}
#if %ismember( @temp, "平顶山") {
path=@mpingding
xxx=mpingding
}
#if %ismember( @temp, "普陀山") {
path=@mputuo
xxx=mputuo
}
#if %ismember( @temp, "麒麟山") {
#if (@wuxue>1000000) {
path=@mqilin
xxx=mqinlin
} {
path=@mqilin2
xxx=mqilin2
}
}
#if %ismember( @temp, "钦法国") {
path=@mqinfa
xxx=mqinfa
}
#if %ismember( @temp, "青龙山") {
path=@mqinglong
xxx=mqinglong
}
#if %ismember( @temp, "天竺国") {
path=@mtianzhu
xxx=mtianzhu
}
#if %ismember( @temp, "通天河") {
path=@mtongtian
xxx=mtongtian
}
#if %ismember( @temp, "乌鸡国") {
path=@mwuji
xxx=mwuji
}
#if %ismember( @temp, "无底洞") {
path=@mwudidong
xxx=mwudidong
}
#if %ismember( @temp, "五庄观") {
path=@mwuzhuang
xxx=mwuzhuang
}
#if %ismember( @temp, "小西天") {
path=@mxiaoxitian
xxx=mxiaoxitian
}
#if %ismember( @temp, "阴曹地府") {
path=@mhell
xxx=mhell
}
#if %ismember( @temp, "地府二") {
path=@mhell2
xxx=mhell2
}
#if %ismember( @temp, "隐雾山") {
path=@myinwu
xxx=myinwu
}
#if %ismember( @temp, "玉华县") {
path=@myuhua
xxx=myuhua
}
#if %ismember( @temp, "月宫") {
path=@mmoon
xxx=mmoon
}
#if %ismember( @temp, "朱紫国") {
path=@mzhuzi
xxx=mzhuzi
}
#if %ismember( @temp, "竹节山") {
path=@mzhujie
xxx=mzhujie
}
#if (@path=nofind) {#say Job fail:Monster:@monster Place:@where Reason:nomap} {
#wa 2000
findstart
}}