Jump to content
Sign in to follow this  
Verssuss

Best way to set your hotheys

Recommended Posts

Hello guys. how are u doing today ?? Im new here but i wanted show somethink i just did. 
best kind of dynamic way to set hotkeys in yours own program.

i need any suggestions, bugs report or any way to improve or any way i can do it better. 

its first my own "example" so be easy for me.

 

Thank u for your attention !!!
#include <Misc.au3>
#include <MsgBoxConstants.au3>
#include <GUIConstantsEx.au3>

$GUI = GUICreate("set hotkeys", -1,-1)
GUISetState()

$button_hotkey = GUICtrlCreateButton("", 80, 30, 150, 25)
$button_empty = GUICtrlCreateButton("", -1 ,-1)
GUICtrlSetState ($button_empty, $GUI_HIDE)

Local $hDLL = DllOpen("user32.dll")

$start = False
$CTRL = False
$SHIFT = False
$ALT = False
$SHIFTCTRL = False
$SHIFTALT = False
$CTRLALT = False
$SHIFTCTRLALT = False

$klawisz_shift = ""
$klawisz_ctrl = ""
$klawisz_alt = ""
Global $klawisz_shift_autoit, $klawisz_ctrl_autoit, $klawisz_alt_autoit, $klawisz, $klawisz_autoit

While 1
    $Msg = GUIGetMsg()
        Switch $Msg
            Case $GUI_EVENT_CLOSE
                Exit
            Case $button_hotkey
                GUICtrlSetState($button_empty, $GUI_FOCUS)
                HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit)
                $start = True
                $SHIFT = False
                $CTRL = False
                $ALT = False
                $SHIFTCTRL = False
                $SHIFTALT = False
                $CTRLALT = False
                $SHIFTCTRLALT = False
                GUISetState(@SW_DISABLE, $GUI)
                $klawisz_shift = ""
                $klawisz_ctrl = ""
                $klawisz_alt = ""
                $klawisz_shift_autoit = ""
                $klawisz_ctrl_autoit = ""
                $klawisz_alt_autoit = ""
                $klawisz_autoit = ""
                $klawisz = ""
                GUICtrlSetData($button_hotkey, "Press Hot Key")
                pobierz_hotkey()
        EndSwitch
WEnd


Func pobierz_hotkey()
    While $start = True
        If $start = True And _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) And $SHIFT = False Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = ""
            $klawisz_alt = ""
            $klawisz_shift_autoit = "+"
            $klawisz_ctrl_autoit = ""
            $klawisz_alt_autoit = ""
            $SHIFT = True
            $CTRL = False
            $ALT = False
            $SHIFTCTRL = False
            $SHIFTALT = False
            $CTRLALT = False
            $SHIFTCTRLALT = False
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $SHIFT = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = "SHIFT"
            $klawisz_ctrl = ""
            $klawisz_alt = ""
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            $start = False
        EndIf ; SHIFT

        If $start = True And Not _IsPressed('10', $hDLL) And _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) And $CTRL = False Then
            $klawisz_shift = ""
            $klawisz_ctrl = "CTRL + "
            $klawisz_alt = ""
            $klawisz_shift_autoit = ""
            $klawisz_ctrl_autoit = "^"
            $klawisz_alt_autoit = ""
            $SHIFT = False
            $CTRL = True
            $ALT = False
            $SHIFTCTRL = False
            $SHIFTALT = False
            $CTRLALT = False
            $SHIFTCTRLALT = False
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $CTRL = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = ""
            $klawisz_ctrl = "CTRL"
            $klawisz_alt = ""
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf ; CTRL

        If $start = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And _IsPressed('12', $hDLL) And $ALT = False Then
            $klawisz_shift = ""
            $klawisz_ctrl = ""
            $klawisz_alt = "ALT + "
            $klawisz_shift_autoit = ""
            $klawisz_ctrl_autoit = ""
            $klawisz_alt_autoit = "!"
            $SHIFT = False
            $CTRL = False
            $ALT = True
            $SHIFTCTRL = False
            $SHIFTALT = False
            $CTRLALT = False
            $SHIFTCTRLALT = False
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $ALT = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = ""
            $klawisz_ctrl = ""
            $klawisz_alt = "ALT"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf ; ALT

        If $start = True And _IsPressed('10', $hDLL) And _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) And $SHIFTCTRL = False Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = "CTRL + "
            $klawisz_alt = ""
            $klawisz_shift_autoit = "+"
            $klawisz_ctrl_autoit = "^"
            $klawisz_alt_autoit = ""
            $SHIFT = False
            $CTRL = False
            $ALT = False
            $SHIFTCTRL = True
            $SHIFTALT = False
            $CTRLALT = False
            $SHIFTCTRLALT = False
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $SHIFTCTRL = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = "CTRL"
            $klawisz_alt = ""
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf ; SHIFT CTRL


        If $start = True And _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And _IsPressed('12', $hDLL) And $SHIFTALT = False Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = ""
            $klawisz_alt = "ALT + "
            $klawisz_shift_autoit = "+"
            $klawisz_ctrl_autoit = ""
            $klawisz_alt_autoit = "!"
            $SHIFT = False
            $CTRL = False
            $ALT = False
            $SHIFTCTRL = False
            $SHIFTALT = True
            $CTRLALT = False
            $SHIFTCTRLALT = False
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $SHIFTCTRL = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = ""
            $klawisz_alt = "ALT"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf ;SHIFT ALT

        If $start = True And Not _IsPressed('10', $hDLL) And _IsPressed('11', $hDLL) And _IsPressed('12', $hDLL) And $CTRLALT = False Then
            $klawisz_shift = ""
            $klawisz_ctrl = "CTRL + "
            $klawisz_alt = "ALT + "
            $klawisz_shift_autoit = ""
            $klawisz_ctrl_autoit = "^"
            $klawisz_alt_autoit = "!"
            $SHIFT = False
            $CTRL = False
            $ALT = False
            $SHIFTCTRL = False
            $SHIFTALT = False
            $CTRLALT = True
            $SHIFTCTRLALT = False
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $CTRLALT = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = ""
            $klawisz_ctrl = "CTRL + "
            $klawisz_alt = "ALT"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf ; CTRL ALT

        If $start = True And _IsPressed('10', $hDLL) And _IsPressed('11', $hDLL) And _IsPressed('12', $hDLL) And $SHIFTCTRLALT = False Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = "CTRL + "
            $klawisz_alt = "ALT + "
            $klawisz_shift_autoit = "+"
            $klawisz_ctrl_autoit = "^"
            $klawisz_alt_autoit = "!"
            $SHIFT = False
            $CTRL = False
            $ALT = False
            $SHIFTCTRL = False
            $SHIFTALT = False
            $CTRLALT = False
            $SHIFTCTRLALT = True
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
        ElseIf $start = True And $SHIFTCTRLALT = True And Not _IsPressed('10', $hDLL) And Not _IsPressed('11', $hDLL) And Not _IsPressed('12', $hDLL) Then
            $klawisz_shift = "SHIFT + "
            $klawisz_ctrl = "CTRL + "
            $klawisz_alt = "ALT"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf ; SHIFT CTRL ALT

 ;/////// /////// /////// /////// /////// /////// /////// /////// ///////

        If $start = True And _IsPressed('08', $hDLL) Then
            $klawisz = "BACKSPACE"
            $klawisz_autoit = "{BACKSPACE}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('09', $hDLL) Then
            $klawisz = "TAB"
            $klawisz_autoit = "{TAB}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('0D', $hDLL) Then
            $klawisz = "ENTER"
            $klawisz_autoit = "{ENTER}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('13', $hDLL) Then
            $klawisz = "PAUSE"
            $klawisz_autoit = "{PAUSE}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('14', $hDLL) Then
            $klawisz = "CAPSLOCK"
            $klawisz_autoit = "{CAPSLOCK}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('1B', $hDLL) Then
            $klawisz = "ESC"
            $klawisz_autoit = "{ESC}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('20', $hDLL) Then
            $start = False
            $klawisz = "SPACEBAR"
            $klawisz_autoit = "{SPACE}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('21', $hDLL) Then
            $klawisz = "PAGE UP"
            $klawisz_autoit = "{PGUP}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('22', $hDLL) Then
            $klawisz = "PAGE DOWN"
            $klawisz_autoit = "{PGDN}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('23', $hDLL) Then
            $klawisz = "END"
            $klawisz_autoit = "{END}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('24', $hDLL) Then
            $klawisz = "HOME"
            $klawisz_autoit = "{HOME}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('25', $hDLL) Then
            $klawisz = "LEFT ARROW"
            $klawisz_autoit = "{LEFT}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('26', $hDLL) Then
            $klawisz = "UP ARROW "
            $klawisz_autoit = "{UP}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('27', $hDLL) Then
            $klawisz = "RIGHT ARROW"
            $klawisz_autoit = "{RIGHT}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('28', $hDLL) Then
            $klawisz = "DOWN ARROW"
            $klawisz_autoit = "{DOWN}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
