deactivate screensaver - GameCreators Forum

Author

Message

Esther

17

Years of Service

User Offline

Joined: 3rd Aug 2007

Location:

Posted: 21st Mar 2008 00:33

Link

Hi there..
I was wondering if there is a way to disable the screensaver in darkbasic. I mostly use a joypad for my own games but after a few minutes the screensaver kicks in. then I have to touch the keyboard or move the mouse to get my game back.

surely there must be a way to do fool the system into thinking that someone has touched a keyboard or a mouse.

Es.

Back to top

Profile PM

jinzai

18

Years of Service

User Offline

Joined: 19th Aug 2006

Location: USA

Posted: 21st Mar 2008 10:39 Edited at: 21st Mar 2008 10:40

Link

That would be the long way around that fence. Try this instead:

+ Code Snippet

sync on
SetScreenSaverEnabled(0)
do
   cls 0
   print "Testing screen saver enable."
   sync
loop
SetScreenSaverEnabled(1)
end

function SetScreenSaverEnabled(enable as integer)
   local itemp as integer
   local user32dll as integer = 1

   while user32dll < 256 and dll exist(user32dll)
      inc user32dll
   endwhile
   if user32dll > 255 then exitfunction -1
   load dll "user32.dll", user32dll
   itemp = call dll(user32dll, "SystemParametersInfoA", 0x0011, enable, 0, 0)
   delete dll user32dll
endfunction itemp

Back to top

Profile PM Email Website

Esther

17

Years of Service

User Offline

Joined: 3rd Aug 2007

Location:

Posted: 23rd Mar 2008 23:43

Link

thanks, i'll try that.

Although it seems odd to me to have a function call and an "end" command after a loop instruction.

Back to top

Profile PM

IanM

Retired Moderator

22

Years of Service

User Offline

Joined: 11th Sep 2002

Location: In my moon base

Posted: 24th Mar 2008 00:00

Link

The code is a little misleading. Basically, you need to make sure that you reset the screensaver setting before you exit your program, as it's a system-wide setting - something like this:

+ Code Snippet

sync on
disable escapekey
SetScreenSaverEnabled(0)
repeat
   cls 0
   print "Testing screen saver enable."
   sync
until escapekey() = 1
SetScreenSaverEnabled(1)
end

function SetScreenSaverEnabled(enable as integer)
   local itemp as integer
   local user32dll as integer = 1

   while user32dll < 256 and dll exist(user32dll)
      inc user32dll
   endwhile
   if user32dll > 255 then exitfunction -1
   load dll "user32.dll", user32dll
   itemp = call dll(user32dll, "SystemParametersInfoA", 0x0011, enable, 0, 0)
   delete dll user32dll
endfunction itemp

[b]Utility plugins collection (updated 16/03/08) and
http://www.matrix1.demon.co.uk

Back to top

Profile PM Email Website

Esther

17

Years of Service

User Offline

Joined: 3rd Aug 2007

Location:

Posted: 27th Mar 2008 23:46

Link

I already figured that out

and the code works fine. thanks for your help.

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / deactivate screensaver