Function at 0x4248e0
Capabilities:
Query environment variable

Disassembly:
jmp dword [sym.imp.MSVBVM60.DLL___vbaFPException]
push ebp
mov ebp, esp
sub esp, 0xc
push 0x402346
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x44
push ebx
push esi
push edi
mov dword [ebp - 0xc], esp
mov dword [ebp - 8], 0x4016a8
mov edx, dword [ebp + 8]
xor esi, esi
lea ecx, [ebp - 0x18]
mov dword [ebp - 0x18], esi
mov dword [ebp - 0x1c], esi
mov dword [ebp - 0x20], esi
mov dword [ebp - 0x28], esi
mov dword [ebp - 0x2c], esi
mov dword [ebp - 0x3c], esi
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
lea eax, [ebp - 0x3c]
mov dword [ebp - 0x34], esi
push eax
push 1
mov dword [ebp - 0x3c], 2
call dword [sym.imp.MSVBVM60.DLL_rtcStringBstr]
mov edx, eax
lea ecx, [ebp - 0x1c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov ecx, dword [ebp - 0x1c]
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaStrToAnsi]
push 1
lea edx, [ebp - 0x2c]
push ecx
push edx
call edi
push eax
mov eax, dword [ebp - 0x18]
lea ecx, [ebp - 0x28]
push eax
push ecx
call edi
push eax
call dword [sym.imp.KERNEL32.DLL_ExpandEnvironmentStringsA]
mov edx, dword [ebp - 0x28]
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaStrToUnicode]
mov esi, eax
lea eax, [ebp - 0x18]
push edx
push eax
call ebx
mov ecx, dword [ebp - 0x2c]
lea edx, [ebp - 0x1c]
push ecx
push edx
call ebx
lea eax, [ebp - 0x2c]
lea ecx, [ebp - 0x28]
push eax
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0xc
test esi, esi
jle 0x424a63
push 0
call dword [sym.imp.MSVBVM60.DLL_rtcBstrFromAnsi]
mov dword [ebp - 0x34], eax
mov eax, esi
lea edx, [ebp - 0x3c]
add eax, 2
push edx
mov dword [ebp - 0x3c], 8
jo 0x424ac9
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcStringBstr]
mov edx, eax
lea ecx, [ebp - 0x1c]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
lea ecx, [ebp - 0x3c]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov ecx, dword [ebp - 0x1c]
add esi, 2
jo 0x424ac9
push esi
lea edx, [ebp - 0x2c]
push ecx
push edx
call edi
push eax
mov eax, dword [ebp - 0x18]
lea ecx, [ebp - 0x28]
push eax
push ecx
call edi
push eax
call dword [sym.imp.KERNEL32.DLL_ExpandEnvironmentStringsA]
mov edx, dword [ebp - 0x28]
mov esi, eax
lea eax, [ebp - 0x18]
push edx
push eax
call ebx
mov ecx, dword [ebp - 0x2c]
lea edx, [ebp - 0x1c]
push ecx
push edx
call ebx
lea eax, [ebp - 0x2c]
lea ecx, [ebp - 0x28]
push eax
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeStrList]
add esp, 0xc
test esi, esi
jle 0x424a63
mov edx, dword [ebp - 0x1c]
sub esi, 1
jo 0x424ac9
push esi
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharBstr]
mov edx, eax
lea ecx, [ebp - 0x20]
call dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
push 0x424ab3
jmp 0x424aa2
mov edx, dword [ebp - 0x18]
lea ecx, [ebp - 0x20]
call dword [sym.imp.MSVBVM60.DLL___vbaStrCopy]
push 0x424ab3
jmp 0x424aa2
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x18]
call esi
lea ecx, [ebp - 0x1c]
call esi
ret
call dword [sym.imp.MSVBVM60.DLL___vbaErrorOverflow]
nop
push ebp
mov ebp, esp
sub esp, 0xc
push 0x402346
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x2c
push ebx
push esi
push edi
mov dword [ebp - 0xc], esp
mov dword [ebp - 8], 0x4016c8
mov esi, dword [ebp + 8]
mov eax, esi
and eax, 1
mov dword [ebp - 4], eax
and esi, 0xfffffffe
push esi
mov dword [ebp + 8], esi
mov ecx, dword [esi]
call dword [ecx + 4]
mov eax, dword [esi + 0x10]
xor ebx, ebx
lea ecx, [ebp - 0x1c]
mov dword [ebp - 0x1c], ebx
mov dword [ebp - 0x20], ebx
mov edx, dword [eax]
push ecx
push 0x4061d0
push eax
call dword [edx + 0x37c]
cmp eax, ebx
fnclex
jge 0x424b4c
mov edx, dword [esi + 0x10]
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
push 0x37c
push 0x405da0
push edx
push eax
call edi
jmp 0x424b52
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaHresultCheckObj]
fld dword [ebp - 0x1c]
call dword [sym.imp.MSVBVM60.DLL___vbaFpI4]
mov dword [ebp - 0x18], eax
mov eax, dword [esi + 0x10]
push eax
mov ecx, dword [eax]
call dword [ecx + 0x35c]
cmp eax, ebx
fnclex
jge 0x424b81
mov edx, dword [esi + 0x10]
push 0x35c
push 0x405da0
push edx
push eax
call edi
mov eax, dword [esi + 0x10]
push 0x8080f0
push eax
mov ecx, dword [eax]
call dword [ecx + 0x6c]
cmp eax, ebx
fnclex
jge 0x424ba3
mov edx, dword [esi + 0x10]
push 0x6c
push 0x405da0
push edx
push eax
call edi
mov eax, dword [esi + 0x10]
lea edx, [ebp - 0x1c]
push edx
push eax
mov ecx, dword [eax]
call dword [ecx + 0x100]
cmp eax, ebx
fnclex
jge 0x424bca
mov ecx, dword [esi + 0x10]
push 0x100
push 0x405da0
push ecx
push eax
call edi
fld dword [ebp - 0x1c]
fild dword [ebp - 0x18]
mov ecx, dword [esi + 0x10]
push ecx
fstp qword [ebp - 0x3c]
fsub qword [ebp - 0x3c]
mov edx, dword [ecx]
cmp dword [section..data], 0
jne 0x424bed
fdiv qword [0x4016c0]
jmp 0x424bfe
push dword [0x4016c4]
push dword [0x4016c0]
call sub.MSVBVM60.DLL__adj_fdiv_m64
fnstsw ax
test al, 0xd
jne 0x424d52
fstp dword [ebp - 0x40]
fld dword [ebp - 0x40]
fstp dword [esp]
push ecx
call dword [edx + 0xe4]
cmp eax, ebx
fnclex
jge 0x424c2f
mov ecx, dword [esi + 0x10]
push 0xe4
push 0x405da0
push ecx
push eax
call edi
mov eax, dword [esi + 0x10]
push 0x40400000
push eax
mov edx, dword [eax]
call dword [edx + 0xec]
cmp eax, ebx
fnclex
jge 0x424c57
mov ecx, dword [esi + 0x10]
push 0xec
push 0x405da0
push ecx
push eax
call edi
mov edx, dword [esi + 0x10]
push 0x4061d0
push edx
push 0x4061f0
call dword [sym.imp.MSVBVM60.DLL___vbaPrintObj]
mov eax, dword [esi + 0x10]
add esp, 0xc
mov ecx, dword [eax]
push 0x80f080
push eax
call dword [ecx + 0x6c]
cmp eax, ebx
fnclex
jge 0x424c90
mov edx, dword [esi + 0x10]
push 0x6c
push 0x405da0
push edx
push eax
call edi
mov eax, dword [esi + 0x10]
lea edx, [ebp - 0x1c]
push edx
push eax
mov ecx, dword [eax]
call dword [ecx + 0x100]
cmp eax, ebx
fnclex
jge 0x424cb7
mov ecx, dword [esi + 0x10]
push 0x100
push 0x405da0
push ecx
push eax
call edi
mov eax, dword [esi + 0x10]
lea ecx, [ebp - 0x20]
push ecx
push eax
mov edx, dword [eax]
call dword [edx + 0x108]
cmp eax, ebx
fnclex
jge 0x424cde
mov edx, dword [esi + 0x10]
push 0x108
push 0x405da0
push edx
push eax
call edi
fld dword [ebp - 0x20]
fsub dword [0x4016b8]
mov ecx, dword [esi + 0x10]
push 0x505050
push ecx
fnstsw ax
test al, 0xd
jne 0x424d52
fstp dword [esp]
fld dword [ebp - 0x1c]
fsub dword [0x4016b8]
mov edx, dword [ecx]
push ecx
fnstsw ax
test al, 0xd
jne 0x424d52
fstp dword [esp]
push ebx
push ebx
push 0x16
push ecx
call dword [edx + 0x360]
cmp eax, ebx
fnclex
jge 0x424d30
mov ecx, dword [esi + 0x10]
push 0x360
push 0x405da0
push ecx
push eax
call edi
mov dword [ebp - 4], ebx
mov eax, dword [ebp + 8]
push eax
mov edx, dword [eax]
call dword [edx + 8]
mov eax, dword [ebp - 4]
mov ecx, dword [ebp - 0x14]
pop edi
pop esi
mov dword fs:[0], ecx
pop ebx
mov esp, ebp
pop ebp
ret 4
jmp 0x40234c