I got it to scroll about twice as fast
Just go to settings and choose Full Screen Exclusive Mode - 800 x 600. Also, replace the code for generating the sprites with this:
For CreateLayerOne = 1 To MaxLayerOneTiles
Sprite CreateLayerOne, (LayerOneX#+(800*(CreateLayerOne-1))), LayerOneY#, 1
Set Sprite CreateLayerOne, 0, 1
Next CreateLayerOne
For CreateLayerTwo = (MaxLayerOneTiles+1) To ((MaxLayerOneTiles+1)+MaxLayerTwoTiles)
Sprite CreateLayerTwo, (LayerTwoX#+(800*(CreateLayerTwo-(MaxLayerOneTiles+1)))), LayerTwoY#, 2
Set Sprite CreateLayerTwo, 0, 1
Next CreateLayerTwo
Woohoo! I'm smart! Lol
SW Games - www.freewebs.com/swgames
Yeah, I know, I only have one game. Yeah, I know it sucks. But I made it! Me!