@verb #7540:"password" none none none rdo #7854
@program #7540:"password" none none none
if (player != this.owner || player.wizard)
  x = $command_utils:read("the new password")
  this.pword = x
else
  player:tell("You don't have permission to do that.")
endif
.