Function at 0x180039f70
Capabilities:
Access peb ldr_data
Encode data using xor
Get ntdll base address
Resolve function by parsing pe exports

Disassembly:
sub rsp, 0x28
cmp dword [0x181461aa0], 0
jne 0x18003a1d4
mov rax, qword gs:[0x60]
xor edx, edx
mov rcx, qword [rax + 0x18]
mov r8, qword [rcx + 0x10]
mov rax, qword [r8 + 0x30]
test rax, rax
je 0x18003a1de
mov r10, rax
movsxd rax, dword [rax + 0x3c]
mov ecx, dword [rax + r10 + 0x88]
test ecx, ecx
je 0x180039fde
lea rdx, [r10 + rcx]
mov ecx, dword [r10 + rcx + 0xc]
mov eax, dword [rcx + r10]
or eax, 0x20202020
cmp eax, 0x6c64746e
jne 0x180039fde
mov eax, dword [rcx + r10 + 4]
or eax, 0x20202020
cmp eax, 0x6c642e6c
je 0x180039fea
mov r8, qword [r8]
mov rax, qword [r8 + 0x30]
test rax, rax
jne 0x180039fa1
test rdx, rdx
je 0x18003a1de
mov qword [rsp + 0x38], rbx
mov ebx, dword [rdx + 0x18]
mov qword [rsp + 0x40], rbp
mov ebp, dword [rdx + 0x20]
mov qword [rsp + 0x48], rsi
add rbp, r10
mov qword [rsp + 0x18], r12
lea r12, [0x181461aa0]
mov qword [rsp + 0x10], r13
mov r13d, 0x775a
mov qword [rsp + 8], r14
mov r14d, dword [rdx + 0x1c]
mov qword [rsp], r15
add r14, r10
mov r15d, dword [rdx + 0x24]
add r15, r10
mov qword [rsp + 0x20], rdi
xor esi, esi
dec ebx
mov r9d, dword [rbp + rbx*4]
add r9, r10
cmp word [r9], r13w
jne 0x18003a10b
xor r8d, r8d
mov edx, 0xb9378063
mov rax, r9
nop
movzx eax, word [rax]
mov ecx, edx
ror ecx, 8
inc r8d
add ecx, eax
mov eax, r8d
add rax, r9
xor edx, ecx
cmp byte [rax], 0
jne 0x18003a060
mov edi, esi
mov r11b, 0xc3
add rdi, rdi
mov word [rsp + 0x30], 0x50f
movzx r9d, word [rsp + 0x30]
mov dword [r12 + rdi*8 + 8], edx
movzx eax, word [r15 + rbx*2]
mov ecx, dword [r14 + rax*4]
mov dword [r12 + rdi*8 + 0xc], ecx
lea r8, [r10 + rcx]
cmp r9w, word [r8 + 0x12]
lea rax, [r8 + 0x12]
jne 0x18003a0b7
cmp r11b, byte [rax + 2]
je 0x18003a0fc
mov ecx, 1
nop dword [rax]
mov eax, ecx
shl eax, 5
mov edx, eax
add rax, 0x12
add rax, r8
cmp r9w, word [rax]
jne 0x18003a0da
cmp r11b, byte [rax + 2]
je 0x18003a0fc
mov rax, r8
sub rax, rdx
add rax, 0x12
cmp r9w, word [rax]
jne 0x18003a0f0
cmp r11b, byte [rax + 2]
je 0x18003a0fc
inc ecx
cmp ecx, 0x200
jb 0x18003a0c0
xor eax, eax
inc esi
mov qword [r12 + rdi*8 + 0x10], rax
cmp esi, 0x258
je 0x18003a113
test ebx, ebx
jne 0x18003a040
mov r15, qword [rsp]
lea eax, [rsi - 1]
mov r14, qword [rsp + 8]
xor r11d, r11d
mov r13, qword [rsp + 0x10]
mov rbp, qword [rsp + 0x40]
mov dword [0x181461aa0], esi
test eax, eax
je 0x18003a1c0
nop word [rax + rax]
mov eax, esi
xor ecx, ecx
sub eax, r11d
cmp eax, 1
je 0x18003a1b5
nop dword [rax]
lea r10d, [rcx + 1]
mov r9d, ecx
add r9, r9
mov r8d, r10d
add r8, r8
mov edi, dword [r12 + r9*8 + 0xc]
mov ebx, dword [r12 + r8*8 + 0xc]
cmp edi, ebx
jbe 0x18003a1a6
mov eax, dword [r12 + r8*8 + 8]
mov edx, dword [r12 + r9*8 + 8]
mov rcx, qword [r12 + r9*8 + 0x10]
mov dword [r12 + r9*8 + 8], eax
mov rax, qword [r12 + r8*8 + 0x10]
mov qword [r12 + r9*8 + 0x10], rax
mov dword [r12 + r9*8 + 0xc], ebx
mov dword [r12 + r8*8 + 8], edx
mov dword [r12 + r8*8 + 0xc], edi
mov qword [r12 + r8*8 + 0x10], rcx
mov esi, dword [0x181461aa0]
mov eax, esi
mov ecx, r10d
sub eax, r11d
dec eax
cmp r10d, eax
jb 0x18003a150
inc r11d
lea eax, [rsi - 1]
cmp r11d, eax
jb 0x18003a140
mov rdi, qword [rsp + 0x20]
mov rsi, qword [rsp + 0x48]
mov rbx, qword [rsp + 0x38]
mov r12, qword [rsp + 0x18]
mov eax, 1
add rsp, 0x28
ret
xor eax, eax
add rsp, 0x28
ret