Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Screensaver defeat for Win32

by pjbondi (Initiate)
on Mar 17, 2011 at 15:44 UTC ( #893794=note: print w/ replies, xml ) Need Help??


in reply to Screensaver defeat for Win32

Several years after your original post, this still works like a charm! Thank you. I suppose this is the #1 hit on google for screensaver defeat for a reason.

I'm using ActiveState Perl build 1006

Since the tk module is not installed by default, simply:

ppm install tk

output:

Downloading Tk-804.028...done Unpacking Tk-804.028...done Generating HTML for Tk-804.028...done Updating files in site area...done 845 files installed

I've found that changing from <space><backspace> to {SCROLLLOCK}{SCROLLLOCK} has less impact on any application which might be in the foreground. <space><backspace> would cause a Firefox application to navigate.


Comment on Re: Screensaver defeat for Win32
Select or Download Code
Re^2: Screensaver defeat for Win32 (mouse > keys)
by tye (Cardinal) on Mar 17, 2011 at 16:52 UTC

    Maybe you'd prefer the simpler Keep the playback rolling (Win32) which doesn't send any key strokes and just jiggles the mouse (and doesn't even have to do that) and automatically disables itself if you move the mouse. The thread includes several versions that have modified features, such as making it harder to accidentally disable.

    - tye        

      I had to update this thing due to a change at work (my 3rd employer since authoring the script). On their rolling out of the new Win7 boxen my script quit working. And get this! My company's IT department itself asked me if I might fix it. How cool is that?

      So I borrowed a loaner Win7 laptop, installed Strawberry Perl and changed the timing to update every minute (verus the fomer two minutes) and changed the default character set to a pair of SCROLLLOCK's (as per suggestion above). Those two in combination seem to have worked at least on this loaner laptop.

      While I was editing, I couldn't resist adding in a few new options. Foremost is to offer the choice of using Tye's mouse jiggle feature. This you may choose to employ either together-with or separately-from issuing key strokes. You also have a choice of key strokes.

      Lastly, while running it will check to see if the mouse has been already moved by the user. If it has then the script goes back to sleep for a further minute.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://893794]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (11)
As of 2014-07-11 04:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (218 votes), past polls