startTime = getCurrentTime()
doSomething()
put "It took you " getCurrentTime() - startTime " seconds to do something."

%Randomize a 9-digit integer for the game
randomize
var n1 : int
randint (n1, 100000000, 999999999)

%Introduction/Instructions to game
colour (2)
put "The instuctions are simple, all you have to do is..."
delay (2500)
put "Type the given number without any mistakes, what you typed will be invisable so"
delay (3500)
put "you only get one chance at typing the number unless you know your mistake, you"
delay (3500)
put "can simply 'backspace' to correct the error. Game begins in:"
delay (1500)
put ""

%Declares "number" as variable for number entered, loop created to re-run if number typed incorrectly
loop
var number : int

delay (750)
play ("a")
colour (4)
put "Five!"

delay (1000)
play ("a")
colour (4)
put "Four!"

delay (1000)
play ("a")
colour (4)
put "Three!"

delay (1000)
play ("a")
colour (4)
put "Two!"

delay (1000)
play ("a")
colour (4)
put "One!"

delay (500)
put ""

%Display the number
colour (1)
play ("f")
put n1

%Players enter number
colour (0)
put ""
get number

%if number is correct, program will not re-run
exit when number = n1

%clear screen, if number not correct it will re-run giving you a chance to try again
cls
colour (2)
put "The number you typed did not match given number, please try again! ;)"
delay(750)
put "Number will appear again in"
put ""
end loop

%if number typed was correct, everything will be cleared and congratulation message will be created
cls
colour (2)
locate(13,17)
put "You have successful typed: ", n1, " correctly!"