Sorry your browser is not supported!

randomize timer()
start:
Print "Press any key to genrate 4 random numbers."
wait key
for i = 1 to 4
	print rnd(100)
next i
input "Do you want to play again?", answer$
if lower$(answer$) = "yes"
	cls
	goto start
else
	cls
	print "Ah well, press any key to end."
	exit
endif
wait key
end

`use the timer value as the seed for random numbers
`this way the same numbers won't be picked each time your program runs.
randomize timer()
`create a label to come back to if you want to play again
start:
`Print message and wait until the user is ready to start (presses a key)
Print "Press any key to genrate 4 random numbers."
wait key
`pick 4 random nubers and print to screen
for i = 1 to 4
	print rnd(100)
next i
`ask the user if they want to play again
input "Do you want to play again?", answer$
`use the lower$ or upper$ command to make sure all capitalizations work
`I used lower$ go if user types any caps of "yes" then cls and go to beginning again
`else cls and print exit message and wait for the user to acknowledge (key press)
if lower$(answer$) = "yes"
	cls
	goto start
else
	cls
	print "Ah well, press any key to end."
endif
wait key
`makes sure everything is cleaned up on exit
end

randomize timer()
start:
cls
print "Press any key to generate 10 random numbers"
wait key
for i=1 to 10
print rnd (1000)
next i
svar:
input "Do you want to play again?", svar$
if lower$(svar$)= "yes" then gosub start
cls
if lower$(svar$)="no"
print "Well then, press any key to quit"
wait key
end
else
print "Sorry, answer yes or no"
sleep 1000
cls
gosub svar
end
endif