Function at 0x40bb94
Capabilities:
Access peb ldr_data
Get number of processors

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffd08
push ebx
push esi
push edi
mov dword [ebp - 4], eax
lea eax, [ebp - 0x2e8]
xor ecx, ecx
mov edx, 0x2d8
call sub.rtl120.bpl__System__FillChar_qqrpvib
mov esi, 0x4b7190
lea edi, [ebp - 0x2e8]
mov ecx, 0x35
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x2e8]
mov dword [ebp - 0x1e0], eax
lea eax, [ebp - 0x1e0]
mov ecx, 0x174
mov edx, 0x3e
call fcn.00418ee0
xor eax, eax
push ebp
push 0x40bf00
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
push ebp
push 0x40bec9
push dword fs:[eax]
mov dword fs:[eax], esp
mov dword [ebp - 0x214], 0x40b7d8
mov eax, dword [ebp - 4]
mov dword [ebp - 0x200], eax
lea eax, [ebp - 0x214]
mov dword [ebp - 0x1d8], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x28]
cmp dword [eax + 8], 0
je 0x40bc37
mov eax, dword [ebp - 4]
call fcn.0040c638
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TMemoryStream_]
call sub.rtl120.bpl__System_TObject__bctr_qqrv
mov ebx, eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x28]
mov dword [eax + 8], ebx
push 0
push 0
mov eax, ebx
call sub.rtl120.bpl__Classes_TStream_SetPosition_qqrxj
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x28]
mov edx, dword [eax + 8]
lea eax, [ebp - 0x1e0]
call fcn.004182b4
mov eax, dword [ebp - 4]
mov ebx, dword [eax + 0x2c]
test ebx, ebx
je 0x40bc91
mov eax, ebx
mov edx, dword [eax]
call dword [edx + 0x30]
test eax, eax
je 0x40bc91
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2c]
mov edx, dword [eax]
call dword [edx + 0x24]
test eax, eax
jne 0x40bca3
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
call sub.rtl120.bpl__System__TryFinallyExit_qqrv
jmp 0x40bf07
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2c]
mov edx, dword [eax]
call dword [edx + 0x30]
mov dword [ebp - 0x1c4], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2c]
mov edx, dword [eax]
call dword [edx + 0x30]
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x28]
mov dword [edx + 0x10], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2c]
mov edx, dword [eax]
call dword [edx + 0x24]
mov dword [ebp - 0x1c0], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x2c]
mov edx, dword [eax]
call dword [edx + 0x24]
mov edx, dword [ebp - 4]
mov edx, dword [edx + 0x28]
mov dword [edx + 0xc], eax
mov dword [ebp - 0x1bc], 3
mov dword [ebp - 0x1b8], 2
mov dl, 1
mov eax, dword [sym.imp.vcl120.bpl__Graphics_TBitmap_]
call sub.vcl120.bpl__Graphics_TBitmap__bctr_qqrv
mov dword [ebp - 0x10], eax
xor eax, eax
push ebp
push 0x40beb8
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x2c]
mov eax, dword [ebp - 0x10]
mov ecx, dword [eax]
call dword [ecx + 8]
mov dl, 6
mov eax, dword [ebp - 0x10]
call sub.vcl120.bpl__Graphics_TBitmap_SetPixelFormat_qqr21Graphics_TPixelFormat
lea eax, [ebp - 0x1e0]
call fcn.0041850c
mov eax, dword [ebp - 4]
movzx edx, byte [eax + 0x3f]
lea eax, [ebp - 0x1e0]
or ecx, 0xffffffff
call fcn.00418410
mov eax, dword [ebp - 4]
cmp byte [eax + 0x3d], 0
je 0x40bd79
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x28]
mov byte [eax + 0x14], 1
lea eax, [ebp - 0x1e0]
mov edx, 1
call fcn.00418680
mov eax, dword [ebp - 4]
cmp byte [eax + 0x41], 0
je 0x40bd8d
lea eax, [ebp - 0x1e0]
call fcn.00418ae8
xor edx, edx
mov eax, dword [ebp - 0x10]
call sub.vcl120.bpl__Graphics_TBitmap_GetScanline_qqri
mov dword [ebp - 0xc], eax
mov edx, 1
mov eax, dword [ebp - 0x10]
call sub.vcl120.bpl__Graphics_TBitmap_GetScanline_qqri
mov ebx, eax
sub ebx, dword [ebp - 0xc]
test ebx, ebx
jle 0x40bdc0
test bl, 3
jne 0x40bdc0
mov eax, dword [ebp - 0x1c0]
mov dword [ebp - 8], eax
jmp 0x40bdc7
mov dword [ebp - 8], 1
push 0
push 0
push 0
lea eax, [ebp - 0x2f8]
push eax
xor ecx, ecx
xor edx, edx
xor eax, eax
call sub.rtl120.bpl__Classes_Rect_qqriiii
lea eax, [ebp - 0x2f8]
push eax
push 0
xor ecx, ecx
mov edx, dword [ebp - 4]
mov eax, dword [ebp - 4]
mov si, 0xfffd
call sub.rtl120.bpl__System__CallDynaInst_qqrv
xor eax, eax
push ebp
push 0x40be9b
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x1e0]
or edx, 0xffffffff
call fcn.00418d00
jmp 0x40be31
lea edx, [ebp - 0xc]
lea eax, [ebp - 0x1e0]
mov ecx, dword [ebp - 8]
call fcn.00418d74
mov esi, eax
mov eax, ebx
imul esi
add dword [ebp - 0xc], eax
mov eax, dword [ebp - 0x104]
cmp eax, dword [ebp - 0x1c0]
jb 0x40be17
lea eax, [ebp - 0x1e0]
call fcn.00419000
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x40bea2
call sub.rtl120.bpl__System_ExceptObject_qqrv
test eax, eax
jne 0x40be67
mov ebx, 0x64
jmp 0x40be69
xor ebx, ebx
push ebx
push 0
push 0
lea eax, [ebp - 0x2f8]
push eax
xor ecx, ecx
xor edx, edx
xor eax, eax
call sub.rtl120.bpl__Classes_Rect_qqriiii
lea eax, [ebp - 0x2f8]
push eax
push 0
mov cl, 2
mov edx, dword [ebp - 4]
mov eax, dword [ebp - 4]
mov si, 0xfffd
call sub.rtl120.bpl__System__CallDynaInst_qqrv
ret
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret