joyce8/EMBER2024-capa huggingface dataset:
Function at 0x462cf8
Capabilities:
Query or enumerate registry value

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff0
push ebx
push esi
push edi
mov dword [ebp - 4], ecx
mov edi, edx
mov esi, eax
mov ebx, dword [ebp + 8]
mov eax, ebx
call sub.rtl120.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 8]
push eax
push 0x20019
push 0
mov eax, edi
call sub.rtl120.bpl__System__LStrToPChar_qqrx27System__AnsiStringT_us_i0__
push eax
push esi
call sub.advapi32.dll_RegOpenKeyExA
test eax, eax
jne 0x462dbd
xor eax, eax
mov dword [ebp - 0xc], eax
lea eax, [ebp - 0xc]
push eax
push 0
push 0
push 0
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__LStrToPChar_qqrx27System__AnsiStringT_us_i0__
mov edi, eax
push edi
mov eax, dword [ebp - 8]
push eax
call sub.advapi32.dll_RegQueryValueExA
cmp dword [ebp - 0xc], 0
je 0x462db4
mov eax, dword [ebp - 0xc]
add eax, eax
mov dword [ebp - 0xc], eax
mov eax, dword [ebp - 0xc]
push eax
push 0x40
call sub.kernel32.dll_LocalAlloc_1
mov esi, eax
lea eax, [ebp - 0xc]
push eax
push esi
lea eax, [ebp - 0x10]
push eax
push 0
push edi
mov eax, dword [ebp - 8]
push eax
call sub.advapi32.dll_RegQueryValueExA
test eax, eax
jne 0x462dae
cmp dword [ebp - 0x10], 1
jne 0x462da0
mov eax, ebx
mov edx, esi
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromPChar_qqrr27System__AnsiStringT_us_i0__pcus
jmp 0x462dae
push 0
mov eax, ebx
mov ecx, dword [ebp - 0xc]
mov edx, esi
call sub.rtl120.bpl__System__LStrFromPCharLen_qqrr27System__AnsiStringT_us_i0__pcius
push esi
call sub.kernel32.dll_LocalFree
mov eax, dword [ebp - 8]
push eax
call sub.advapi32.dll_RegCloseKey
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 4
Function at 0x468f10
Capabilities:
Encode data using xor

Disassembly:
mov ecx, edx
mov edx, eax
xor eax, eax
rol ax, 5
xor al, byte [edx]
inc edx
dec ecx
jne 0x468f16
ret
Function at 0x4751c4
Capabilities:
Hide graphical window

Disassembly:
push ebx
push esi
push edi
push ecx
mov byte [esp], cl
mov ebx, edx
mov esi, eax
push 0xffffffffffffffec
push esi
call sub.user32.dll_GetWindowLongW
mov edi, eax
test bl, bl
je 0x4751e5
test edi, 0x40000
je 0x4751ff
test bl, bl
jne 0x475280
mov eax, edi
and eax, 0x40000
cmp eax, 0x40000
jne 0x475280
push esi
call sub.user32.dll_IsIconic
cmp eax, 1
sbb eax, eax
inc eax
mov byte [esp + 2], al
push esi
call sub.user32.dll_IsWindowVisible
cmp eax, 1
sbb eax, eax
inc eax
mov byte [esp + 1], al
movzx eax, byte [esp + 1]
or al, byte [esp + 2]
je 0x475232
push 0
push esi
call sub.user32.dll_ShowWindow
test bl, bl
je 0x475247
or edi, 0x40000
push edi
push 0xffffffffffffffec
push esi
call sub.user32.dll_SetWindowLongW
jmp 0x475256
and edi, 0xfffbffff
push edi
push 0xffffffffffffffec
push esi
call sub.user32.dll_SetWindowLongW
movzx eax, byte [esp]
and al, byte [esp + 1]
jne 0x475267
cmp byte [esp + 2], 0
je 0x475280
cmp byte [esp + 2], 0
je 0x475278
push 6
push esi
call sub.user32.dll_ShowWindow
jmp 0x475280
push 5
push esi
call sub.user32.dll_ShowWindow
pop edx
pop edi
pop esi
pop ebx
ret

