|
| 1 | +import winim |
| 2 | + |
| 3 | + |
| 4 | +type |
| 5 | + SendKeys = array[12, INPUT] |
| 6 | + |
| 7 | +proc SendSpace() = |
| 8 | + var inputs: SendKeys |
| 9 | + |
| 10 | + # Hold shift for caps |
| 11 | + inputs[0].type = INPUT_KEYBOARD |
| 12 | + inputs[0].ki.wVk = VK_SHIFT |
| 13 | + |
| 14 | + # S key |
| 15 | + inputs[1].type = INPUT_KEYBOARD |
| 16 | + inputs[1].ki.wVk = 0x53 |
| 17 | + inputs[2].type = INPUT_KEYBOARD |
| 18 | + inputs[2].ki.wVk = 0x53 |
| 19 | + inputs[2].ki.dwFlags = KEYEVENTF_KEYUP |
| 20 | + |
| 21 | + # P key |
| 22 | + inputs[3].type = INPUT_KEYBOARD |
| 23 | + inputs[3].ki.wVk = 0x50 |
| 24 | + inputs[4].type = INPUT_KEYBOARD |
| 25 | + inputs[4].ki.wVk = 0x50 |
| 26 | + inputs[4].ki.dwFlags = KEYEVENTF_KEYUP |
| 27 | + |
| 28 | + # A key |
| 29 | + inputs[5].type = INPUT_KEYBOARD |
| 30 | + inputs[5].ki.wVk = 0x41 |
| 31 | + inputs[6].type = INPUT_KEYBOARD |
| 32 | + inputs[6].ki.wVk = 0x41 |
| 33 | + inputs[6].ki.dwFlags = KEYEVENTF_KEYUP |
| 34 | + |
| 35 | + # C key |
| 36 | + inputs[7].type = INPUT_KEYBOARD |
| 37 | + inputs[7].ki.wVk = 0x43 |
| 38 | + inputs[8].type = INPUT_KEYBOARD |
| 39 | + inputs[8].ki.wVk = 0x43 |
| 40 | + inputs[8].ki.dwFlags = KEYEVENTF_KEYUP |
| 41 | + |
| 42 | + # E key |
| 43 | + inputs[9].type = INPUT_KEYBOARD |
| 44 | + inputs[9].ki.wVk = 0x45 |
| 45 | + inputs[10].type = INPUT_KEYBOARD |
| 46 | + inputs[10].ki.wVk = 0x43 |
| 47 | + inputs[10].ki.dwFlags = KEYEVENTF_KEYUP |
| 48 | + |
| 49 | + # Release shift key |
| 50 | + inputs[11].type = INPUT_KEYBOARD |
| 51 | + inputs[11].ki.wVk = VK_SHIFT |
| 52 | + inputs[11].ki.dwFlags = KEYEVENTF_KEYUP |
| 53 | + |
| 54 | + SendInput((UINT)len(inputs), &inputs[0], (int32)sizeof(INPUT)); |
| 55 | + |
| 56 | + |
| 57 | +# Run callback everytime key is pressed |
| 58 | +proc HookCallback(nCode: int32, wParam: WPARAM, lParam: LPARAM): LRESULT {.stdcall.} = |
| 59 | + |
| 60 | + if (bool(lParam)): |
| 61 | + var kbd: PKBDLLHOOKSTRUCT = cast[ptr KBDLLHOOKSTRUCT](lparam) |
| 62 | +
|
| 63 | + if (kbd.vkCode == VK_SPACE): |
| 64 | + if (wParam == WM_KEYDOWN): |
| 65 | + SendSpace() |
| 66 | + return 1 |
| 67 | + elif (wParam == WM_KEYUP): |
| 68 | + return 1 |
| 69 | +
|
| 70 | + return CallNextHookEx(0, nCode, wParam, lParam) |
| 71 | +
|
| 72 | +
|
| 73 | +# Hook LowLevelKeyboardProc |
| 74 | +var hook = SetWindowsHookEx(WH_KEYBOARD_LL, (HOOKPROC) HookCallback, 0, 0) |
| 75 | +if bool(hook): |
| 76 | + try: |
| 77 | + PostMessage(0, 0, 0, 0) |
| 78 | + var msg: MSG |
| 79 | + while GetMessage(msg.addr, 0, 0, 0): |
| 80 | + discard |
| 81 | + |
| 82 | + finally: |
| 83 | + UnhookWindowsHookEx(hook) |
0 commit comments