@verb #2526:"q" none none none rdo #7921
@program #2526:"q" none none none
questions = {}
for x in [this.range[1]..this.range[2]]
  questions = {@questions, @#7921.nmc[x]}
endfor
rand = random(length(questions))
player:tell(questions[rand][2])
$command_utils:Read()
player:tell(questions[rand][1])
.