Function at 0x475528
Capabilities:
Enumerate gui resources

Disassembly:
push ebx
add esp, 0xfffffff8
mov ebx, eax
call sub.user32.dll_GetActiveWindow
mov dword [esp], eax
mov byte [esp + 4], 0
test bl, bl
je 0x47554e
mov eax, esp
push eax
push 0x4754f0
call sub.user32.dll_EnumWindows
jmp 0x475561
mov eax, esp
push eax
push 0x4754d0
call sub.kernel32.dll_GetCurrentThreadId
push eax
call sub.user32.dll_EnumThreadWindows
movzx eax, byte [esp + 4]
pop ecx
pop edx
pop ebx
ret

Function at 0x475624
Capabilities:
Log keystrokes via polling

Disassembly:
push ebx
push esi
mov esi, eax
movzx ebx, byte [0x475678]
test si, 4
je 0x475639
or bl, 1
test si, 8
je 0x475643
or bl, 4
test si, 1
je 0x47564d
or bl, 8
test si, 2
je 0x475657
or bl, 0x10
test si, 0x10
je 0x475661
or bl, 0x20
push 0x12
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x475670
or bl, 2
mov eax, ebx
pop esi
pop ebx
ret

Function at 0x47567c
Capabilities:
Log keystrokes via polling

Disassembly:
push ebx
push esi
mov esi, eax
movzx ebx, byte [0x4756b8]
push 0x10
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x475696
or bl, 1
push 0x11
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x4756a5
or bl, 4
test esi, 0x20000000
je 0x4756b0
or bl, 2
mov eax, ebx
pop esi
pop ebx
ret
Function at 0x47d9f0
Capabilities:
Get keyboard layout

