2b8
@verb #3136:"vis invis amvis isvis" any none none rxd #2633
@program #3136:"vis invis amvis isvis" any none none
$dperms:only_owner()
loud = argstr == "loud"
if (verb == "vis")
  stat = $eve:invis_set(0, loud)
elseif (verb == "invis")
  stat = $eve:invis_set(1, loud)
elseif (verb in {"isvis", "amvis"})
  return $eve:tell("You are ", $eve:invis_get() ? "invisible" | "visible", ".")
endif
{vis, invis} = loud ? {"connected", "disconnected"} | {"visible", "invisible"}
msg = stat ? this.msg_invis | this.msg_vis
$eve.location:announce_all(this:msg_sub(msg))
$eve:tell("You are now ", stat ? invis | vis, ".")
"Last modified by Janette (#2633) on Thu Aug  9 15:00:54 2001 MDT."
.

0