;~      If $start = True And _IsPressed('29', $hDLL) Then
;~          $klawisz = "SELECT"
;~          $klawisz_autoit = "???"
;~          GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
;~          GUISetState(@SW_ENABLE)
;~          HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
;~          $start = False
;~      EndIf
        If $start = True And _IsPressed('2A', $hDLL) Then
            $klawisz = "PRINT"
            $klawisz_autoit = "{PRINTSCREEN}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
;~      If $start = True And _IsPressed('2B', $hDLL) Then
;~          $klawisz = "EXECUTE"
;~          $klawisz_autoit = "???"
;~          GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
;~          GUISetState(@SW_ENABLE)
;~          HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
;~          $start = False
;~      EndIf
        If $start = True And _IsPressed('2C', $hDLL) Then
            $klawisz = "PRINT SCREEN"
            $klawisz_autoit = "{PRINTSCREEN}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('2D', $hDLL) Then
            $klawisz = "INS"
            $klawisz_autoit = "{INS}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('2E', $hDLL) Then
            $klawisz = "DEL"
            $klawisz_autoit = "{DEL}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('30', $hDLL) Then
            $klawisz = "0"
            $klawisz_autoit = "0"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('31', $hDLL) Then
            $klawisz = "1"
            $klawisz_autoit = "1"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('32', $hDLL) Then
            $klawisz = "2"
            $klawisz_autoit = "2"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('33', $hDLL) Then
            $klawisz = "3"
            $klawisz_autoit = "3"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('34', $hDLL) Then
            $klawisz = "4"
            $klawisz_autoit = "4"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('35', $hDLL) Then
            $klawisz = "5"
            $klawisz_autoit = "5"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('36', $hDLL) Then
            $klawisz = "6"
            $klawisz_autoit = "6"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('37', $hDLL) Then
            $klawisz = "7"
            $klawisz_autoit = "7"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('38', $hDLL) Then
            $klawisz = "8"
            $klawisz_autoit = "8"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('39', $hDLL) Then
            $klawisz = "9"
            $klawisz_autoit = "9"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('41', $hDLL) Then
            $klawisz = "a"
            $klawisz_autoit = "a"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('42', $hDLL) Then
            $klawisz = "b"
            $klawisz_autoit = "b"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('43', $hDLL) Then
            $klawisz = "c"
            $klawisz_autoit = "c"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('44', $hDLL) Then
            $klawisz = "d"
            $klawisz_autoit = "d"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('45', $hDLL) Then
            $klawisz = "e"
            $klawisz_autoit = "e"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('46', $hDLL) Then
            $klawisz = "f"
            $klawisz_autoit = "f"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('47', $hDLL) Then
            $klawisz = "g"
            $klawisz_autoit = "g"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('48', $hDLL) Then
            $klawisz = "h"
            $klawisz_autoit = "h"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('49', $hDLL) Then
            $klawisz = "i"
            $klawisz_autoit = "i"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('4A', $hDLL) Then
            $klawisz = "j"
            $klawisz_autoit = "j"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('4B', $hDLL) Then
            $klawisz = "k"
            $klawisz_autoit = "k"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('4C', $hDLL) Then
            $klawisz = "l"
            $klawisz_autoit = "l"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('4D', $hDLL) Then
            $klawisz = "m"
            $klawisz_autoit = "m"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('4E', $hDLL) Then
            $klawisz = "n"
            $klawisz_autoit = "n"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('4F', $hDLL) Then
            $klawisz = "o"
            $klawisz_autoit = "o"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('50', $hDLL) Then
            $klawisz = "p"
            $klawisz_autoit = "p"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('51', $hDLL) Then
            $klawisz = "q"
            $klawisz_autoit = "q"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('52', $hDLL) Then
            $klawisz = "r"
            $klawisz_autoit = "r"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('53', $hDLL) Then
            $klawisz = "s"
            $klawisz_autoit = "s"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('54', $hDLL) Then
            $klawisz = "t"
            $klawisz_autoit = "t"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('55', $hDLL) Then
            $klawisz = "u"
            $klawisz_autoit = "u"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('56', $hDLL) Then
            $klawisz = "v"
            $klawisz_autoit = "v"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('57', $hDLL) Then
            $klawisz = "w"
            $klawisz_autoit = "w"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('58', $hDLL) Then
            $klawisz = "x"
            $klawisz_autoit = "x"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('59', $hDLL) Then
            $klawisz = "y"
            $klawisz_autoit = "y"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('5A', $hDLL) Then
            $klawisz = "z"
            $klawisz_autoit = "z"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('60', $hDLL) Then
            $klawisz = "KP 0"
            $klawisz_autoit = "{NUMPAD0}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('61', $hDLL) Then
            $klawisz = "KP 1"
            $klawisz_autoit = "{NUMPAD1}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('62', $hDLL) Then
            $klawisz = "KP 2"
            $klawisz_autoit = "{NUMPAD2}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('63', $hDLL) Then
            $klawisz = "KP 3"
            $klawisz_autoit = "{NUMPAD3}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('64', $hDLL) Then
            $klawisz = "KP 4"
            $klawisz_autoit = "{NUMPAD4}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('65', $hDLL) Then
            $klawisz = "KP 5"
            $klawisz_autoit = "{NUMPAD5}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('66', $hDLL) Then
            $klawisz = "KP 6"
            $klawisz_autoit = "{NUMPAD6}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('67', $hDLL) Then
            $klawisz = "KP 7"
            $klawisz_autoit = "{NUMPAD7}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('68', $hDLL) Then
            $klawisz = "KP 8"
            $klawisz_autoit = "{NUMPAD8}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('69', $hDLL) Then
            $klawisz = "KP 9"
            $klawisz_autoit = "{NUMPAD9}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('6A', $hDLL) Then
            $klawisz = "KP Multiply"
            $klawisz_autoit = "{NUMPADMULT}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('6B', $hDLL) Then
            $klawisz = "KP Add"
            $klawisz_autoit = "{NUMPADADD}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('6C', $hDLL) Then
            $klawisz = "Separator"
            $klawisz_autoit = "??"                              ;/////////////////////////
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('6D', $hDLL) Then
            $klawisz = "KP Subtract"
            $klawisz_autoit = "{NUMPADSUB}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('6E', $hDLL) Then
            $klawisz = "KP dot"
            $klawisz_autoit = "{NUMPADDOT}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('6F', $hDLL) Then
            $klawisz = "KP slash"
            $klawisz_autoit = "{NUMPADDIV}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('70', $hDLL) Then
            $klawisz = "F1"
            $klawisz_autoit = "{F1}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('71', $hDLL) Then
            $klawisz = "F2"
            $klawisz_autoit = "{F2}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('72', $hDLL) Then
            $klawisz = "F3"
            $klawisz_autoit = "{F3}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('73', $hDLL) Then
            $klawisz = "F4"
            $klawisz_autoit = "{F4}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('74', $hDLL) Then
            $klawisz = "F5"
            $klawisz_autoit = "{F5}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('75', $hDLL) Then
            $klawisz = "F6"
            $klawisz_autoit = "{F6}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('76', $hDLL) Then
            $klawisz = "F7"
            $klawisz_autoit = "{F7}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('77', $hDLL) Then
            $klawisz = "F8"
            $klawisz_autoit = "{F8}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('78', $hDLL) Then
            $klawisz = "F9"
            $klawisz_autoit = "{F9}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('79', $hDLL) Then
            $klawisz = "F10"
            $klawisz_autoit = "{F10}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('7A', $hDLL) Then
            $klawisz = "F11"
            $klawisz_autoit = "{F11}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('7B', $hDLL) Then
            $klawisz = "F12"
            $klawisz_autoit = "{F12}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('90', $hDLL) Then
            $klawisz = "NUM LOCK"
            $klawisz_autoit = "{NUMLOCK}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('91', $hDLL) Then
            $klawisz = "SCROLL LOCK"
            $klawisz_autoit = "{SCROLLLOCK}"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