Disassembly:
push ebp
mov ebp, esp
push ecx
push ebx
push esi
test dl, dl
je 0x47da02
add esp, 0xfffffff0
call sub.rtl120.bpl__System__ClassCreate_qqrp17System_TMetaClasso
mov byte [ebp - 1], dl
mov ebx, eax
xor edx, edx
mov eax, ebx
call sub.rtl120.bpl__Classes_TComponent__bctr_qqrp18Classes_TComponent
mov eax, dword [sym.imp.rtl120.bpl__Classes_AddDataModule]
mov dword [eax + 4], ebx
mov dword [eax], 0x47de04
mov eax, dword [sym.imp.rtl120.bpl__Classes_RemoveDataModule]
mov dword [eax + 4], ebx
mov dword [eax], 0x47de10
mov eax, ebx
call fcn.0047de1c
push 0
call sub.user32.dll_GetKeyboardLayout
mov dword [ebx + 0x3c], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TList_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebx + 0x4c], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TList_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebx + 0x50], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TList_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebx + 0x54], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TList_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebx + 0x58], eax
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TList_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov dword [ebx + 0x74], eax
push 0
call sub.user32.dll_GetDC
mov esi, eax
push 0x5a
push esi
call sub.gdi32.dll_GetDeviceCaps
mov dword [ebx + 0x40], eax
push esi
push 0
call sub.user32.dll_ReleaseDC
mov eax, dword [ebx + 0x58]
push eax
mov eax, 0x478e40
push eax
push 0
push 0
mov eax, dword [sym.imp.rtl120.bpl__Multimon_EnumDisplayMonitors]
mov eax, dword [eax]
call eax
mov dl, 1
mov eax, dword [0x4684c8]
call fcn.00469f48
mov dword [ebx + 0x7c], eax
mov dl, 1
mov eax, dword [0x4684c8]
call fcn.00469f48
mov dword [ebx + 0x80], eax
mov dl, 1
mov eax, dword [0x4684c8]
call fcn.00469f48
mov dword [ebx + 0x78], eax
mov dl, 1
mov eax, dword [0x4684c8]
call fcn.00469f48
mov dword [ebx + 0x84], eax
mov eax, ebx
call fcn.0047e314
mov eax, dword [ebx + 0x7c]
mov dword [eax + 0xc], ebx
mov dword [eax + 8], 0x47e1ec
mov eax, dword [ebx + 0x80]
mov dword [eax + 0xc], ebx
mov dword [eax + 8], 0x47e1ec
mov eax, dword [ebx + 0x78]
mov dword [eax + 0xc], ebx
mov dword [eax + 8], 0x47e1ec
mov eax, dword [ebx + 0x84]
mov dword [eax + 0xc], ebx
mov dword [eax + 8], 0x47e1ec
mov eax, ebx
cmp byte [ebp - 1], 0
je 0x47db55
call sub.rtl120.bpl__System__AfterConstruction_qqrp14System_TObject
pop dword fs:[0]
add esp, 0xc
mov eax, ebx
pop esi
pop ebx
pop ecx
pop ebp
ret
Function at 0x47df8c
Capabilities:
Get keyboard layout
Query or enumerate registry value

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffc60
push ebx
xor edx, edx
mov dword [ebp - 0x3a0], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x47e139
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
cmp dword [eax + 0x34], 0
jne 0x47e11a
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov edx, dword [ebp - 4]
mov dword [edx + 0x34], eax
mov eax, dword [ebp - 4]
add eax, 0x38
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x114]
push eax
push 0x40
call sub.user32.dll_GetKeyboardLayoutList
dec eax
test eax, eax
jl 0x47e109
inc eax
mov dword [ebp - 0x10], eax
lea eax, [ebp - 0x114]
mov dword [ebp - 0x14], eax
mov eax, dword [ebp - 0x14]
mov eax, dword [eax]
call fcn.004a253c
test al, al
je 0x47e0fc
lea eax, [ebp - 0xc]
push eax
push 0x20019
push 0
push 0
mov eax, dword [ebp - 0x14]
mov eax, dword [eax]
mov dword [ebp - 0x39c], eax
mov byte [ebp - 0x398], 0
lea ecx, [ebp - 0x39c]
mov edx, 0x47e148
lea eax, [ebp - 0x394]
call sub.rtl120.bpl__Sysutils_StrFmt_qqrpbt1px14System_TVarRecxi
push eax
push 0x80000002
call sub.advapi32.dll_RegOpenKeyExW
test eax, eax
jne 0x47e0fc
xor eax, eax
push ebp
push 0x47e0f5
push dword fs:[eax]
mov dword fs:[eax], esp
mov dword [ebp - 8], 0x200
lea eax, [ebp - 8]
push eax
lea eax, [ebp - 0x314]
push eax
push 0
push 0
push 0x47e1b8
mov eax, dword [ebp - 0xc]
push eax
call sub.advapi32.dll_RegQueryValueExW
test eax, eax
jne 0x47e0de
lea eax, [ebp - 0x3a0]
lea edx, [ebp - 0x314]
mov ecx, pe_nt_image_headers32
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov edx, dword [ebp - 0x3a0]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x34]
mov ebx, dword [eax]
call dword [ebx + 0x3c]
mov eax, dword [ebp - 0x14]
mov eax, dword [eax]
mov edx, dword [ebp - 4]
cmp eax, dword [edx + 0x3c]
jne 0x47e0de
mov eax, dword [ebp - 4]
add eax, 0x38
lea edx, [ebp - 0x314]
mov ecx, pe_nt_image_headers32
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x47e0fc
mov eax, dword [ebp - 0xc]
push eax
call sub.advapi32.dll_RegCloseKey
ret
add dword [ebp - 0x14], 4
dec dword [ebp - 0x10]
jne 0x47dfff
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x34]
mov byte [eax + 0x29], 0
mov dl, 1
call sub.rtl120.bpl__Classes_TStringList_SetSorted_qqro
mov eax, dword [ebp - 4]
mov ebx, dword [eax + 0x34]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x47e140
lea eax, [ebp - 0x3a0]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x47eb28
Capabilities:
Create thread
Set global application hook

