Barcode Scanner Key logger

[TheVig]

This doesn't seem to work for me. No errors. The QM output remains blank.
QM Version 2.4.11.2 on Windows 10 version 20H2

---

When commenting out the FormatKeyString k.vkCode 0 &_s; out _s ;;debug line, the text does output in QM.

---

Got it. Needed to change a couple things.

Macro Macro6
Trigger Ca 0x1     

Code:

Copy      Help

str text

int hh=SetWindowsHookEx(WH_KEYBOARD_LL &sub.Hook_WH_KEYBOARD_LL _hinst 0)
opt waitmsg 1
wait 5
UnhookWindowsHookEx hh
out text


#sub Hook_WH_KEYBOARD_LL v
function# nCode message KBDLLHOOKSTRUCT&k
if(nCode<0 or k.flags&LLKHF_UP) goto gNext

FormatKeyString k.vkCode 0 &_s;
;out _s ;;debug
text+_s

word ch=sub.KeyToChar(k.vkCode k.scanCode)
if(ch) text.formata("%C" ch)

;gNext
ret CallNextHookEx(0 nCode message &k)


#sub KeyToChar
function@ vk sc