Graphics3D 1440, 900, 0, 1 SetBuffer BackBuffer() cube = CreateCube() cam = CreateCamera() PositionEntity cam, 0, 0, -20 While Not KeyHit(1) TurnEntity cube, Rnd(0.0, 10.0), Rnd(0.0, 10.0), Rnd(0.0, 10.0) RenderWorld Flip Wend End
This example runs just fine on my machine (laptop with Windows Vista).
Compiled it as "MyScreenSaver.exe", then renamed to "MyScreenSaver.scr" and copied into C:\Windows\System32.
Right click on your desktop, then choose "Edit preferences", "Properties" or something like that (I'm using Dutch version of Windows, so I can't say what you need to choose).
Then choose "ScreenSaver" and select "MyScreenSaver" from the dropdown box.
Press the "Example" button and I see my screensaver running.