Disassembly:
push ecx
mov eax, dword [0x5a036c]
cmp byte [eax + 0xa9], 0
jne 0x47eb9a
cmp dword [0x5a0384], 0
jne 0x47eb5a
call sub.kernel32.dll_GetCurrentThreadId
push eax
push 0
mov eax, dword [0x5903e0]
push eax
push 3
call sub.user32.dll_SetWindowsHookExW
mov dword [0x5a0384], eax
cmp dword [0x5a0380], 0
jne 0x47eb75
push 0
push 0
push 0
push 0
call sub.kernel32.dll_CreateEventW
mov dword [0x5a0380], eax
cmp dword [0x5a0388], 0
jne 0x47eb9a
push esp
push 0
push 0
mov eax, dword [0x5903dc]
push eax
push 0x3e8
push 0
call sub.kernel32.dll_CreateThread
mov dword [0x5a0388], eax
pop edx
ret
Function at 0x47f420
Capabilities:
Enumerate gui resources

Disassembly:
push ebx
push esi
add esp, 0xfffffff8
mov ebx, eax
mov eax, dword [ebx + 0x170]
test eax, eax
je 0x47f4c2
cmp dword [ebx + 0x90], 0
jne 0x47f4bc
mov dword [esp], eax
mov byte [esp + 4], dl
mov eax, esp
push eax
push 0x47f398
call sub.user32.dll_EnumWindows
mov eax, dword [ebx + 0x8c]
cmp dword [eax + 8], 0
je 0x47f4bc
push 3
mov eax, dword [esp + 4]
push eax
call sub.user32.dll_GetWindow
mov esi, eax
mov dword [esp], esi
push 0xffffffffffffffec
push esi
call sub.user32.dll_GetWindowLongW
test al, 8
je 0x47f482
mov dword [esp], 0xfffffffe
mov eax, dword [ebx + 0x8c]
mov esi, dword [eax + 8]
dec esi
cmp esi, 0
jl 0x47f4bc
push 0x213
push 0
push 0
push 0
push 0
mov eax, dword [esp + 0x14]
push eax
mov edx, esi
mov eax, dword [ebx + 0x8c]
call sub.rtl120.bpl__Classes_TList_Get_qqri
push eax
call sub.user32.dll_SetWindowPos
dec esi
cmp esi, 0xffffffff
jne 0x47f491
inc dword [ebx + 0x90]
pop ecx
pop edx
pop esi
pop ebx
ret

Function at 0x47f6e0
Capabilities:
Enumerate gui resources
Hide graphical window

Disassembly:
push ebx
push esi
push edi
mov ebx, edx
mov esi, eax
mov eax, dword [0x5a036c]
cmp dword [eax + 0x170], 0
je 0x47f845
test bl, bl
jne 0x47f793
cmp dword [esi + 0x98], 0
jne 0x47f788
mov eax, esi
call fcn.00481fb0
push eax
push 0x47f5ec
call sub.user32.dll_EnumWindows
cmp dword [esi + 0x40], 0
je 0x47f759
mov eax, dword [0x5a036c]
cmp byte [eax + 0xcf], 0
je 0x47f759
mov eax, dword [esi + 0xd4]
call sub.rtl120.bpl__System__DynArrayHigh_qqrv
mov edi, eax
cmp edi, 0
jl 0x47f759
push 0
mov eax, dword [esi + 0xd4]
mov eax, dword [eax + edi*4]
push eax
call sub.user32.dll_ShowWindow
dec edi
cmp edi, 0xffffffff
jne 0x47f742
mov eax, dword [esi + 0x94]
mov edi, dword [eax + 8]
dec edi
cmp edi, 0
jl 0x47f788
cmp bl, 1
cmc
sbb eax, eax
push eax
mov edx, edi
mov eax, dword [esi + 0x94]
call sub.rtl120.bpl__Classes_TList_Get_qqri
push eax
call sub.user32.dll_ShowOwnedPopups
dec edi
cmp edi, 0xffffffff
jne 0x47f768
inc dword [esi + 0x98]
jmp 0x47f845
cmp dword [esi + 0x98], 0
jle 0x47f845
dec dword [esi + 0x98]
cmp dword [esi + 0x98], 0
jne 0x47f845
cmp dword [esi + 0x40], 0
je 0x47f7f0
mov eax, dword [0x5a036c]
cmp byte [eax + 0xcf], 0
je 0x47f7f0
mov eax, dword [esi + 0xd4]
call sub.rtl120.bpl__System__DynArrayHigh_qqrv
mov edi, eax
cmp edi, 0
jl 0x47f7f0
push 5
mov eax, dword [esi + 0xd4]
mov eax, dword [eax + edi*4]
push eax
call sub.user32.dll_ShowWindow
dec edi
cmp edi, 0xffffffff
jne 0x47f7d9
mov eax, dword [esi + 0x94]
mov edi, dword [eax + 8]
dec edi
cmp edi, 0
jl 0x47f81f
cmp bl, 1
cmc
sbb eax, eax
push eax
mov edx, edi
mov eax, dword [esi + 0x94]
call sub.rtl120.bpl__Classes_TList_Get_qqri
push eax
call sub.user32.dll_ShowOwnedPopups
dec edi
cmp edi, 0xffffffff
jne 0x47f7ff
mov eax, dword [esi + 0x94]
mov edx, dword [eax]
call dword [edx + 8]
push 0
lea eax, [esi + 0xd4]
mov ecx, 1
mov edx, dword [0x475014]
call sub.rtl120.bpl__System__DynArraySetLength_qqrv
add esp, 4
pop edi
pop esi
pop ebx
ret
Function at 0x480400
Capabilities:
Get graphical window text

