Here's the source code:
loop
cls
var name : string
put "What's your first name?"
get name
put "Hello ", name, ", get ready to practise your timestables!"
var number : int
put "What number do you want to practise on?"
put "(Example: 1, 3, 5, 9, 10, 15, 9847, etc.)"
get number
var Answer : string
put "Okay then, are you ready?"
get Answer
if Answer = "n"
then put "Well... we're going to start anyway!"
end if
if Answer = "N"
then put "Well... we're going to start anyway!"
end if
if Answer = "nah"
then put "Well... we're going to start anyway!"
end if
if Answer = "Nah"
then put "Well... we're going to start anyway!"
end if
if Answer = "no"
then put "Well... we're going to start anyway!"
end if
if Answer = "No"
then put "Well... we're going to start anyway!"
end if
if Answer = "naw"
then put "Well... we're going to start anyway!"
end if
if Answer = "Naw"
then put "Well... we're going to start anyway!"
end if
if Answer = "not"
then put "Well... we're going to start anyway!"
end if
if Answer = "Not"
then put "Well... we're going to start anyway!"
end if
if Answer = "negative"
then put "Well... we're going to start anyway!"
end if
if Answer = "Negative"
then put "Well... we're going to start anyway!"
end if
if Answer = "stop"
then put "Well... we're going to start anyway!"
end if
if Answer = "Stop"
then put "Well... we're going to start anyway!"
end if
if Answer = "y"
then put "Alright then, let's start!"
end if
if Answer = "Y"
then put "Alright then, let's start!"
end if
if Answer = "yes"
then put "Alright then, let's start!"
end if
if Answer = "Yes"
then put "Alright then, let's start!"
end if
if Answer = "ya"
then put "Alright then, let's start!"
end if
if Answer = "Ya"
then put "Alright then, let's start!"
end if
if Answer = "ye"
then put "Alright then, let's start!"
end if
if Answer = "Ye"
then put "Alright then, let's start!"
end if
if Answer = "yeah"
then put "Alright then, let's start!"
end if
if Answer = "Yeah"
then put "Alright then, let's start!"
end if
if Answer = "Positive"
then put "Alright then, let's start!"
end if
if Answer = "positive"
then put "Alright then, let's start!"
end if
if Answer = "go"
then put "Alright then, let's start!"
end if
if Answer = "Go"
then put "Alright then, let's start!"
end if
put ""
put "Ready, set, GO!"
put ""
var Number : int
var answer : int
var answerr : int
var count : int := 0
var right : int := 0
var wrong : int := 0
loop
randint (Number, 1, 12)
exit when count = 20
count := count + 1
put "Question #", count
put number, " x ", Number, " = " ..
get answer
answerr := number * Number
if answerr = answer then put "Correct!"
right := right + 1
end if
if answerr not = answer then put "Incorrect!"
wrong := wrong + 1
end if
put ""
end loop
var letter : string
if right < 10 then letter := "F"
end if
if right = 10 then letter := "D"
end if
if right = 11 then letter := "D"
end if
if right = 12 then letter := "C"
end if
if right = 13 then letter := "C"
end if
if right = 14 then letter := "B"
end if
if right = 15 then letter := "B"
end if
if right = 16 then letter := "A"
end if
if right = 17 then letter := "A"
end if
if right = 18 then letter := "A+"
end if
if right = 19 then letter := "A+"
end if
if right = 20 then letter := "A++"
end if
var game : string
if right = 20 then put "Wow ", name, "! You got Perfect!!!!!!!"
end if
put name, ", you got ", right, " correct, and ", wrong, " incorrect."
put "Your mark is ", (right / 20) * 100, "%! (", letter,")"
if right > wrong then put "Great job ", name, ", you passed! Care to try again?"
end if
if right < wrong then put "Too bad ", name, ", you failed! Care to try again?"
end if
get game
exit when game = "n"
exit when game = "N"
exit when game = "nah"
exit when game = "Nah"
exit when game = "no"
exit when game = "No"
exit when game = "naw"
exit when game = "Naw"
exit when game = "not"
exit when game = "Not"
exit when game = "negative"
exit when game = "Negative"
exit when game = "stop"
exit when game = "Stop"
end loop |
