28e
@verb #2030:"go_path" this none this rxdo #987
@program #2030:"go_path" this none this
"Receives a room number; requests path from here to destination; moves vehicle along path (if path exists); returns if path exists."
if (path = `$room_db:path_between(this.location, dest = args[1], this) ! ANY')
  for exit in (path)
    this:go_exit(exit)
    if (this.location != dest)
      this:jabber_shout(this.location:title(), this)
      this:jabber_quiet(this.location:title())
      suspend(this.speed)
    endif
  endfor
  this:look_out()
endif
return typeof(path) == $LIST
"Last modified by Dax (#789) on Tue May  3 13:59:08 2005 MDT."
.

0