@verb #4980:"hyper" any none none rxd #9223
@program #4980:"hyper" any none none
"hyper [go | stop]"
if (args && args[1] == "go")
  if (!$list_utils:assoc(player, this.hyperpeople, 1))
    this.hyperpeople = {@this.hyperpeople, {player, {player}, {"extra"}}}
    this.owner:tell("hyper-add: ", toliteral(this.hyperpeople))
    this:welcome()
  else
    player:tell("HTML MODE for you is already ON!")
  endif
elseif (args && args[1] == "stop")
  if (which = $list_utils:iassoc(player, this.hyperpeople, 1))
    player:tell("You are now back in TELNET TEXT MODE!")
    this.hyperpeople = setremove(this.hyperpeople, $list_utils:assoc(player, this.hyperpeople))
    this.owner:tell("hyper-drop: ", toliteral(this.hyperpeople))
  else
    player:tell("HTML MODE for you is already OFF! You are in TELNET TEXT MODE!")
  endif
else
  player:tell("What the hell was that?!  hyper go/stop ")
endif
"Last modified by Wingy (#9223) on Tue Jan 28 07:50:32 2003 MST."
.