sync on <<<<<<<<<<<<<<<<<<<<<<<<CHANGED
sync rate 0 <<<<<<<<<<<<<<<<<<< CHANGED
rem ScreenHeight# = 640
rem ScreenWidth# = 480
rem ColorDeapth# = 32
rem Set Display Mode ScreenHeight#,ScreenWidth#,ColorDeapth#
backdrop on
load object "sphere2.x",1
load image "water2.bmp",1
set object texture 1,2,0
load music "02-Propellerheads-Spybreak.mp3", 1
loop music 1
texture object 1,1
ycoord# = 10.0
xcoord# = 10.0
repeat
rotate object 1,0,xcoord# ,0
ycoord# = ycoord# + 1.0
xcoord# = xcoord# + 1.0
if upkey()=1 then move camera 1
if downkey()=1 then move camera -1
fps$="DBPro Fps: "+str$(screen fps())
text screen width()-20-text width(fps$),screen height()-40,fps$
sync<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<CHANGED
until escapekey() = 1
you need to set the sync rate ON not off, off gives you the default, slow, buggy sync system (automatic), on allows the code to run at maximum speed and only show the screen when you tell it to, you also set the sync rate to 0, not 1000, your card may well be capable of going higher than 1000 so why limit it?, 0 turns any limits off (up to the absolute maximum the system can cope with), since you have sync set to manual then you need to instruct the machine to show you the screen once per loop or you get to see nothing (when sync is on it`s up to YOU to decide when screens are shown), so you need a sync command just after the last instruction in the loop that makes a change to the screen, if you want to go even faster then you could try fastsync, but with a program that simple it may make no difference anyway, cheers.
Mentor.