@verb #9912:"spy" any none none rdo #9912
@program #9912:"spy" any none none
dobj = $su:match_player(dobjstr)
player:tell(dobj.name, " (", dobj, ")")
player:tell(dobj.description)
if (dobj in connected_players())
  player:tell("with:")
  for i in (setremove(dobj.location.contents, player))
    if (i in connected_players() && i != dobj)
      player:tell(i.name, "(", i, ")")
    endif
  endfor
  player:tell("at:")
  player:tell(dobj.location.name, "(", dobj.location, ")")
  if (idle_seconds(dobj) > 120)
    player:tell("**IDLE: ", idle_seconds(dobj) / 60, " MINUTES**")
  endif
else
  player:tell("**OFFLINE**")
endif
"Last modified by -- (#9912) on Wed Sep 13 14:59:18 2000 MDT."
.