! Travelling around verbs ! ---------------------------------------------------------------------------- [ EnterSub ancestor j k; if (noun has door || noun in compass) <>; if (player in noun) return L__M(##Enter,1,noun); if (noun hasnt enterable) return L__M(##Enter,2,noun); if (noun has container && noun hasnt open) return L__M(##Enter,3,noun); if (parent(player) ~= parent(noun)) { ancestor = CommonAncestor(player, noun); if (ancestor == player or 0) return L__M(##Enter,4,noun); while (player notin ancestor) { j = parent(player); k = keep_silent; if (parent(j) ~= ancestor || noun ~= ancestor) { L__M(##Enter,6,j); keep_silent = 1; } ; keep_silent = k; if (player in j) return; } if (player in noun) return; if (noun notin ancestor) { j = parent(noun); while (parent(j) ~= ancestor) j = parent(j); L__M(##Enter,7,j); k = keep_silent; keep_silent = 1; ; keep_silent = k; if (player notin j) return; <>; } } move player to noun; if (AfterRoutines()==1) rtrue; if (keep_silent==1) rtrue; L__M(##Enter,5,noun); Locale(noun); ];