;~      If $start = True And _IsPressed('A5', $hDLL) Then
;~          $klawisz = "Right MENU "
;~          $klawisz_autoit = "{RWIN}"
;~          GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
;~          GUISetState(@SW_ENABLE)
;~          HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
;~          $start = False
;~      EndIf
        If $start = True And _IsPressed('BA', $hDLL) Then
            $klawisz = ";"
            $klawisz_autoit = ";"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('BB', $hDLL) Then
            $klawisz = "="
            $klawisz_autoit = "="
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('BC', $hDLL) Then
            $klawisz = ","
            $klawisz_autoit = ","
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('BD', $hDLL) Then
            $klawisz = "-"
            $klawisz_autoit = "-"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('BE', $hDLL) Then
            $klawisz = "."
            $klawisz_autoit = "."
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('BF', $hDLL) Then
            $klawisz = "/"
            $klawisz_autoit = "/"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('C0', $hDLL) Then
            $klawisz = "`"
            $klawisz_autoit = "`"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('DB', $hDLL) Then
            $klawisz = "["
            $klawisz_autoit = "["
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('DC', $hDLL) Then
            $klawisz = "\"
            $klawisz_autoit = "\"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
        If $start = True And _IsPressed('DD', $hDLL) Then
            $klawisz = "]"
            $klawisz_autoit = "]"
            GUICtrlSetData($button_hotkey, $klawisz_shift&$klawisz_ctrl&$klawisz_alt&$klawisz)
            GUISetState(@SW_ENABLE)
            HotKeySet ($klawisz_shift_autoit&$klawisz_ctrl_autoit&$klawisz_alt_autoit&$klawisz_autoit, "_beep")
            $start = False
        EndIf
    WEnd
