Function at 0x5700c384
Capabilities:
Check os version

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffe24
push ebx
xor edx, edx
mov dword [ebp - 0x1dc], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x5700c8c8
push dword fs:[eax]
mov dword fs:[eax], esp
cmp byte [0x57024468], 0
je 0x5700c3bd
cmp dword [0x5702704c], 0
jne 0x5700c89c
mov byte [0x57024468], 1
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x5700c43e
lea eax, [ebp - 0x1b4]
mov edx, 0x11c
call fcn.5700189c
mov dword [ebp - 0x1b4], 0x11c
push 0x5700c8d4
push 0x5700c8f0
call sub.kernel32.dll_GetModuleHandleW
push eax
call fcn.57001690
mov ebx, eax
test ebx, ebx
je 0x5700c416
lea eax, [ebp - 0x1b4]
push eax
call ebx
test eax, eax
je 0x5700c498
lea eax, [ebp - 0x1b4]
push eax
call sub.kernel32.dll_GetVersionExW
test eax, eax
jne 0x5700c498
mov dword [ebp - 0x1b4], 0x114
lea eax, [ebp - 0x1b4]
push eax
call sub.kernel32.dll_GetVersionExW
jmp 0x5700c498
lea eax, [ebp - 0x98]
mov edx, 0x94
call fcn.5700189c
mov dword [ebp - 0x98], 0x94
lea eax, [ebp - 0x98]
push eax
call sub.kernel32.dll_GetVersionExA
lea edx, [ebp - 0x1b4]
lea eax, [ebp - 0x98]
mov ecx, 0x94
call sub.rtl120.bpl__System_Move_qqrpxvpvi
mov ecx, 0x80
lea eax, [ebp - 0x84]
lea edx, [ebp - 0x1a0]
movzx ebx, byte [eax]
mov word [edx], bx
add edx, 2
inc eax
dec ecx
jne 0x5700c48b
mov eax, dword [ebp - 0x1b0]
mov dword [0x57027030], eax
mov eax, dword [ebp - 0x1ac]
mov dword [0x57027034], eax
mov eax, 0x5702703c
lea edx, [ebp - 0x1a0]
mov ecx, 0x80
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov eax, dword [ebp - 0x1a4]
cmp eax, 1
sete dl
mov byte [0x57027040], dl
cmp eax, 2
sete al
mov byte [0x57027042], al
cmp byte [0x57027040], 0
je 0x5700c4f7
movzx eax, word [ebp - 0x1a8]
mov dword [0x57027038], eax
jmp 0x5700c502
mov eax, dword [ebp - 0x1a8]
mov dword [0x57027038], eax
mov byte [0x57027044], 0
xor eax, eax
mov dword [0x57027048], eax
cmp byte [0x57027040], 0
je 0x5700c5bc
mov eax, dword [0x57027030]
sub eax, 4
jb 0x5700c5a4
je 0x5700c52b
jmp 0x5700c59d
mov eax, dword [0x57027034]
sub eax, 0xa
jb 0x5700c53f
je 0x5700c55d
dec eax
sub eax, 0x50
jb 0x5700c58b
jmp 0x5700c594
cmp dword [0x57027038], 0x3e8
jbe 0x5700c554
mov byte [0x57027044], 2
jmp 0x5700c5a4
mov byte [0x57027044], 1
jmp 0x5700c5a4
mov eax, dword [0x57027038]
cmp eax, 0xa8c
jbe 0x5700c572
mov byte [0x57027044], 5
jmp 0x5700c5a4
cmp eax, 0x7d0
jbe 0x5700c582
mov byte [0x57027044], 4
jmp 0x5700c5a4
mov byte [0x57027044], 3
jmp 0x5700c5a4
mov byte [0x57027044], 5
jmp 0x5700c5a4
mov byte [0x57027044], 6
jmp 0x5700c5a4
mov byte [0x57027044], 6
movzx eax, byte [0x57027044]
mov byte [0x57027041], al
mov byte [0x57027043], 0
jmp 0x5700c7af
cmp byte [0x57027042], 0
je 0x5700c7af
mov eax, dword [0x57027030]
cmp eax, 0xa
ja case.0x5700c5d7.7
jmp dword [eax*4 + 0x5700c5de]
mov byte [0x57027044], 7
jmp 0x5700c702
mov byte [0x57027044], 8
jmp 0x5700c702
mov eax, dword [0x57027034]
sub eax, 1
jb 0x5700c630
je 0x5700c63c
jmp 0x5700c648
mov byte [0x57027044], 9
jmp 0x5700c702
mov byte [0x57027044], 0xa
jmp 0x5700c702
cmp byte [ebp - 0x9a], 1
jne 0x5700c65d
mov byte [0x57027044], 0xa
jmp 0x5700c702
mov byte [0x57027044], 0xb
jmp 0x5700c702
mov eax, dword [0x57027034]
sub eax, 1
jb 0x5700c67d
je 0x5700c698
dec eax
je 0x5700c6b3
dec eax
je 0x5700c6ce
jmp 0x5700c6e9
cmp byte [ebp - 0x9a], 1
jne 0x5700c68f
mov byte [0x57027044], 0xc
jmp 0x5700c702
mov byte [0x57027044], 0xd
jmp 0x5700c702
cmp byte [ebp - 0x9a], 1
jne 0x5700c6aa
mov byte [0x57027044], 0xe
jmp 0x5700c702
mov byte [0x57027044], 0xf
jmp 0x5700c702
cmp byte [ebp - 0x9a], 1
jne 0x5700c6c5
mov byte [0x57027044], 0x10
jmp 0x5700c702
mov byte [0x57027044], 0x11
jmp 0x5700c702
cmp byte [ebp - 0x9a], 1
jne 0x5700c6e0
mov byte [0x57027044], 0x12
jmp 0x5700c702
mov byte [0x57027044], 0x13
jmp 0x5700c702
mov byte [0x57027044], 0x15
jmp 0x5700c702
mov byte [0x57027044], 0x14
jmp 0x5700c702
mov byte [0x57027044], 0x15
mov byte [0x57027041], 0
movzx eax, byte [0x57027044]
mov byte [0x57027043], al
cmp dword [ebp - 0x1b4], 0x11c
jb 0x5700c72f
movzx eax, word [ebp - 0xa0]
mov dword [0x57027048], eax
jmp 0x5700c76b
mov eax, dword [0x5702703c]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
cmp eax, 0xe
jl 0x5700c76b
mov eax, dword [0x5702703c]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
sub eax, 0xd
push eax
mov eax, 0x5702703c
call sub.rtl120.bpl__System__UniqueStringU_qqrr20System_UnicodeString
lea edx, [eax + 0x1a]
mov ebx, dword [sym.madBasic_.bpl__Madstrings_StrToIntExW]
mov ebx, dword [ebx]
xor eax, eax
pop ecx
call ebx
mov dword [0x57027048], eax
push 0x5700c904
push 0x5700c92c
call sub.kernel32.dll_GetModuleHandleW
push eax
call fcn.57001690
mov ebx, eax
test ebx, ebx
je 0x5700c7af
lea eax, [ebp - 0x1d8]
mov edx, 0x24
call fcn.5700189c
lea eax, [ebp - 0x1d8]
push eax
call ebx
cmp word [ebp - 0x1d8], 9
sete al
mov byte [0x57027045], al
lea eax, [ebp - 0x1dc]
movzx edx, byte [0x57027044]
mov edx, dword [edx*4 + sym.madBasic_.bpl__Madtools_COsDescr]
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromPChar_qqrr27System__AnsiStringT_us_i0__pcus
mov edx, dword [ebp - 0x1dc]
mov eax, 0x5702704c
call sub.rtl120.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
cmp byte [0x57027042], 0
je 0x5700c89c
push 0x59
call sub.user32.dll_GetSystemMetrics
test eax, eax
je 0x5700c804
mov eax, 0x5702704c
mov edx, 0x5700c954
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
push 0x56
call sub.user32.dll_GetSystemMetrics
test eax, eax
je 0x5700c81e
mov eax, 0x5702704c
mov edx, 0x5700c968
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
push 0x58
call sub.user32.dll_GetSystemMetrics
test eax, eax
je 0x5700c838
mov eax, 0x5702704c
mov edx, 0x5700c98c
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
cmp byte [0x57027044], 0xc
jae 0x5700c85b
push 0x57
call sub.user32.dll_GetSystemMetrics
test eax, eax
je 0x5700c85b
mov eax, 0x5702704c
mov edx, 0x5700c9ac
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
cmp byte [0x57027045], 0
je 0x5700c873
mov eax, 0x5702704c
mov edx, 0x5700c9d4
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
cmp dword [0x5702703c], 0
je 0x5700c89c
push dword [0x5702704c]
push 0x5700c9ec
push dword [0x5702703c]
mov eax, 0x5702704c
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 4]
mov edx, 0x57027030
mov ecx, dword [sym.madBasic_.bpl___xp_12Madtools_TOS]
call sub.rtl120.bpl__System__CopyRecord_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5700c8cf
lea eax, [ebp - 0x1dc]
call sub.rtl120.bpl__System__LStrClr_qqrpv
ret