[R] Temps d'inactiver

[roselito13]

Bien le bonjour.

Je demande encore de l'aider, et oui ^^
Voici, mon BUT, lancer une fonction après un temps d'inactiver, du PC.

Donc j'ai penser a sa !

Code : Tout sélectionner

#include <Misc.au3>

Global $last_x = 0
Global $1 = 0
Global $Last_y = 0
Global $TIME
main()


Func main()
while 1
    Sleep(30000)
    If MouseGetPos(0) = $last_x Then
        If MouseGetPos(1) = $last_y Then
            Time()
        EndIf
    EndIf
    
$last_x = MouseGetPos(0)
$Last_y = MouseGetPos(1)

WEnd
Endfunc


Func Time()
    $TIME = TimerInit()
While $1 = 0
Sleep(30000)
If MouseGetPos(0) <> $last_x Then
    If MouseGetPos(1) <> $last_y Then
        ExitLoop
EndIf
If TimerDiff($TIME) > 600000 Then $1 = 1
EndIf
    
$last_x = MouseGetPos(0)
$Last_y = MouseGetPos(1)
    
WEnd
If $1 = 1 Then FONCTION()
EndFunc




Func FONCTION()
......
EndFunc

Voila sauf que la fonction n'est jamais appeler ... :/
ou trop vite, j'ai fait des changement, et avec cette méthode elle n'est jamais appeler.

[Tlem]

Il y à plus simple pour détecter une période d'innactivité ...

► Afficher le texte

Code : Tout sélectionner

#include <Timers.au3>

HotKeySet("{ESC}", "_Quit")

$IdleMinimum = 15000; Idle time in milliseconds

While 1
    If _Timer_GetIdleTime() >= $IdleMinimum Then
        ConsoleWrite("User inputs Idle longer than " & $IdleMinimum & "ms = GO!" & @LF)
        Do 
            Sleep(20)
        Until _Timer_GetIdleTime() < $IdleMinimum
    EndIf
    Sleep(20)
WEnd

Func _Quit()
    Exit
EndFunc  ;==>_Quit

[roselito13]

Bon au moins j'aurais réfléchie a la question ...


Merci, d'avoir répondue vite.