Function at 0x47b224
Capabilities:
Check os version

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0xb
push 0
push 0
dec ecx
jne 0x47b22c
push ebx
push esi
push edi
mov dword [ebp - 0xc], eax
xor eax, eax
push ebp
push 0x47bb8a
push dword fs:[eax]
mov dword fs:[eax], esp
mov ebx, dword [ebp - 0xc]
cmp byte [ebx + 0x30], 0
jne 0x47b28e
mov dl, 8
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x38]
test al, al
je 0x47b285
lea ecx, [ebp - 0x14]
mov edx, 8
mov eax, ebx
call sub.rtl120.bpl__Sysutils_IntToHex_qqrii
lea eax, [ebp - 0x14]
mov edx, 0x47bba4
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
mov ecx, dword [ebp - 0x14]
mov dl, 8
mov eax, ebx
mov esi, dword [eax]
call dword [esi + 0x34]
call fcn.00476030
mov byte [ebx + 0x30], 1
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0xc8]
add eax, 4
push eax
call sub.kernel32.dll_EnterCriticalSection
xor ecx, ecx
push ebp
push 0x47bb36
push dword fs:[ecx]
mov dword fs:[ecx], esp
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test al, al
je 0x47b2f8
push 0
mov eax, dword [0x4c4dfc]
mov eax, dword [eax]
call eax
pop ecx
lea edx, [ebp - 0x18]
call sub.rtl120.bpl__Sysutils_StrPas_qqrpxc
mov edx, dword [ebp - 0x18]
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
lea eax, [ebp - 0x1c]
mov ecx, dword [ebp - 8]
mov edx, 0x47bbc4
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov ecx, dword [ebp - 0x1c]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax]
call dword [ebx + 0x34]
cmp byte [0x4c35fc], 0
jne 0x47b31d
mov eax, dword [ebp - 0xc]
cmp byte [eax + 0xc0], 0
je 0x47b31d
mov eax, dword [0x4c4b0c]
mov eax, dword [eax]
call eax
mov byte [0x4c35fc], 1
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x3c], 0
jne 0x47b350
mov eax, dword [ebp - 0xc]
call fcn.004776f0
mov ebx, eax
mov eax, dword [ebp - 0xc]
mov dword [eax + 0x3c], ebx
test ebx, ebx
jne 0x47b350
mov ecx, 0x47bc18
mov dl, 1
mov eax, dword [0x4649ec]
call sub.rtl120.bpl__Sysutils_Exception__bctr_qqrx20System_UnicodeString
call sub.rtl120.bpl__System__RaiseExcept_qqrv
xor ecx, ecx
push ebp
push 0x47baea
push dword fs:[ecx]
mov dword fs:[ecx], esp
mov eax, dword [ebp - 0xc]
cmp word [eax + 0xba], 0
je 0x47b37d
mov ebx, dword [ebp - 0xc]
mov edx, dword [ebp - 0xc]
mov eax, dword [ebx + 0xbc]
call dword [ebx + 0xb8]
mov eax, dword [0x4c4910]
cmp dword [eax], 0x1010000f
jb 0x47b3ea
mov eax, dword [ebp - 0xc]
movzx eax, byte [eax + 0x94]
push eax
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4b14]
mov eax, dword [eax]
call eax
add esp, 8
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test al, al
je 0x47b3ea
lea ecx, [ebp - 0x24]
mov eax, dword [ebp - 0xc]
movzx edx, byte [eax + 0x94]
mov eax, dword [0x464244]
call sub.rtl120.bpl__Typinfo_GetEnumName_qqrp17Typinfo_TTypeInfoi
mov ecx, dword [ebp - 0x24]
lea eax, [ebp - 0x20]
mov edx, 0x47bc60
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov ecx, dword [ebp - 0x20]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax]
call dword [ebx + 0x34]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0xc4]
test eax, eax
je 0x47b409
test byte [eax + 0x45], 1
je 0x47b409
mov edx, eax
mov eax, dword [ebp - 0xc]
call fcn.0047afc4
jmp 0x47b488
push 0x4779d4
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4c54]
mov eax, dword [eax]
call eax
add esp, 8
mov eax, dword [ebp - 0xc]
push eax
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4e78]
mov eax, dword [eax]
call eax
add esp, 8
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x4c]
call fcn.0047d8c0
test al, al
jne 0x47b488
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x58]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x47b47a
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x54], 0
jne 0x47b47a
lea edx, [ebp - 0x28]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x58]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov edx, dword [ebp - 0x28]
mov eax, dword [ebp - 0xc]
call fcn.0047a510
jmp 0x47b488
mov eax, dword [ebp - 0xc]
mov edx, dword [eax + 0x54]
mov eax, dword [ebp - 0xc]
call fcn.0047a2f8
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x4c]
call fcn.0047d8b8
test al, al
jne 0x47b4a6
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x4c]
call fcn.0047d8c8
test al, al
je 0x47b4b0
mov eax, dword [ebp - 0xc]
call fcn.00479c50
jmp 0x47b4f1
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x48]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x47b4e3
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x44], 0
jne 0x47b4e3
lea edx, [ebp - 0x2c]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x48]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov edx, dword [ebp - 0x2c]
mov eax, dword [ebp - 0xc]
call fcn.00479e98
jmp 0x47b4f1
mov eax, dword [ebp - 0xc]
mov edx, dword [eax + 0x44]
mov eax, dword [ebp - 0xc]
call fcn.00479a3c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x4c]
call fcn.0047d8c8
test al, al
jne 0x47b550
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x60]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x47b53c
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x5c], 0
jne 0x47b53c
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x64], 0
jne 0x47b53c
lea edx, [ebp - 0x30]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x60]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov edx, dword [ebp - 0x30]
mov eax, dword [ebp - 0xc]
call fcn.004798f8
jmp 0x47b550
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax + 0x64]
mov eax, dword [ebp - 0xc]
mov edx, dword [eax + 0x5c]
mov eax, dword [ebp - 0xc]
call fcn.00479138
mov eax, dword [ebp - 0xc]
mov edx, dword [eax + 0x68]
mov eax, dword [ebp - 0xc]
call fcn.00478b98
mov eax, dword [ebp - 0xc]
mov edx, dword [eax + 0x6c]
mov eax, dword [ebp - 0xc]
call fcn.00478f00
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x74]
mov edx, dword [eax]
call dword [edx + 0x14]
test eax, eax
jle 0x47b59f
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x70], 0
jne 0x47b59f
lea edx, [ebp - 0x34]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x74]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov edx, dword [ebp - 0x34]
mov eax, dword [ebp - 0xc]
call fcn.0047abf4
jmp 0x47b5ad
mov eax, dword [ebp - 0xc]
mov edx, dword [eax + 0x70]
mov eax, dword [ebp - 0xc]
call fcn.0047a910
mov eax, dword [ebp - 0xc]
movzx eax, byte [eax + 0x8c]
cmp al, 1
jne 0x47b5ea
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
mov edx, 1
call fcn.00454e18
test eax, eax
jne 0x47b65a
push 0x47bc98
mov cl, 1
mov edx, dword [0x4649ec]
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax]
call dword [ebx + 0x3c]
jmp 0x47b65a
test al, al
jbe 0x47b65a
and eax, 0x7f
mov eax, dword [eax*4 + 0x4c35c4]
push eax
mov eax, dword [0x4c4d18]
mov eax, dword [eax]
call eax
pop ecx
mov ebx, eax
test ebx, ebx
jne 0x47b61e
push 0x47bce8
mov cl, 1
mov edx, dword [0x4649ec]
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x3c]
push ebx
push 0
push 4
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ca0]
mov eax, dword [eax]
call eax
add esp, 0x10
test eax, eax
jne 0x47b64f
push 0x47bd38
mov cl, 1
mov edx, dword [0x4649ec]
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x3c]
push ebx
mov eax, dword [0x4c4bf8]
mov eax, dword [eax]
call eax
pop ecx
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax + 0x84]
or ebx, 0x4000
mov eax, dword [ebp - 0xc]
cmp byte [eax + 0x41], 5
jne 0x47b679
mov eax, dword [ebp - 0xc]
mov byte [eax + 0x41], 0
mov eax, dword [0x4c4910]
cmp dword [eax], 0x1010000f
jb 0x47b6fe
mov eax, dword [ebp - 0xc]
movzx eax, byte [eax + 0x41]
mov edx, dword [ebp - 0xc]
cmp al, byte [edx + 0x42]
ja 0x47b79f
and eax, 0x7f
mov eax, dword [eax*4 + 0x4c35d8]
push 0
push eax
push 0x7b
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ca0]
mov eax, dword [eax]
call eax
add esp, 0x10
mov eax, dword [ebp - 0xc]
movzx eax, byte [eax + 0x42]
mov eax, dword [eax*4 + 0x4c35d8]
push 0
push eax
push 0x7c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ca0]
mov eax, dword [eax]
call eax
add esp, 0x10
and ebx, 0xfdffffff
and ebx, 0xfbffffff
and ebx, 0xf7ffffff
and ebx, 0xefffffff
jmp 0x47b79f
mov eax, dword [ebp - 0xc]
movzx eax, byte [eax + 0x41]
mov edx, dword [ebp - 0xc]
movzx edx, byte [edx + 0x42]
cmp al, dl
ja 0x47b79f
and ebx, 0xfdffffff
and ebx, 0xfbffffff
and ebx, 0xf7ffffff
and ebx, 0xefffffff
test al, al
jbe 0x47b764
cmp al, 1
jne 0x47b73c
or ebx, 0x2000000
jmp 0x47b764
cmp al, 2
jne 0x47b74e
or ebx, 0x2000000
or ebx, 0x4000000
jmp 0x47b764
cmp al, 3
jne 0x47b764
or ebx, 0x2000000
or ebx, 0x4000000
or ebx, 0x10000000
cmp dl, 5
jae 0x47b79f
test dl, dl
jne 0x47b781
or ebx, 0x4000000
or ebx, 0x10000000
or ebx, 0x8000000
jmp 0x47b79f
cmp dl, 1
jne 0x47b794
or ebx, 0x10000000
or ebx, 0x8000000
jmp 0x47b79f
cmp dl, 2
jne 0x47b79f
or ebx, 0x8000000
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test al, al
je 0x47b7ff
push 0x47bd88
lea ecx, [ebp - 0x3c]
mov eax, dword [ebp - 0xc]
movzx edx, byte [eax + 0x41]
mov eax, dword [0x463cd4]
call sub.rtl120.bpl__Typinfo_GetEnumName_qqrp17Typinfo_TTypeInfoi
push dword [ebp - 0x3c]
push 0x47bdb4
lea ecx, [ebp - 0x40]
mov eax, dword [ebp - 0xc]
movzx edx, byte [eax + 0x42]
mov eax, dword [0x463cd4]
call sub.rtl120.bpl__Typinfo_GetEnumName_qqrp17Typinfo_TTypeInfoi
push dword [ebp - 0x40]
lea eax, [ebp - 0x38]
mov edx, 4
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov ecx, dword [ebp - 0x38]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x34]
mov eax, dword [ebp - 0xc]
movzx edx, byte [eax + 0xb0]
mov eax, dword [ebp - 0xc]
call fcn.0047d0a0
mov eax, dword [0x4c4910]
cmp dword [eax], 0x1010000f
ja 0x47b82b
mov eax, ebx
and eax, 0x20
cmp eax, 0x20
jne 0x47b82b
and ebx, 0xffffffdf
push 0
push ebx
push 0x20
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ca0]
mov eax, dword [eax]
call eax
add esp, 0x10
mov eax, dword [ebp - 0xc]
cmp dword [eax + 0x88], 0
je 0x47b89c
lea eax, [ebp - 0x44]
mov edx, dword [ebp - 0xc]
mov edx, dword [edx + 0x88]
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromUStr_qqrr27System__AnsiStringT_us_i0__x20System_UnicodeStringus
mov eax, dword [ebp - 0x44]
call sub.rtl120.bpl__System__LStrToPChar_qqrx27System__AnsiStringT_us_i0__
push eax
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4c78]
mov eax, dword [eax]
call eax
add esp, 8
test eax, eax
jne 0x47b8b2
push 0x47bde4
mov cl, 1
mov edx, dword [0x4649ec]
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x3c]
jmp 0x47b8b2
mov ecx, 0x47be24
mov dl, 1
mov eax, dword [0x4649ec]
call sub.rtl120.bpl__Sysutils_Exception__bctr_qqrx20System_UnicodeString
call sub.rtl120.bpl__System__RaiseExcept_qqrv
mov eax, dword [ebp - 0xc]
call fcn.0047cd08
mov byte [ebp - 0xd], al
push 0
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x98]
push eax
push 0x2c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ca0]
mov eax, dword [eax]
call eax
add esp, 0x10
test byte [ebp - 0xd], 0x10
jne 0x47b956
mov eax, dword [ebp - 0xc]
push eax
push 0
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ce4]
mov eax, dword [eax]
call eax
add esp, 0xc
test eax, eax
jne 0x47b916
push 0x47be54
mov cl, 1
mov edx, dword [0x4649ec]
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x3c]
push 0x477eac
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4e48]
mov eax, dword [eax]
call eax
add esp, 8
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x9c]
cmp eax, 0x5000
je 0x47b956
push 0
push eax
push 0x2a
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4ca0]
mov eax, dword [eax]
call eax
add esp, 0x10
test byte [ebp - 0xd], 2
je 0x47ba29
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0xa0]
test eax, eax
jbe 0x47b981
push eax
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4f4c]
mov eax, dword [eax]
call eax
add esp, 8
push 0x47811c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4e88]
mov eax, dword [eax]
call eax
add esp, 8
push 0x47830c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4e64]
mov eax, dword [eax]
call eax
add esp, 8
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0xa4]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
test eax, eax
jle 0x47ba0c
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0xa4]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
push eax
mov eax, dword [ebp - 0xc]
add eax, 0xa4
call sub.rtl120.bpl__System__UniqueStringU_qqrr20System_UnicodeString
push eax
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0x3c]
push eax
mov eax, dword [0x4c4a0c]
mov eax, dword [eax]
call eax
add esp, 0xc
test eax, eax
jne 0x47ba0c
push 0x47be98
mov cl, 1
mov edx, dword [0x4649ec]
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x3c]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test al, al
je 0x47ba29
mov ecx, 0x47bef0
mov dl, 8
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 0x34]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test al, al
je 0x47bae0
mov esi, 1
lea eax, [ebp - 4]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor edi, edi
test esi, ebx
je 0x47ba77
push dword [ebp - 4]
lea ecx, [ebp - 0x48]
mov edx, 8
mov eax, esi
call sub.rtl120.bpl__Sysutils_IntToHex_qqrii
push dword [ebp - 0x48]
push 0x47bf30
lea eax, [ebp - 4]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
add esi, esi
inc edi
cmp edi, 0x1f
jne 0x47ba4c
push 0x47bf44
lea ecx, [ebp - 0x50]
mov edx, 8
mov eax, ebx
call sub.rtl120.bpl__Sysutils_IntToHex_qqrii
push dword [ebp - 0x50]
push 0x47bf6c
push dword [ebp - 4]
lea eax, [ebp - 0x4c]
mov edx, 4
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov ecx, dword [ebp - 0x4c]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax]
call dword [ebx + 0x34]
lea edx, [ebp - 0x58]
mov eax, dword [ebp - 0xc]
call fcn.0047d398
mov ecx, dword [ebp - 0x58]
lea eax, [ebp - 0x54]
mov edx, 0x47bf80
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov ecx, dword [ebp - 0x54]
mov dl, 8
mov eax, dword [ebp - 0xc]
mov ebx, dword [eax]
call dword [ebx + 0x34]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x47bb16
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x47bb3d
mov eax, dword [ebp - 0xc]
mov eax, dword [eax + 0xc8]
add eax, 4
push eax
call sub.kernel32.dll_LeaveCriticalSection
ret