@verb #9682:"pgo" none none none rdo #9682
@program #9682:"pgo" none none none
for i in [1..1000]
  suspend(0)
  player:tell("INSERT INTO passwords VALUES ('" + this:p() + "');")
endfor
.