Disassembly:
push ebx
push esi
add esp, 0xfffffdfc
mov esi, edx
mov ebx, eax
cmp byte [ebx + 0xa8], 0
je 0x48046b
cmp byte [ebx + 0xcf], 0
jne 0x48046b
push pe_nt_image_headers32
lea eax, [esp + 4]
push eax
mov eax, dword [ebx + 0x170]
push eax
call sub.user32.dll_GetWindowTextW
mov ecx, eax
mov edx, esp
mov eax, esi
call sub.rtl120.bpl__System__UStrFromPWCharLen_qqrr20System_UnicodeStringpbi
mov eax, dword [esi]
mov dword [esp + 0x200], eax
mov eax, dword [esp + 0x200]
test eax, eax
je 0x480458
sub eax, 4
mov eax, dword [eax]
test eax, eax
jne 0x480478
mov eax, esi
mov edx, dword [ebx + 0x88]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x480478
mov eax, esi
mov edx, dword [ebx + 0x88]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
add esp, 0x204
pop esi
pop ebx
ret

Function at 0x481770
Capabilities:
Hide graphical window

Disassembly:
push ebx
push esi
mov ebx, eax
mov esi, dword [ebx + 0x80]
test esi, esi
je 0x4817de
mov eax, esi
call fcn.0049d000
test al, al
je 0x4817de
mov eax, dword [ebx + 0x80]
call fcn.0049ccf8
push eax
call sub.user32.dll_IsWindowVisible
test eax, eax
je 0x4817de
mov eax, dword [ebx + 0x80]
mov edx, dword [eax]
call dword [edx + 0xec]
test al, al
je 0x4817d2
push 0
mov eax, dword [ebx + 0x80]
call fcn.0049ccf8
push eax
call sub.user32.dll_ShowWindow
xor edx, edx
mov eax, dword [ebx + 0x80]
call fcn.00494478
jmp 0x4817de
mov cl, 1
mov edx, dword [ebx + 0x70]
mov eax, ebx
call fcn.004815bc
pop esi
pop ebx
ret

Function at 0x48352c
Capabilities:
Log keystrokes
Log keystrokes via polling

