Jump to content

Recommended Posts

Posted

HotKeySet("{F7}", 'Start')
HotKeySet("{F8}", 'Stop')

Func Start()
    Do
    MouseMove( 100, 100, 100)
    Sleep(400)
    MouseMove( 200, 200, 100)
    Sleep(400)
Until 'Stop'
EndFunc

Func Stop()
    Exit
EndFunc

Hey I have this: Because My friends computer turns standby if he does nothing in like 30 min... And he wanted me to make something that moves his mouse each 5 sec, I made this, but it doesn't work, please help :)

Posted

HotKeySet("{F7}", 'Start')
HotKeySet("{F8}", 'Stop')

Func Start()
    Do
    MouseMove( 100, 100, 100)
    Sleep(400)
    MouseMove( 200, 200, 100)
    Sleep(400)
Until 'Stop'
EndFunc

Func Stop()
    Exit
EndFunc

Hey I have this: Because My friends computer turns standby if he does nothing in like 30 min... And he wanted me to make something that moves his mouse each 5 sec, I made this, but it doesn't work, please help :)

You don't have the main loop, try this:

HotKeySet("{F7}", 'Start')
HotKeySet("{F8}", 'Stop')
HotKeySet("{ESC}",'Quit')
Global $STOP = False
Global $X = @DesktopWidth
Global $Y = @DesktopHeight

While 1
    Sleep(30)
WEnd

Func Start()
    $STOP = False
    Do
        MouseMove(Random(0,$X,1),Random(0,$Y,1))
        Sleep(5000)
    Until $STOP = True
EndFunc

Func Stop()
    $STOP = True
EndFunc
Posted

;KeepAlive
#NoTrayIcon

While TRUE
    $IE=ObjCreate("InternetExplorer.Application")
    Sleep(100)
    $IE.Quit
    Sleep(600000);10 Min.
WEnd

This will keep your desktop alive, just run it in startup and forget it.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...