EndFunc

Func _beep()
    Beep(500,200)
EndFunc   ;==>_quit

just one thing i dont discover yet is how disable quit program by press ESC while $button_hotkey is already pressed

Share this post


Link to post
Share on other sites

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
Sign in to follow this  

  • Similar Content

    • By mannworks00
      Hey all,
      I know this code has been attempted before as a GUI app, and it would not copy text properly. Here is an updated version of the Google Search Shortcut  Script from: Google Search Shortcut Script
      #Region #AutoIt3Wrapper_Outfile=shortcuts.exe #EndRegion #include <Clipboard.au3> Opt("TrayMenuMode", 3) Opt("TrayOnEventMode", 1) HotKeySet("{F1}", "_googleit") TraySetToolTip("Right click to exit") TrayCreateItem("Exit") TrayItemSetOnEvent(-1, "_exit") While 1 Sleep(20) WEnd #cs _googleit() Source User: ViciousXUSMC https://www.autoitscript.com/forum/topic/177446-google-search-shortcut-script/?do=findComment&comment=1273519 #ce Source Func _googleit() Opt("WinTitleMatchMode", 2) ;Set Title Match To "Any Part of String" $sOldClip = ClipGet() ;Save Current Clipboard Send("^c") ;Copy Selected Text to Clipboard *before losing focus of current window WinActivate("Google Chrome", "") ; activate chrome ShellExecute("https://www.google.at/search?q=" & URLEncode(_ClipBoard_GetData())) ;Navigate to search ClipPut($sOldClip) ;Restore Old Clipboard Opt("WinTitleMatchMode", 1) ; Sets back to default EndFunc ;==>_googleit ;URL encoding is critical when doing string search queries via URL. #cs URLEncode Source User: Dhilip89 - UnicodeURL UDF https://www.autoitscript.com/forum/topic/46894-unicodeurl-udf/ #ce Func URLEncode($UnicodeURL) $UnicodeBinary = StringToBinary($UnicodeURL, 4) $UnicodeBinary2 = StringReplace($UnicodeBinary, '0x', '', 1) $UnicodeBinaryLength = StringLen($UnicodeBinary2) Local $EncodedString For $i = 1 To $UnicodeBinaryLength Step 2 $UnicodeBinaryChar = StringMid($UnicodeBinary2, $i, 2) If StringInStr("$-_.+!*'(),;/?:@=&abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890", BinaryToString('0x' & $UnicodeBinaryChar, 4)) Then $EncodedString &= BinaryToString('0x' & $UnicodeBinaryChar) Else $EncodedString &= '%' & $UnicodeBinaryChar EndIf Next Return $EncodedString EndFunc ;==>URLEncode Func _exit() $result = MsgBox(1, "Shortcuts", "Do you wish to exit Shortcuts?", 0) If $result == 1 Then Exit EndFunc ;==>_exit  
       
      shortcuts.au3
      shortcuts.exe
    • By caramen
      I am trying to record a ClipGet after Ctrl + C Is stroke.
      Not working. It is possible ? 
      While (1) $msg = GUIGetMsg () Switch $msg Case $GUI_EVENT_CLOSE Exit EndSwitch Local $hDLL = DllOpen("user32.dll") If _IsPressed ("A2",$hDLL) And _IsPressed ("56",$hDLL) Then Sleep (500) $ClipBoard = ClipGet () ;~ ==========================================Console============================================ _GUICtrlListView_AddItem($ConsoleArea,""&$ClipBoard) _GUICtrlListView_EnsureVisible($ConsoleArea, _GUICtrlListView_GetItemCount($ConsoleArea)-1) ;~ =========================================/Console============================================ EndIf DllClose ($hDLL) WEnd  
    • By WoodGrain
      Hi guys,
      I'm learning about GUI's, I'm trying the below code, the idea being if I press the letter "e" while I have the GUI open I want the label color to change to green (I'm using a UDF for label colors). But every time I press "e" on my keyboard I just get a "ding" sound from my speakers and nothing changes with the label.
      I've looked at using something like "While GUIGetMsg() <> $GUI_EVENT_CLOSE" as I've seen it in other code instead of "While 1", but I don't think it's relevant.
      #include <GUIConstantsEx.au3>; for GUI... #include <GUIRichLabel.au3>; UDF for rich text label fonts #include <Misc.au3>; for _IsPressed $myLetter = "e" $hGUI = GUICreate("test", 700, 60) $lbl2 = _GUICtrlRichLabel_Create($hGUI, '<font color="purple">' & $myLetter & '</font>', 10, 10); , 260, 25 GUISetState(@SW_SHOW) Local $hDLL = DllOpen("user32.dll") While 1 if _IsPressed(Hex($myLetter), $hDLL) Then While _IsPressed(Hex($myLetter), $hDLL) Sleep(250) WEnd _GUICtrlRichLabel_SetData($lbl2, '<font color="green">' & $myLetter & '</font>') Sleep(2000) DllClose($hDLL) Exit EndIf Sleep(50) WEnd DllClose($hDLL) I am using an array of letters that I'm wanting to do this for, but as I can't get it to work I've stripped it down to the simplest code I can think of to try and get this working first. Appreciate any help.
      Thanks!
    • By guinness
      Right now the script will exit immediately if I don't pause it somehow (obvious of course).
      I was  curious on people's opinions of how they do it or what option they prefer below? Thanks
      Option 1 (I prefer)
      #include <MsgBoxConstants.au3> HotKeySet('^!p', SomeFunc) ProcessWaitClose(@AutoItPID) Func SomeFunc() MsgBox($MB_SYSTEMMODAL, "Title", "This message box will timeout after 10 seconds or select the OK button.", 10) EndFunc Option 2 (in the help file)
      #include <MsgBoxConstants.au3> HotKeySet('^!p', SomeFunc) While Sleep(100) WEnd Func SomeFunc() MsgBox($MB_SYSTEMMODAL, "Title", "This message box will timeout after 10 seconds or select the OK button.", 10) EndFunc Option 3
      #include <MsgBoxConstants.au3> HotKeySet('^!p', SomeFunc) While 1 GUIGetMsg() ; Use the internal sleep WEnd Func SomeFunc() MsgBox($MB_SYSTEMMODAL, "Title", "This message box will timeout after 10 seconds or select the OK button.", 10) EndFunc  
    • By AndreyS
      Dear developers and creators of the language, please explain to me why when pressing the combination Crtl + Shift + C from the 5th or the 10th time "sticks / sinks" Ctrl or Shift? And then you need to press Ctrl or Shift again to reset their triggering. I only need to use hot keys like in the example!
      The code is a small example. Its essence is that when a user in the editor selects any number and presses a combination, then it increases by 1. 
      Dim $x HotKeySet("+^c","Calc") While 1 Sleep(10000) WEnd Func Calc() Send("^c") Sleep(50) $x=ClipGet()+1 ClipPut($x) Send("^v") EndFunc I thought that in my program some kind of glitch was searching for a reason for a long time. And it turned out that apparently somehow the work of some functions used in the example is not compatible. 
      Tell me, please, what is the problem?
×
×
  • Create New...