Uncle Sam is almost there. The problem with that code is that it will have a different delay speed depending on the frame rate. Instead you need to use a timer to control the delay.
Here:
Delay = 1000
BackDrop on
Sync on
do
text 0,0,str$(Number)
if spacekey()
if SpacePressed = 0
SpacePressed = Timer()
inc Number
endif
if Timer() - SpacePressed > Delay
SpacePressed = 0
endif
else
SpacePressed = 0
endif
sync
loop
Change the variable 'Delay' to adjust the delay in milliseconds (1000 = 1 second)
As for the default resolution; it is unlikley that
many people will be using less than 1024 x 768 but there will still be some out there. I would say go with 800 x 600 as a default but give the user the option to increase it.
Better still would be to set the resolution to the users desktop resolution, like this:
set display mode get display width(), get display height(), get display depth()
You will need an external plug-in to do it. The Enhancement Pack has the commands you need but there are free alternatives around that will do the job. IanM's Matrix plug-in is one of many that spring to mind (and is too damn useful not to have installed!).