#ALIAS findstart {#t- hprecover;#t+ @xxx;partnum=%numwords(@path,|);follow=1;findmonster=finding;pathpart=none;vc=0;findgo}
#ALIAS findgo {#if (@vc<@partnum) {#add vc 1;#var pathpart %word(@path,@vc,|);fgofind}}
#ALIAS fgofind {va=0;#t+ find;do=finding;#var steps %numwords(@pathpart,%char(59));#loop @steps {#add va 1;%word(@pathpart,@va,%char(59))};#say Mouse is best}
#alias backset {#if (@go=e) {back=w} {#if (@go=w) {back=e} {#if (@go=s) {back=n} {#if (@go=n) {back=s} {#if (@go=nw) {back=se} {#if (@go=ne) {back=sw} {#if (@go=se) {back=nw} {#if (@go=sw) {back=ne} {#if (@go=enter) {back=out} {#if (@go=out) {back=enter} {#if (@go=left) {back=right} {#if (@go=right) {back=left} {#if (@go=up) {back=down} {#if (@go=down) {back=up} {#if (@go=eu) {back=wd} {#if (@go=wu) {back=ed} {#if (@go=su) {back=nd} {#if (@go=nu) {back=sd} {#if (@go=wd) {back=eu} {#if (@go=ed) {back=wu} {#if (@go=nd) {back=su} {#if (@go=sd) {back=nu}}}}}}}}}}}}}}}}}}}}}}}
#TRIGGER {^Moust is best} {#cw 146;#t- find;#math wtime {@steps*40};#if (@do=finded) {findset} {#if (@wtime<100) {findset} {#wa @wtime;findset}}} {find} 548
#alias findset {#if (@do=finded) {findback}
#if (@findmonster=finding and @vc>=@partnum) {findend}
#if (@findmonster=finded and @vc>=@path and @do=finding) {findstart}
#if (@do=finding and @vc<@partnum) {findgo}}
#TRIGGER {^%s{@monster_title}%s@monster~(@id~)} {#cw white;guai_title={百年|龙宫怪物|五庄观凶徒|无底洞小妖|普陀恶僧|月宫魔女|将军府叛将|幽冥恶鬼|方寸妖道|雪山老妖};checkmonster}
#ALIAS checkmonster {#cw white;findmonster=finded;
vb=0;#if (@do=findback) {do=findedag};#if (@do=finding or @do=finded) {#t+ find-
vb;do=finded}}
#TRIGGER {这里(*)出口是} {#add
vb 1} {findback} 548
#ALIAS findback {#t- findback;vamax=@va;do=findback;fgomonster}
#alias fgomonster {#t+ find
#if (@
vb=0) {follow @monsterid} {
#loop @
vb {
#var go %word( @pathpart, @va, %char( 59))
#add va -1
#if (@va<0 and @do=findback) {#say Beyond the part,research again} {
backset
@back
}
}
follow @monsterid
}}