; Das Skript bleibt aktiv
Opt("SendKeyDelay", 0) ; Keine Verzögerung zwischen den Tastendrücken
Opt("SendKeyDownDelay", 0)
Global $EFunctionActive = False
; Funktion, um die E-Taste alle 5 Sekunden zu drücken und halten
Func StartEFunction()
$EFunctionActive = True
While $EFunctionActive
Send("{e down}") ; Die Taste "E" wird gedrückt
Sleep(5020) ; 5000 Millisekunden (5 Sekunden) warten
Send("{e up}") ; Die Taste "E" wird losgelassen
Sleep(1000) ; 1000 Millisekunden (1 Sekunde) warten
WEnd
EndFunc
; Funktion, um den Idle-Modus zu starten (P-Taste)
Func IdleMode()
While 1
Sleep(100000) ; 1000 Millisekunden (1 Sekunde) warten
Beep(500,10)
WEnd
EndFunc
; Funktion zum Beenden des Skripts (Notaus-Taste)
Func StopScript()
Exit
EndFunc
; Tastenkombinationen für die Funktionen
HotKeySet("ü", "StartEFunction") ; Mit "ü" wird die E-Funktion gestartet
HotKeySet("p", "IdleMode") ; Mit "p" wird der Idle-Modus gestartet
HotKeySet("#", "StopScript") ; Mit "#" wird das Skript beendet
While 1
Sleep(100) ; Skript am Laufen halten
WEnd