Screensaver Problem

Blitz3D Forums/Blitz3D Beginners Area/Screensaver Problem

At the moment all you have there is a skeleton program. To make it actually DO something, you'll need to add your code into the individual functions. You may also want additional declarations such as models loading and camera's etc. Of course, what actually gets added to each function and to the declarations depends entirely on what your screensaver does.
;* * 
;Declarations 

AppTitle "ScreenSaver" 
ChangeDir SystemProperty$("appdir") ;This line is important when running as a Screensaver in Windows. 
;Disable it while testing in Blitz (because the "appdir" of Blitz is "\bin"...) 
If CommandLine$() = "" Or Left$(CommandLine$(),2) = "/C" Or Left$(CommandLine$(),2) = "/c" Then ConfigScreensaver 
If CommandLine$() = "/S" Or CommandLine$() = "/s" Then ExecuteScreensaver 
End 

;--------------------------------------- 

Function ConfigScreensaver() 
	;!!PUT YOUR CONFIG CODE HERE!!

	End 
End Function 

;--------------------------------------- 

Function ExecuteScreensaver() 
	;Graphics mode (fullscreen), double buffering command(s) and loading of images, meshes, sounds... 
	FlushKeys 
	FlushMouse 
	MoveMouse 0,0 
	Repeat 
	;!!PUT YOUR CODE HERE!!

	Until MouseX() <> 0 Or MouseY() <> 0 Or GetKey() <> 0 Or GetMouse() <> 0 
	End 
End Function