442
@verb #2030:"look_self" this none this rxdo #987
@program #2030:"look_self" this none this
"Creates a description based on whether the player is inside or not."
if (player.location == this)
  where = valid(l = this.location) ? l:title() | tostr(l)
  this:jabber_quiet(this:msg_view1(), where)
  valid(l) ? (out_desc = this.location:description()) ? player:sub_tell(out_desc) | $msg:mtell("no_desc") | $msg:mtell("no_desc")
  if ($object_utils:isa(this.location, $room))
    this.location:tell_contents(setremove(this.location:contents(), this))
  endif
  this:jabber_quiet(this:msg_view2())
  this:tell_contents(setremove(this:contents(), player))
else
  if (desc = this:description())
    player:tell(desc)
    player:tell()
  endif
  $msg:mtell(this.who ? length(this.who) == 1 ? "desc_sing" | "desc_plur" | "desc_none", this.who, this:title_in())
  $msg:mtell(length(this.who) >= this.crowd && this.crowd ? "desc_noclimb" | "desc_climb", this.who, this:title_in())
  $cecil_utils:autoextend()
endif
"Last modified by Dax (#789) on Sat Apr 14 13:53:13 2001 MDT."
.

0