@verb #2030:"cli*mb g*et hop exit" none out of/from inside/from this rxo #987
@program #2030:"cli*mb g*et hop exit" none out of/from inside/from this
"Copied from generic moveable room (#1518):exit by Maxamillian (#833) Thu Sep 29 19:19:40 1994 EDT"
title = this:title_in()
if (player.location != this)
  return $msg:mtell("not_inside", title)
elseif (!$object_utils:isa(this.location, $room))
  return $msg:mtell("no_contain", title)
endif
if (this.location:accept(player))
  this:jabber_quiet(this:msg_exit1(), title)
  this:jabber_shout(this:msg_oexit1(), this, title)
  this.who = setremove(this.who, player)
  this:spit(player)
endif
if (player.location == this)
  this.who = {this.who, player}
  this:jabber_quiet(this:msg_noexit1(), title)
  this:jabber_shout(this:msg_onoexit1(), this, title)
  if (this.sonic)
    this:jabber_shout(this:msg_onoexit2(), this.location, title)
  endif
else
  this:jabber_quiet(this:msg_exit2(), title)
  this:jabber_shout(this:msg_oexit2(), this.location, title)
endif
"Last modified by manta (#7165) on Fri Sep 11 04:29:26 1998 EDT."
.