You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
59 lines
1.2 KiB
Plaintext
59 lines
1.2 KiB
Plaintext
#SingleInstance force
|
|
#Persistent
|
|
#include Lib\AutoHotInterception.ahk
|
|
|
|
VID := 0x04F2, PID := 0x0112
|
|
|
|
global Interception := AutoHotInterception_Init()
|
|
|
|
devices := Interception.GetDeviceList()
|
|
if (!devices){
|
|
msgbox Device List Check failed
|
|
ExitApp
|
|
}
|
|
keyboardId := Interception.GetDeviceId(VID, PID)
|
|
if (keyboardId == 0){
|
|
MsgBox % "Could not find keyboard with VID " VID " PID " PID
|
|
ExitApp
|
|
}
|
|
;~ clipboard := devices
|
|
;~ MsgBox % devices
|
|
|
|
result := Interception.SubscribeKey(GetKeySC("2"), true, Func("KeyEvent"), VID, PID)
|
|
if (result != -1){
|
|
msgbox Subscribe failed
|
|
ExitApp
|
|
}
|
|
|
|
result := Interception.SetContextCallback(VID, PID, Func("SetKb1Context"))
|
|
if (result != -1){
|
|
msgbox Context request failed
|
|
ExitApp
|
|
}
|
|
return
|
|
|
|
KeyEvent(state){
|
|
static ctrlCode := GetKeySC("Ctrl")
|
|
global keyboardId
|
|
Interception.SendKeyEvent(ctrlCode, state, keyboardId)
|
|
;~ ToolTip % "State: " state
|
|
}
|
|
|
|
SetKb1Context(state){
|
|
global isKeyboard1Active
|
|
Sleep 0 ; We seem to need this for hotstrings to work, not sure why
|
|
isKeyboard1Active := state
|
|
}
|
|
#if isKeyboard1Active
|
|
::aaa::JACKPOT
|
|
1::
|
|
ToolTip % "KEY DOWN EVENT @ " A_TickCount
|
|
return
|
|
|
|
1 up::
|
|
ToolTip % "KEY UP EVENT @ " A_TickCount
|
|
return
|
|
#if
|
|
|
|
^Esc::
|
|
ExitApp |