Disassembly:
push ebx
push esi
add esp, 0xfffffe00
mov ebx, edx
mov esi, eax
mov eax, ebx
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
push 0
mov eax, esi
movzx eax, al
push eax
call sub.user32.dll_MapVirtualKeyW
shl eax, 0x10
test eax, eax
je 0x483573
push pe_nt_image_headers32
lea edx, [esp + 4]
push edx
push eax
call sub.user32.dll_GetKeyNameTextW
mov eax, ebx
mov edx, esp
mov ecx, pe_nt_image_headers32
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
add esp, 0x200
pop esi
pop ebx
ret
Function at 0x48898c
Capabilities:
Get keyboard layout

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd8
push ebx
xor eax, eax
mov dword [ebp - 0x24], eax
mov dword [ebp - 0x28], eax
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x488ac5
push dword fs:[eax]
mov dword fs:[eax], esp
mov word [ebp - 0x20], 0
lea eax, [ebp - 0x20]
push eax
call sub.user32.dll_GetKeyboardLayoutNameW
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Registry_TRegistry_]
call sub.rtl120.bpl__Registry_TRegistry__bctr_qqrv
mov dword [ebp - 0xc], eax
xor edx, edx
push ebp
push 0x488a9b
push dword fs:[edx]
mov dword fs:[edx], esp
mov edx, 0x80000002
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Registry_TRegistry_SetRootKey_qqrp6HKEY__
lea eax, [ebp - 0x28]
lea edx, [ebp - 0x20]
mov ecx, 0xa
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov ecx, dword [ebp - 0x28]
lea eax, [ebp - 0x24]
mov edx, 0x488ae0
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x24]
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Registry_TRegistry_OpenKeyReadOnly_qqrx20System_UnicodeString
test al, al
je 0x488a85
lea ecx, [ebp - 4]
mov edx, 0x488b54
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__Registry_TRegistry_ReadString_qqrx20System_UnicodeString
mov edx, 0x8000
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_SafeLoadLibrary_qqrx20System_UnicodeStringui
mov dword [ebp - 8], eax
xor edx, edx
push ebp
push 0x488a7e
push dword fs:[edx]
mov dword fs:[edx], esp
push 0x488b6c
mov eax, dword [ebp - 8]
push eax
call fcn.00401c48
mov ebx, eax
call ebx
movzx eax, word [eax + 0x28]
and ax, 1
cmp ax, 1
sete byte [0x590540]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x488a85
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_FreeLibrary
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x488aa2
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__System_TObject_Free_qqrv
ret

Function at 0x488bd0
Capabilities:
Log keystrokes via polling

Disassembly:
push ebx
push esi
push edi
add esp, 0xfffffff0
mov esi, eax
lea edi, [esp]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
movzx ebx, byte [esp + 4]
test bx, bx
je 0x488c17
push 0x10
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x488bfa
add bx, 0x2000
push 0x11
call sub.user32.dll_GetKeyState
test ax, ax
jge 0x488c0b
add bx, 0x4000
test byte [esp + 0xb], 0x20
je 0x488c17
add bx, 0x8000
mov eax, ebx
add esp, 0x10
pop edi
pop esi
pop ebx
ret
Function at 0x491c1c
Capabilities:
Log keystrokes via polling

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd8
push ebx
push esi
push edi
mov esi, eax
lea edi, [ebp - 0xc]
movsd dword es:[edi], dword [esi]
movsd dword es:[edi], dword [esi]
mov dword [ebp - 0x10], edx
xor eax, eax
mov dword [ebp - 0x18], eax
cmp dword [0x5a0408], 0
je 0x491d5d
push 0x11
call sub.user32.dll_GetKeyState
test ax, 0x8000
setne al
mov edx, dword [0x59eaf0]
mov edx, dword [edx]
xor al, byte [edx + 0xb8]
je 0x491d5d
mov eax, dword [0x5a040c]
mov edx, dword [eax]
call dword [edx + 8]
mov eax, dword [0x5a0408]
mov ebx, dword [eax + 8]
dec ebx
test ebx, ebx
jl 0x491d2c
inc ebx
xor edi, edi
mov edx, edi
mov eax, dword [0x5a0408]
call sub.rtl120.bpl__Classes_TList_Get_qqri
mov dword [ebp - 0x14], eax
mov eax, dword [ebp - 0x14]
cmp eax, dword [ebp - 0x10]
je 0x491d24
mov eax, dword [ebp - 0x14]
cmp byte [eax + 0x1e2], 0
je 0x491d24
mov eax, dword [ebp - 0x14]
mov edx, dword [eax]
call dword [edx + 0x4c]
test al, al
je 0x491d24
mov eax, dword [ebp - 0x14]
call fcn.0049ccf8
push eax
call sub.user32.dll_IsWindowVisible
test eax, eax
je 0x491d24
push ebp
call fcn.00491bd8
pop ecx
test al, al
jne 0x491d24
mov edx, dword [ebp - 0x10]
mov eax, dword [ebp - 0x14]
mov si, 0xffbb
call sub.rtl120.bpl__System__CallDynaInst_qqrv
test al, al
je 0x491d24
mov byte [ebp - 1], 1
lea eax, [ebp - 0xc]
push eax
lea eax, [ebp - 1]
push eax
lea ecx, [ebp - 0x28]
mov edx, dword [ebp - 0x10]
mov eax, dword [ebp - 0x14]
mov si, 0xffbc
call sub.rtl120.bpl__System__CallDynaInst_qqrv
cmp byte [ebp - 1], 0
je 0x491d24
lea edx, [ebp - 0xc]
lea eax, [ebp - 0x28]
call sub.rtl120.bpl__Types_PtInRect_qqrrx11Types_TRectrx12Types_TPoint
test al, al
je 0x491d24
mov edx, dword [ebp - 0x14]
mov eax, dword [0x5a040c]
call fcn.00491350
inc edi
dec ebx
jne 0x491c81
mov eax, dword [0x5a040c]
cmp dword [eax + 8], 0
jle 0x491d44
mov eax, dword [0x5a040c]
call fcn.00491408
mov dword [ebp - 0x18], eax
cmp dword [ebp - 0x18], 0
je 0x491d5d
push ebp
mov eax, dword [ebp - 0x18]
call fcn.00491a3c
pop ecx
test al, al
jne 0x491d5d
xor eax, eax
mov dword [ebp - 0x18], eax
mov eax, dword [ebp - 0x18]
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
Function at 0x4999e4
Capabilities:
Log keystrokes via polling

