@verb #3603:"exit_list" this none this rxdo #59
@program #3603:"exit_list" this none this
exits = {}
output = {}
for x in (args[1])
  if (x.obvious && x:is_unlocked_for(player))
    exits = {@exits, {`x.name ! E_PROPNF => x.aliases[1]', x.dest}}
  endif
  $command_utils:suspend_if_needed(0)
endfor
if (exits)
  for x in (exits)
    "    output = {@output, tostr(\"<a xch_cmd=\\\"\", x[1], \"\\\" xch_hint=\\\"leads to \", `x[2]:title() ! ANY => x[2].name', \"\\\">\", x[1], \"</a>\")};"
    output = {@output, tostr(x[1], " (<a xch_cmd=\"go ", x[1], "\">go ", x[1], "</a>)")}
  endfor
endif
return $string_utils:english_list(output)
"Last modified by Slacker (#55) on Mon Oct 29 09:29:10 2001 MST."
.