Function at 0x40c162
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x404946
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x144
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401600
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
mov edx, dword [ebp + 0xc]
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaStrCopy
push 2
push 0x406068
lea eax, [ebp - 0x3c]
push eax
call sub.MSVBVM60.DLL___vbaAryConstruct2
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 3
push 0x75
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 4
lea eax, [ebp - 0x54]
mov dword [ebp - 0xbc], eax
mov dword [ebp - 0xc4], 0x4008
push 0
push 0x80
lea eax, [ebp - 0xc4]
push eax
lea eax, [ebp - 0x80]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0xb4]
push eax
call sub.MSVBVM60.DLL___vbaVar2Vec
lea eax, [ebp - 0xb4]
push eax
lea eax, [ebp - 0x48]
push eax
call sub.MSVBVM60.DLL___vbaAryMove
lea ecx, [ebp - 0x80]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 5
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 6
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 7
mov dword [ebp - 0x108], 0xff
mov dword [ebp - 0x104], 1
and dword [ebp - 0x60], 0
jmp 0x40c31c
mov eax, dword [ebp - 0x60]
add eax, dword [ebp - 0x104]
mov dword [ebp - 0x60], eax
mov eax, dword [ebp - 0x60]
cmp eax, dword [ebp - 0x108]
jg 0x40c4f2
mov dword [ebp - 4], 8
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 9
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0xa
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0xb
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0xc
mov eax, dword [ebp - 0x60]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40c490
and dword [ebp - 0x130], 0
jmp 0x40c49b
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x130], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
mov dx, word [ebp - 0x60]
mov word [ecx + eax*2], dx
mov dword [ebp - 4], 0xd
mov dword [ebp - 0x78], 0xb7
mov dword [ebp - 0x80], 2
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL_rtcUpperCaseVar
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0xe
jmp 0x40c310
mov dword [ebp - 4], 0xf
push 0
push 0xffffffffffffffff
push 1
push 0x3f
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x6c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x4d
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x49
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x6c]
push eax
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
mov dword [ebp - 4], 0x10
and dword [ebp - 0x60], 0
mov dword [ebp - 4], 0x11
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x12
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x13
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x14
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x15
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x16
and dword [ebp - 0x5c], 0
mov dword [ebp - 4], 0x17
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x18
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x19
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x1a
and dword [ebp - 0x24], 0
mov dword [ebp - 4], 0x1b
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x1c
mov dword [ebp - 0x110], 0xff
mov dword [ebp - 0x10c], 1
and dword [ebp - 0x60], 0
jmp 0x40c87c
mov eax, dword [ebp - 0x60]
add eax, dword [ebp - 0x10c]
mov dword [ebp - 0x60], eax
mov eax, dword [ebp - 0x60]
cmp eax, dword [ebp - 0x110]
jg 0x40cc23
mov dword [ebp - 4], 0x1d
push 0x39f
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x1e
push 0
push 0xffffffffffffffff
push 1
push 0x51
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x6c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0xe9
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x5a
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x70]
push eax
lea eax, [ebp - 0x6c]
push eax
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
mov dword [ebp - 4], 0x1f
mov eax, dword [ebp - 0x60]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40c948
and dword [ebp - 0x134], 0
jmp 0x40c953
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x134], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
movsx eax, word [ecx + eax*2]
mov esi, dword [ebp - 0x5c]
add esi, eax
push dword [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaLenBstr
mov ecx, eax
mov eax, dword [ebp - 0x60]
cdq
idiv ecx
push edx
push dword [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaDerefAry1
movzx eax, byte [eax]
add eax, esi
cdq
mov ecx, 0x100
idiv ecx
mov dword [ebp - 0x5c], edx
mov dword [ebp - 4], 0x20
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x21
mov eax, dword [ebp - 0x60]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40ca03
and dword [ebp - 0x138], 0
jmp 0x40ca0e
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x138], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
mov al, byte [ecx + eax*2]
mov byte [ebp - 0x44], al
mov dword [ebp - 4], 0x22
mov dword [ebp - 0x78], 0x53
mov dword [ebp - 0x80], 2
push 0
push 2
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x23
mov eax, dword [ebp - 0x5c]
mov dword [ebp - 0xfc], eax
cmp dword [ebp - 0xfc], 0x100
jae 0x40ca80
and dword [ebp - 0x13c], 0
jmp 0x40ca8b
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x13c], eax
mov eax, dword [ebp - 0x60]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40caa9
and dword [ebp - 0x140], 0
jmp 0x40cab4
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x140], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
mov edx, dword [ebp - 0xfc]
mov esi, dword [ebp - 0x30]
mov dx, word [esi + edx*2]
mov word [ecx + eax*2], dx
mov dword [ebp - 4], 0x24
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x25
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x26
mov eax, dword [ebp - 0x5c]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40cb93
and dword [ebp - 0x144], 0
jmp 0x40cb9e
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x144], eax
movzx ax, byte [ebp - 0x44]
mov ecx, dword [ebp - 0xf8]
mov edx, dword [ebp - 0x30]
mov word [edx + ecx*2], ax
mov dword [ebp - 4], 0x27
push 0x87
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x28
push 0x1b
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x29
fld qword [0x401780]
call sub.MSVBVM60.DLL__CIsin
fstp qword [ebp - 0xf4]
mov dword [ebp - 4], 0x2a
jmp 0x40c870
mov dword [ebp - 4], 0x2b
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x2c
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x2d
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x2e
and dword [ebp - 0x60], 0
mov dword [ebp - 4], 0x2f
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x30
and dword [ebp - 0x5c], 0
mov dword [ebp - 4], 0x31
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x32
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x33
and dword [ebp - 0x24], 0
mov dword [ebp - 4], 0x34
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcFileLen
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x35
mov eax, dword [ebp + 8]
mov dword [ebp - 0xbc], eax
mov dword [ebp - 0xc4], 0x6011
push 0
push 0x40
lea eax, [ebp - 0xc4]
push eax
lea eax, [ebp - 0x80]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0x80]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0x80]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x36
and dword [ebp - 0x78], 0
mov dword [ebp - 0x80], 2
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL_rtcCurrentDir
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x37
push 0x13fe
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x38
push dword [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaLenBstr
mov dword [ebp - 0x118], eax
mov dword [ebp - 0x114], 1
and dword [ebp - 0x60], 0
jmp 0x40cf24
mov eax, dword [ebp - 0x60]
add eax, dword [ebp - 0x114]
mov dword [ebp - 0x60], eax
mov eax, dword [ebp - 0x60]
cmp eax, dword [ebp - 0x118]
jg 0x40d4cc
mov dword [ebp - 4], 0x39
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x3a
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x3b
mov eax, dword [ebp - 0x5c]
inc eax
cdq
mov ecx, 0x100
idiv ecx
mov dword [ebp - 0x5c], edx
mov dword [ebp - 4], 0x3c
fld qword [0x401778]
call sub.MSVBVM60.DLL__CIsin
fstp qword [ebp - 0xf4]
mov dword [ebp - 4], 0x3d
mov eax, dword [ebp - 0x24]
mov dword [ebp - 0x50], eax
mov dword [ebp - 4], 0x3e
mov eax, dword [ebp - 0x5c]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40d033
and dword [ebp - 0x148], 0
jmp 0x40d03e
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x148], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
movsx eax, word [ecx + eax*2]
mov ecx, dword [ebp - 0x50]
add eax, ecx
cdq
mov ecx, 0x100
idiv ecx
mov dword [ebp - 0x24], edx
mov dword [ebp - 4], 0x3f
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x40
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x41
mov eax, dword [ebp - 0x5c]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40d120
and dword [ebp - 0x14c], 0
jmp 0x40d12b
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x14c], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
mov al, byte [ecx + eax*2]
mov byte [ebp - 0x44], al
mov dword [ebp - 4], 0x42
mov dword [ebp - 0x78], 0x13
mov dword [ebp - 0x80], 2
push 2
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL_rtcLeftCharVar
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x43
mov dword [ebp - 0x98], 0x22
mov dword [ebp - 0xa0], 2
mov dword [ebp - 0x88], 0xb3
mov dword [ebp - 0x90], 2
mov dword [ebp - 0x78], 8
mov dword [ebp - 0x80], 2
push 0
lea eax, [ebp - 0xa0]
push eax
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcInStrChar
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xa0]
push eax
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x14
mov dword [ebp - 4], 0x44
fld qword [0x401770]
call sub.MSVBVM60.DLL__CIsqrt
fstp qword [ebp - 0xf4]
mov dword [ebp - 4], 0x45
push 0x130d
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x46
mov eax, dword [ebp - 0x24]
mov dword [ebp - 0xfc], eax
cmp dword [ebp - 0xfc], 0x100
jae 0x40d25c
and dword [ebp - 0x150], 0
jmp 0x40d267
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x150], eax
mov eax, dword [ebp - 0x5c]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40d285
and dword [ebp - 0x154], 0
jmp 0x40d290
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x154], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
mov edx, dword [ebp - 0xfc]
mov esi, dword [ebp - 0x30]
mov dx, word [esi + edx*2]
mov word [ecx + eax*2], dx
mov dword [ebp - 4], 0x47
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
mov dword [ebp - 4], 0x48
mov eax, dword [ebp - 0x24]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40d31f
and dword [ebp - 0x158], 0
jmp 0x40d32a
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x158], eax
movzx ax, byte [ebp - 0x44]
mov ecx, dword [ebp - 0xf8]
mov edx, dword [ebp - 0x30]
mov word [edx + ecx*2], ax
mov dword [ebp - 4], 0x49
and dword [ebp - 0x78], 0
mov dword [ebp - 0x80], 2
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL_rtcCurrentDir
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x4a
mov dword [ebp - 0x78], 0x54
mov dword [ebp - 0x80], 2
push 0
push 3
lea eax, [ebp - 0x80]
push eax
lea eax, [ebp - 0x90]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0x90]
push eax
lea eax, [ebp - 0x80]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x4b
mov dword [ebp - 0x58], 0x100
mov dword [ebp - 4], 0x4c
mov eax, dword [ebp - 0x5c]
mov dword [ebp - 0xf8], eax
cmp dword [ebp - 0xf8], 0x100
jae 0x40d3e4
and dword [ebp - 0x15c], 0
jmp 0x40d3ef
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x15c], eax
mov eax, dword [ebp - 0x24]
mov dword [ebp - 0xfc], eax
cmp dword [ebp - 0xfc], 0x100
jae 0x40d40d
and dword [ebp - 0x160], 0
jmp 0x40d418
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x160], eax
mov eax, dword [ebp - 0xf8]
mov ecx, dword [ebp - 0x30]
mov edx, dword [ebp - 0xfc]
mov esi, dword [ebp - 0x30]
mov ax, word [ecx + eax*2]
add ax, word [esi + edx*2]
movsx eax, ax
cdq
idiv dword [ebp - 0x58]
mov dword [ebp - 0x100], edx
cmp dword [ebp - 0x100], 0x100
jae 0x40d454
and dword [ebp - 0x164], 0
jmp 0x40d45f
call sub.MSVBVM60.DLL___vbaGenerateBoundsError
mov dword [ebp - 0x164], eax
push dword [ebp - 0x60]
mov eax, dword [ebp + 8]
push dword [eax]
call sub.MSVBVM60.DLL___vbaDerefAry1
movzx bx, byte [eax]
mov eax, dword [ebp - 0x100]
mov ecx, dword [ebp - 0x30]
xor bx, word [ecx + eax*2]
push dword [ebp - 0x60]
mov eax, dword [ebp + 8]
push dword [eax]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov byte [eax], bl
mov dword [ebp - 4], 0x4d
fld qword [0x401768]
call sub.MSVBVM60.DLL__CIatan
fstp qword [ebp - 0xf4]
mov dword [ebp - 4], 0x4e
mov word [ebp - 0xe8], 0x2366
lea eax, [ebp - 0xe8]
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 4], 0x4f
jmp 0x40cf18
mov dword [ebp - 4], 0x50
and word [ebp - 0xe8], 0
push 0
lea eax, [ebp - 0xe8]
push eax
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
lea eax, [ebp - 0x68]
push eax
call sub.MSVBVM60.DLL___vbaStrToAnsi
push eax
call fcn.00405ff4
call sub.MSVBVM60.DLL___vbaSetSystemError
lea eax, [ebp - 0x68]
push eax
lea eax, [ebp - 0x64]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
wait
push 0x40d5a3
jmp 0x40d570
lea eax, [ebp - 0x3c]
mov dword [ebp - 0xec], eax
lea eax, [ebp - 0xec]
push eax
push 0
call sub.MSVBVM60.DLL___vbaAryDestruct
lea eax, [ebp - 0x48]
push eax
push 0
call sub.MSVBVM60.DLL___vbaAryDestruct
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeStr
ret