Disassembly:
push ebx
push esi
push edi
add esp, 0xfffffed8
mov ebx, ecx
mov edi, edx
mov esi, eax
call sub.user32.dll_GetMessagePos
call sub.rtl120.bpl__Types_SmallPoint_qqrui
mov dword [esp + 8], eax
movsx eax, word [esp + 8]
mov dword [esp + 0xc], eax
movsx eax, word [esp + 0xa]
mov dword [esp + 0x10], eax
mov ecx, esp
lea edx, [esp + 0xc]
mov eax, esi
call fcn.00494098
test ebx, ebx
jne 0x499a37
push 0
push 0
lea edx, [esp + 8]
xor ecx, ecx
mov eax, esi
call fcn.00499878
mov ebx, eax
test ebx, ebx
je 0x499b22
cmp esi, ebx
je 0x499a60
mov eax, dword [esp]
sub eax, dword [ebx + 0x40]
mov dword [esp + 0x114], eax
mov eax, dword [esp + 4]
sub eax, dword [ebx + 0x44]
mov dword [esp + 0x118], eax
jmp 0x499a75
mov eax, dword [esp]
mov dword [esp + 0x114], eax
mov eax, dword [esp + 4]
mov dword [esp + 0x118], eax
movzx eax, word [edi + 8]
mov dword [esp + 0x11c], eax
mov eax, dword [edi + 4]
mov dword [esp + 0x124], eax
movzx eax, word [edi + 0xa]
cmp eax, 0x201
jge 0x499aad
add eax, 0xffffff5f
sub eax, 2
jb 0x499ac5
dec eax
sub eax, 2
jb 0x499ad9
dec eax
sub eax, 2
jb 0x499acf
jmp 0x499ae3
add eax, 0xfffffdff
sub eax, 2
jb 0x499ac5
dec eax
sub eax, 2
jb 0x499ad9
dec eax
sub eax, 2
jb 0x499acf
jmp 0x499ae3
mov byte [esp + 0x120], 0
jmp 0x499aeb
mov byte [esp + 0x120], 2
jmp 0x499aeb
mov byte [esp + 0x120], 1
jmp 0x499aeb
mov byte [esp + 0x120], 0
lea eax, [esp + 0x14]
push eax
call sub.user32.dll_GetKeyboardState
lea eax, [esp + 0x14]
call fcn.004756bc
mov byte [esp + 0x121], al
lea eax, [esp + 0x114]
push eax
xor ecx, ecx
mov edx, 0xb04b
mov eax, ebx
call fcn.00495840
mov dword [edi + 0xc], eax
mov al, 1
jmp 0x499b24
xor eax, eax
add esp, 0x128
pop edi
pop esi
pop ebx
ret