Function at 0x410d00
Capabilities:
Persist via run registry key

Disassembly:
push ebp
mov ebp, esp
sub esp, 0xc
push 0x401836
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
sub esp, 0x68
push ebx
push esi
push edi
mov dword [ebp - 0xc], esp
mov dword [ebp - 8], 0x401600
xor eax, eax
mov dword [ebp - 0x38], 0x80020004
mov dword [ebp - 0x18], eax
mov dword [ebp - 0x1c], eax
mov dword [ebp - 0x20], eax
mov dword [ebp - 0x24], eax
mov dword [ebp - 0x28], eax
mov dword [ebp - 0x50], eax
mov dword [ebp - 0x60], eax
lea eax, [ebp - 0x40]
push eax
mov dword [ebp - 0x40], 0xa
call dword [sym.imp.MSVBVM60.DLL_rtcFreeFile]
lea ecx, [ebp - 0x40]
movsx ebx, ax
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov ecx, dword [ebp + 8]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
mov edx, dword [ecx]
mov ecx, ebx
push edx
call esi
push eax
push 0xffffffffffffffff
push 0x120
call dword [sym.imp.MSVBVM60.DLL___vbaFileOpen]
mov ecx, ebx
call esi
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcFileLength]
push eax
lea eax, [ebp - 0x40]
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcSpaceVar]
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaStrVarMove]
lea ecx, [ebp - 0x40]
push ecx
call esi
mov edi, dword [sym.imp.MSVBVM60.DLL___vbaStrMove]
mov edx, eax
lea ecx, [ebp - 0x28]
call edi
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov ecx, ebx
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
lea edx, [ebp - 0x28]
push eax
push edx
push 0
call dword [sym.imp.MSVBVM60.DLL___vbaGet3]
mov ecx, ebx
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
push eax
call dword [sym.imp.MSVBVM60.DLL___vbaFileClose]
mov eax, dword [ebp - 0x28]
mov ebx, dword [sym.imp.MSVBVM60.DLL___vbaInStr]
push 1
push eax
push 0x4043f0
push 0
call ebx
mov ecx, eax
add ecx, 8
jo 0x4110ea
call dword [sym.imp.MSVBVM60.DLL___vbaI2I4]
mov ecx, dword [ebp - 0x28]
movsx eax, ax
push eax
push ecx
push 0x404408
push 0
mov dword [ebp - 0x7c], eax
call ebx
mov edx, eax
mov eax, dword [ebp - 0x7c]
sub edx, eax
lea ecx, [ebp - 0x28]
jo 0x4110ea
mov dword [ebp - 0x38], edx
lea edx, [ebp - 0x40]
push edx
push eax
mov dword [ebp - 0x58], ecx
lea eax, [ebp - 0x60]
lea ecx, [ebp - 0x50]
push eax
push ecx
mov dword [ebp - 0x40], 3
mov dword [ebp - 0x60], 0x4008
call dword [sym.imp.MSVBVM60.DLL_rtcMidCharVar]
lea edx, [ebp - 0x50]
push edx
call esi
mov edx, eax
lea ecx, [ebp - 0x18]
call edi
lea eax, [ebp - 0x50]
lea ecx, [ebp - 0x40]
push eax
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
mov ecx, dword [ebp - 0x1c]
add esp, 0xc
lea eax, [ebp - 0x40]
lea edx, [ebp - 0x28]
push eax
push ecx
mov dword [ebp - 0x38], 0x80020004
mov dword [ebp - 0x40], 0xa
mov dword [ebp - 0x58], edx
mov dword [ebp - 0x60], 0x4008
call dword [sym.imp.MSVBVM60.DLL___vbaLenBstr]
mov ecx, dword [ebp - 0x7c]
mov edx, dword [ebp - 0x28]
add eax, ecx
jo 0x4110ea
push eax
push edx
push 0x404410
push 0
call ebx
add eax, 0x6c
lea ecx, [ebp - 0x50]
jo 0x4110ea
push eax
lea eax, [ebp - 0x60]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcMidCharVar]
lea edx, [ebp - 0x50]
push edx
call esi
mov edx, eax
lea ecx, [ebp - 0x20]
call edi
lea eax, [ebp - 0x50]
lea ecx, [ebp - 0x40]
push eax
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
mov eax, dword [ebp - 0x20]
add esp, 0xc
lea edx, [ebp - 0x20]
mov dword [ebp - 0x60], 0x4008
push 1
push eax
push 0x404408
push 0
mov dword [ebp - 0x58], edx
call ebx
sub eax, 1
lea ecx, [ebp - 0x60]
jo 0x4110ea
push eax
lea edx, [ebp - 0x40]
push ecx
push edx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharVar]
lea eax, [ebp - 0x40]
push eax
call esi
mov ecx, dword [ebp + 0xc]
mov edx, eax
call edi
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov edx, dword [ebp - 0x20]
push 1
push edx
lea ecx, [ebp - 0x20]
push 0x404408
push 0
mov dword [ebp - 0x58], ecx
mov dword [ebp - 0x60], 0x4008
call ebx
sub eax, 1
lea ecx, [ebp - 0x40]
jo 0x4110ea
push eax
lea eax, [ebp - 0x60]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharVar]
lea edx, [ebp - 0x40]
push edx
call esi
mov edx, eax
lea ecx, [ebp - 0x24]
call edi
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
mov edx, dword [ebp - 0x20]
lea ecx, [ebp - 0x40]
push ecx
push 1
push edx
lea eax, [ebp - 0x20]
push 0x404408
push 0
mov dword [ebp - 0x38], 0x80020004
mov dword [ebp - 0x40], 0xa
mov dword [ebp - 0x58], eax
mov dword [ebp - 0x60], 0x4008
call ebx
add eax, 1
lea ecx, [ebp - 0x50]
jo 0x4110ea
push eax
lea eax, [ebp - 0x60]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcMidCharVar]
lea edx, [ebp - 0x50]
push edx
call esi
mov edx, eax
lea ecx, [ebp - 0x20]
call edi
lea eax, [ebp - 0x50]
lea ecx, [ebp - 0x40]
push eax
push ecx
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
mov ecx, dword [ebp - 0x20]
add esp, 0xc
lea eax, [ebp - 0x40]
lea edx, [ebp - 0x20]
push eax
push 1
mov dword [ebp - 0x38], 0x80020004
mov dword [ebp - 0x40], 0xa
mov dword [ebp - 0x58], edx
mov dword [ebp - 0x60], 0x4008
push ecx
push 0x404408
push 0
call ebx
add eax, 1
lea edx, [ebp - 0x60]
jo 0x4110ea
push eax
lea eax, [ebp - 0x50]
push edx
push eax
call dword [sym.imp.MSVBVM60.DLL_rtcMidCharVar]
lea ecx, [ebp - 0x50]
push ecx
call esi
mov edx, eax
lea ecx, [ebp - 0x20]
call edi
lea edx, [ebp - 0x50]
lea eax, [ebp - 0x40]
push edx
push eax
push 2
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVarList]
mov edx, dword [ebp - 0x20]
add esp, 0xc
lea ecx, [ebp - 0x20]
mov dword [ebp - 0x60], 0x4008
push 1
push edx
push 0x404408
push 0
mov dword [ebp - 0x58], ecx
call ebx
sub eax, 1
lea ecx, [ebp - 0x40]
jo 0x4110ea
push eax
lea eax, [ebp - 0x60]
push eax
push ecx
call dword [sym.imp.MSVBVM60.DLL_rtcLeftCharVar]
lea edx, [ebp - 0x40]
push edx
call esi
mov ecx, dword [ebp + 0x10]
mov edx, eax
call edi
lea ecx, [ebp - 0x40]
call dword [sym.imp.MSVBVM60.DLL___vbaFreeVar]
push 0x4110d4
jmp 0x4110b9
mov esi, dword [sym.imp.MSVBVM60.DLL___vbaFreeStr]
lea ecx, [ebp - 0x1c]
call esi
lea ecx, [ebp - 0x20]
call esi
lea ecx, [ebp - 0x24]
call esi
lea ecx, [ebp - 0x28]
call esi
ret
call dword [sym.imp.MSVBVM60.DLL___vbaErrorOverflow]