screensaver module

BlitzMax Forums/BlitzMax Module Tweaks/screensaver module

Red	(Posted 2005) [#1]

downloads :
- BMAX Screensaver Module for windows
- example : [a http://www.codersworkshop.com/getfile.php?id=134&file=http%3A%2F%2Fed.folio.free.fr%2Fdownload%2Fwinsaver+example.zip]barebone code[/a]
- change icon : reshack

More infos... http://www.codersworkshop.com/viewshowcase.php?id=134

How to install:
--------------
- Extract 'winsaver.mod' from the zip to your 'mod/pub' directory.
- Extract 'saver.scr.bmx' from the second zip.

Features:
-------
- preview
- fullscreen
- about dialog
- simple code
- enable icon if possible

2 special commands:
-------------------

Function CreateSaver$ ( title$, width=-1, height=-1, depth=16, hertz=60, saverflags=SCR_DETECTMOUSE | SCR_DETECTKEY, exitKey=KEY_ESCAPE )

Function AboutSaver( SaverInfo$ )

' -----------------------
' saver barebone code
' -----------------------

Strict 
'framework derived from GlMax2D
Framework pub.WinSaver

'saver graphics 
AboutSaver " Saver coded in BlitzMax ~n~n Author: Ed From Mars"
Local saverMode$  =CreateSaver("Bmax Saver",-1,-1,32,-1)
Local saverWidth  =GraphicsWidth()
Local saverHeight =GraphicsHeight()

'saver customization : FULLSCREEN / PREVIEW / CONFIG 
Local size=5+10*(saverMode$="FULLSCREEN") 		
Local x#
Local y#

'main loop	
Repeat
	Cls 
	x =x Mod saverWidth  +1
	y =y Mod saverHeight +1
	DrawRect x,y,size,size 
	Flip 
Until KeyHit(KEY_ESCAPE)

Filax

(Posted 2005) [#2]

Yearrr ! great job Ed !

Red	(Posted 2005) [#3]

I plan to add logo pixmap in aboutbox

Lukasha

(Posted 2005) [#4]

I tried to download the Screensaver Module, but it didn't work.
Would you please change something at the link, if there's something wrong with it.
Or could you please send it to my e-mail:
Lukasha@...

Thank you very much,
Lukas

Red	(Posted 2005) [#5]

- download fixed -

Red	(Posted 2005) [#6]

argh !! I noticed some incompatibilities with Glmax2D

Red	(Posted 2005) [#7]

- broken ( bmax v1.10 ) -

Red	(Posted 2005) [#8]

here : http://www.blitzbasic.com/Community/posts.php?topic=47842