Function at 0x40d021
Capabilities:
Access peb ldr_data
Check for peb beingdebugged flag
Check for peb ntglobalflag flag

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x30
mov dword [ebp - 4], 0
mov dword [ebp - 8], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 0x10], 0
mov dword [ebp - 0x14], 0
mov eax, dword fs:[0x30]
movzx eax, byte [eax + 2]
test eax, eax
jne 0x40d082
mov eax, dword fs:[0x30]
mov eax, dword [eax + 0x68]
and eax, 0x70
test eax, eax
jne 0x40d082
mov eax, dword fs:[0x30]
mov eax, dword [eax + 0x18]
cmp dword [eax + 0xc], 2
jne 0x40d082
cmp dword [eax + 0x10], 0
jne 0x40d082
xor eax, eax
mov dword [ebp - 4], eax
cmp dword [ebp - 4], 0
jne 0x40d2ad
mov dword [ebp - 0x18], esp
mov eax, 0x48
call fcn.0040d456
cmp dword [ebp - 0x18], esp
je 0x40d0ae
push 6
call fcn.0040d450
add esp, 4
mov dword [ebp - 0x1c], eax
mov dword [ebp - 0x20], esp
push 0x100
push 0
push dword [ebp - 0x1c]
mov eax, 0x49
call fcn.0040d456
cmp dword [ebp - 0x20], esp
je 0x40d0dd
push 6
call fcn.0040d450
add esp, 4
mov dword [ebp - 8], eax
lea eax, [ebp - 0xc]
mov ebx, eax
mov ecx, 0
push ecx
push ebx
mov dword [ebx], ecx
cmp ecx, 0x100
jg 0x40d238
fild dword [ebp - 8]
fstp qword [ebp - 0x1c]
fld qword [ebp - 0x1c]
fild dword [ebp - 0xc]
fstp qword [ebp - 0x24]
fadd qword [ebp - 0x24]
fstp qword [ebp - 0x2c]
push 0x80000301
push 0
push 4
fld qword [ebp - 0x2c]
call fcn.0040198e
push 0x80000301
push 0
push eax
push 2
mov ebx, 0x40fbd0
call fcn.0040d462
add esp, 0x1c
mov dword [ebp - 0x30], eax
mov eax, dword [ebp - 0x30]
push eax
mov ebx, dword [ebp - 0x10]
test ebx, ebx
je 0x40d154
push ebx
call fcn.0040d45c
add esp, 4
pop eax
mov dword [ebp - 0x10], eax
mov eax, 0x496f00
xor ecx, ecx
test eax, eax
je 0x40d166
mov ecx, dword [eax + 4]
push ecx
add eax, 8
push eax
mov eax, dword [ebp - 0x10]
xor ebx, ebx
test eax, eax
je 0x40d177
mov ebx, dword [eax + 4]
add eax, 8
push eax
cmp ebx, ecx
mov eax, 1
jne 0x40d18e
dec eax
test ecx, ecx
je 0x40d18e
call fcn.0040cf75
add esp, 0xc
test eax, eax
jne 0x40d1a1
inc dword [ebp - 0x14]
jmp 0x40d22e
mov eax, 0x496f0c
xor ecx, ecx
test eax, eax
je 0x40d1af
mov ecx, dword [eax + 4]
push ecx
add eax, 8
push eax
mov eax, dword [ebp - 0x10]
xor ebx, ebx
test eax, eax
je 0x40d1c0
mov ebx, dword [eax + 4]
add eax, 8
push eax
cmp ebx, ecx
mov eax, 1
jne 0x40d1d7
dec eax
test ecx, ecx
je 0x40d1d7
call fcn.0040cf75
add esp, 0xc
test eax, eax
jne 0x40d1ea
inc dword [ebp - 0x14]
jmp 0x40d22e
mov eax, 0x496f18
xor ecx, ecx
test eax, eax
je 0x40d1f8
mov ecx, dword [eax + 4]
push ecx
add eax, 8
push eax
mov eax, dword [ebp - 0x10]
xor ebx, ebx
test eax, eax
je 0x40d209
mov ebx, dword [eax + 4]
add eax, 8
push eax
cmp ebx, ecx
mov eax, 1
jne 0x40d220
dec eax
test ecx, ecx
je 0x40d220
call fcn.0040cf75
add esp, 0xc
test eax, eax
jne 0x40d22e
inc dword [ebp - 0x14]
pop ebx
pop ecx
add ecx, 4
jmp 0x40d0ea
add esp, 8
mov dword [ebp - 0x18], esp
mov eax, 0x48
call fcn.0040d456
cmp dword [ebp - 0x18], esp
je 0x40d25a
push 6
call fcn.0040d450
add esp, 4
mov dword [ebp - 0x1c], eax
mov dword [ebp - 0x20], esp
push dword [ebp - 8]
push 0
push dword [ebp - 0x1c]
mov eax, 0x4a
call fcn.0040d456
cmp dword [ebp - 0x20], esp
je 0x40d287
push 6
call fcn.0040d450
add esp, 4
cmp dword [ebp - 0x14], 0xa
mov eax, 0
setg al
test eax, eax
je 0x40d2a5
mov eax, 1
jmp 0x40d2aa
mov eax, 0
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
jmp 0x40d2b5
push eax
mov ebx, dword [ebp - 0x10]
test ebx, ebx
je 0x40d2c6
push ebx
call fcn.0040d45c
add esp, 4
pop eax
mov esp, ebp
pop ebp
ret