Function at 0x545f60
Capabilities:
Get number of processors

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 4
push 0
push 0
dec ecx
jne 0x545f69
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov dword [ebp - 0xc], ecx
mov ebx, edx
mov esi, eax
xor eax, eax
push ebp
push 0x54620c
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 0xc]
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
push ebp
push 0x5461bd
push dword fs:[eax]
mov dword fs:[eax], esp
push 1
push 0
movzx eax, byte [0x54621c]
push eax
push 0
push 0
lea eax, [ebp - 4]
push eax
mov edx, 0x546220
mov cl, 1
mov eax, dword [0x5195a8]
call fcn.0051b2f8
xor eax, eax
push ebp
push 0x5461ac
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebx + 1]
cdq
push edx
push eax
mov edx, 0x546234
mov eax, dword [ebp - 4]
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov cl, 6
mov dl, 1
mov eax, dword [0x5195a8]
call fcn.0051a300
mov ecx, eax
test ecx, ecx
je 0x546000
sub ecx, 0xffffffe4
mov edx, 0x546244
mov eax, dword [ebp - 4]
mov edi, dword [eax]
call dword [edi + 0x28]
test ebx, ebx
jl 0x546155
inc ebx
mov dword [ebp - 0x10], ebx
mov dword [ebp - 0x14], esi
mov edx, 0x546244
mov eax, dword [ebp - 4]
mov ecx, dword [eax]
call dword [ecx + 0x54]
cmp dword [eax + 8], 5
jge 0x546155
push 1
push 0
movzx eax, byte [0x54621c]
push eax
push 0
push 0
lea eax, [ebp - 8]
push eax
mov edx, 0x546220
mov cl, 1
mov eax, dword [0x5195a8]
call fcn.0051b2f8
xor eax, eax
push ebp
push 0x54613e
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 0x14]
mov eax, dword [eax]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
cmp eax, 0x64
jle 0x5460ac
lea eax, [ebp - 0x18]
push eax
mov eax, dword [ebp - 0x14]
mov eax, dword [eax]
mov ecx, 0x61
mov edx, 1
call sub.rtl120.bpl__System__UStrCopy_qqrx20System_UnicodeStringii
lea eax, [ebp - 0x18]
mov edx, 0x546254
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
mov ecx, dword [ebp - 0x18]
mov edx, 0x546268
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x50]
jmp 0x5460be
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax]
mov edx, 0x546268
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x50]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax + 0x24]
mov edx, 0x546278
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x50]
mov eax, dword [ebp - 0x14]
mov ecx, dword [eax + 0x30]
mov edx, 0x54628c
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x50]
mov eax, dword [ebp - 0x14]
call fcn.00545f08
cdq
push edx
push eax
mov edx, 0x5462a0
mov eax, dword [ebp - 8]
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov eax, dword [ebp - 0x14]
movzx ecx, byte [eax + 0x90]
mov edx, 0x5462b4
mov eax, dword [ebp - 8]
mov ebx, dword [eax]
call dword [ebx + 0x30]
mov edx, 0x546244
mov eax, dword [ebp - 4]
mov ecx, dword [eax]
call dword [ecx + 0x54]
mov edx, dword [ebp - 8]
call fcn.00520894
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x546145
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
ret
lea edx, [ebp - 0x1c]
mov eax, dword [ebp - 4]
mov ecx, dword [eax]
call dword [ecx + 0x84]
mov eax, dword [ebp - 0x1c]
mov edx, dword [ebp - 0xc]
call fcn.0040bf3c
lea eax, [ebp - 0x24]
mov edx, dword [ebp - 0xc]
mov edx, dword [edx]
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromUStr_qqrr27System__AnsiStringT_us_i0__x20System_UnicodeStringus
mov eax, dword [ebp - 0x24]
lea edx, [ebp - 0x20]
call fcn.00450364
mov edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5461b3
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
ret