#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=ct3.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <Misc.au3>

Opt("SendKeyDelay", 0) ;5 milliseconds
Opt("SendKeyDownDelay", 0) ;1 millisecond


$dll = DllOpen("user32.dll")
HotKeySet("{pgup}", "Start")
HotKeySet("{pgdn}", "Pause")
Opt("SendKeyDelay", 1)
While 1
Sleep(5)
WEnd





Func Start()
While 1

        if _IsPressed("70", $dll) Then ;70 = solange F1 gedrückt ist
        $x=1
        while $x=1
            send ("{F1}") ;f1 drücken
            sleep(15) ;5ms warten
                MouseClick("left") ;mausklick links
;~              MouseClick("left") ;mausklick links

                            sleep(100) ; x ms warten

                            Send("{ALT down}")
                            sleep(5)
                            Send("{1 down}")
                            sleep(5)

                            Send("{1 up}")
                            sleep(5)
                            Send("{ALT up}")
                            sleep(5)

                            sleep(100)


            if _IsPressed("70", $dll)=0 Then $x=2;70 = solange F1 gedrückt ist
        WEnd
    EndIf


;~     if _IsPressed("71", $dll) Then
;~         $x=1
;~         while $x=1
;~             send ("{F2}")
;~              MouseClick("left")
;~             if _IsPressed("71", $dll)=0 Then $x=2
;~      WEnd
;~                      MouseClick("left")
;~     EndIf

 Sleep(1)
WEnd
EndFunc


Func Pause()

    While 1
    Sleep(100)
    WEnd
EndFunc