Lock my pc

[legend]

When I leave my desk, and forget to lock my pc, someone is often writing stuff on my pc...
So here's a script that locks it after 5 seconds of inactivity, you can always increase it.

expandcollapse popup

#include <Misc.au3>

Global $iIdleThreshold = 20000 ; 20 seconds in milliseconds

While True
    Local $iLastInputTime = TimerInit()
    Local $bActivityDetected = False

    While TimerDiff($iLastInputTime) < $iIdleThreshold
        For $i = 0x01 To 0xFF
            If _IsPressed(Hex($i, 2)) Then
                $bActivityDetected = True
                ExitLoop
            EndIf
        Next

        ; Get initial mouse position
        $aInitialMousePos = MouseGetPos()

        ; Allow a small delay to detect mouse movement
        Sleep(50)

        ; Check for mouse movement
        $aCurrentMousePos = MouseGetPos()
        If $aInitialMousePos[0] <> $aCurrentMousePos[0] Or $aInitialMousePos[1] <> $aCurrentMousePos[1] Then
            $bActivityDetected = True
            ExitLoop
        EndIf

        Sleep(100) ; Adjust the sleep time as needed for better responsivenesds
    WEnd

    If $bActivityDetected Then
        ConsoleWrite("Keyboard or mouse activity detected." & @CRLF)
    Else
        ConsoleWrite("No keyboard or mouse activity detected." & @CRLF)
        ShellExecute("rundll32.exe", 'user32.dll,LockWorkStation')
    EndIf
WEnd

 

Edited March 20 by legend

[SmOke_N]

Lol, I used to do that to people!!!  Turn their screens upside down too 😂

Global $iIdleThreshold = 20000 ; 5 seconds in milliseconds

That's 20 seconds btw...

[Nine]

_Timer_GetIdleTime does that for you...
 

[legend]

9 hours ago, Nine said:

_Timer_GetIdleTime does that for you...
 

I didn't knew that function, in that case, the code could be replaced with:
 

#include <Timers.au3>

while 1

sleep(5000)
$iIdleTime = _Timer_GetIdleTime()
if $iIdleTime > 4999 then
    $iIdleTime = ""
    ShellExecute("rundll32.exe", 'user32.dll,LockWorkStation')
EndIf

WEnd