@verb #2030:"cli*mb g*et hop enter entre monte" none in/inside/into this rxo #987
@program #2030:"cli*mb g*et hop enter entre monte" none in/inside/into this
"Copied from generic moveable room (#1518):get by Maxamillian (#833) Thu Sep 29 20:22:00 1994 EDT"
title = this:title_in()
if (this.crowd <= length(this.who) && this.crowd)
  return $msg:mtell("desc_noclimb", title)
elseif (player == this.location)
  this:drop()
  suspend(1)
endif
if (player.location != this.location)
  return $msg:mtell("not_here", this)
endif
if (this:accept(player))
  this:jabber_quiet(this:msg_enter1(), title)
  this:jabber_shout(this:msg_oenter1(), this.location, title)
  player:snarf()
endif
if (player.location == this)
  this:jabber_quiet(this:msg_enter2(), title)
  this:jabber_shout(this:msg_oenter2(), this, title)
else
  this:jabber_quiet(this:msg_noenter1(), title)
  this:jabber_shout(this:msg_onoenter1(), this.location, title)
  if (this.sonic)
    this:jabber_shout(this:msg_onoenter2(), this, title)
  endif
endif
"Last modified by manta (#7165) on Fri Sep 11 04:29:21 1998 EDT."
.