Function at 0x40efb4
Capabilities:
Check os version
Get system information on windows

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffebc
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 4], ecx
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x40f1de
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 4]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x120]
mov edx, 0x11c
call fcn.00402094
mov dword [ebp - 0x120], 0x11c
lea eax, [ebp - 0x120]
push eax
call sub.kernel32.dll_GetVersionExW
lea eax, [ebp - 0x144]
mov edx, 0x24
call fcn.00402094
push 0x40f1ec
push 0x40f214
call sub.kernel32.dll_GetModuleHandleW_1
push eax
call fcn.00401878
test eax, eax
je 0x40f03a
lea edx, [ebp - 0x144]
push edx
call eax
jmp 0x40f046
lea eax, [ebp - 0x144]
push eax
call sub.kernel32.dll_GetSystemInfo
cmp dword [ebp - 0x110], 2
jne 0x40f1be
test bl, bl
je 0x40f076
call fcn.0040f368
mov edx, dword [eax]
mov dword [ebp - 0x11c], edx
mov edx, dword [eax + 4]
mov dword [ebp - 0x118], edx
mov eax, dword [eax + 8]
mov dword [ebp - 0x114], eax
mov eax, dword [ebp - 0x11c]
add eax, 0xfffffffd
sub eax, 2
jae 0x40f091
lea eax, [ebp - 4]
mov edx, 0x40f23c
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
cmp dword [ebp - 0x11c], 5
jne 0x40f0b5
cmp dword [ebp - 0x118], 0
jne 0x40f0b5
lea eax, [ebp - 4]
mov edx, 0x40f260
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
cmp dword [ebp - 0x11c], 5
jne 0x40f0d9
cmp dword [ebp - 0x118], 1
jne 0x40f0d9
lea eax, [ebp - 4]
mov edx, 0x40f288
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
cmp dword [ebp - 0x11c], 5
jne 0x40f11f
cmp dword [ebp - 0x118], 2
jne 0x40f11f
cmp byte [ebp - 6], 1
jne 0x40f10d
cmp word [ebp - 0x144], 9
jne 0x40f10d
lea eax, [ebp - 4]
mov edx, 0x40f288
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
lea eax, [ebp - 4]
mov edx, 0x40f2ac
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
cmp dword [ebp - 0x11c], 6
jne 0x40f140
cmp dword [ebp - 0x118], 0
jne 0x40f140
lea eax, [ebp - 4]
mov edx, 0x40f2e0
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
cmp dword [ebp - 0x11c], 6
jne 0x40f161
cmp dword [ebp - 0x118], 1
jne 0x40f161
lea eax, [ebp - 4]
mov edx, 0x40f308
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
cmp dword [ebp - 0x11c], 6
jne 0x40f187
mov eax, dword [ebp - 0x118]
add eax, 0xfffffffe
sub eax, 2
jae 0x40f187
lea eax, [ebp - 4]
mov edx, 0x40f328
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
mov eax, dword [ebp - 0x11c]
cmp eax, 6
jne 0x40f1ac
mov edx, dword [ebp - 0x118]
sub edx, 4
jne 0x40f1ac
lea eax, [ebp - 4]
mov edx, 0x40f348
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
jmp 0x40f1be
cmp eax, 0xa
jne 0x40f1be
lea eax, [ebp - 4]
mov edx, 0x40f348
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, esi
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x40f1e5
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret