(set: $score to 10)
(set: $questions to (random:5,15))
(set: $Qnum to 0)
you will need to grade $questions questions
current standing: $score
[[proceed->1]]current standing: (print: $score)
(if:$score < 10)[this will not stand in our school]
(if:$score > 9)[I see you are at least qualified for an entry postion](set: $num1 to (random:1,10))
(set: $num2 to (random:1,10))
(set: $num3 to (random:1,20))
(set: $answer to ($num1 + $num2))
(set: $isTrue to (random:0,1))
(set: $Qnum to $Qnum + 1)
current standing: (print: $score)
question $Qnum / $questions
(if:$isTrue is 1)[(set: $num3 to $answer)]
[$num1 + $num2 = $num3]
[[true->1-1]]
[[false->1-2]](if:$num1 + $num2 is $num3)[(set: $score to $score + 1)correct]
(if:$num1 + $num2 is not $num3)[(set: $score to $score - 1)incorrect]
(if: $Qnum is not $questions)[[proceed->1]]
(if: $Qnum is $questions)[[proceed->2]](if:$num1 + $num2 is $num3)[(set: $score to $score - 1)incorrect]
(if:$num1 + $num2 is not $num3)[(set: $score to $score + 1)correct]
(if: $Qnum is not $questions)[[proceed->1]]
(if: $Qnum is $questions)[[proceed->2]]