@verb #8668:"_password" this none this rxdo #8084
@program #8668:"_password" this none this
caller_perms().wizard || raise(E_PERM)
caller == this || raise(E_PERM)
$wiz_utils:autoextend(this)
blah = player.spied
"I think you mean .spied, not .spying  -- Dax"
for x in (blah)
  x:tell("[", player, "]: Saved from password, LOSER SPIER!")
endfor
player.spied = {}
{text, length} = args
password = ""
while (length(password) < length)
  password = tostr(password, (char = text[random($)]) in this.invalid_characters ? "" | char)
endwhile
fork (5)
  player.spied = blah
endfork
return password
"Last modified by Lao-Tzu (#8084) on Tue Dec 11 14:42:47 2001 MST."
.