to meet-wolf;; wolf procedure9 p: r/ V: U9 |4 L
if count wolves-here > 0 / X/ d+ R( W$ u! k' r [let otherwolf one-of other wolves-here $ m" f* O/ ?. ^
if abs ([k1] of self - [k1] of otherwolf ) > value-k1 G! }" y' X* x
]- `$ O; f& V, A7 v! k: K
[ set [k1] of self [k1] of self + [k1] of otherwolf , z# P0 q8 i1 V6 Y: N ]0 g4 l) r; x p- v, T; X' G
end# i( ?0 U- Z8 i/ m" u
显示otherwolf没有被定义,请各路大神帮忙调整通顺