Function at 0x4128f0
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x403cc6
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x12c
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x4028c8
mov dword [ebp - 0x10], 0
mov dword [ebp - 0xc], 0
mov dword [ebp - 4], 1
mov dword [ebp - 4], 2
push 0xffffffffffffffff
call sub.MSVBVM60.DLL___vbaOnError
mov dword [ebp - 4], 3
mov dword [ebp - 0x4c], 0x6b
mov dword [ebp - 0x54], 2
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x54]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 4
cmp dword [0x421638], 0
jne 0x4129a2
push 0x421638
push 0x404a90
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x108], 0x421638
jmp 0x4129ac
mov dword [ebp - 0x108], 0x421638
mov eax, dword [ebp - 0x108]
mov eax, dword [eax]
mov dword [ebp - 0xd8], eax
lea eax, [ebp - 0x44]
push eax
mov eax, dword [ebp - 0xd8]
mov eax, dword [eax]
push dword [ebp - 0xd8]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xdc], eax
cmp dword [ebp - 0xdc], 0
jge 0x412a00
push 0x14
push 0x404a80
push dword [ebp - 0xd8]
push dword [ebp - 0xdc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x10c], eax
jmp 0x412a07
and dword [ebp - 0x10c], 0
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xe0], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0xe0]
mov eax, dword [eax]
push dword [ebp - 0xe0]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xe4], eax
cmp dword [ebp - 0xe4], 0
jge 0x412a56
push 0x50
push 0x404aa0
push dword [ebp - 0xe0]
push dword [ebp - 0xe4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x110], eax
jmp 0x412a5d
and dword [ebp - 0x110], 0
push dword [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaLenBstr
sub eax, 3
neg eax
sbb eax, eax
inc eax
neg eax
mov word [ebp - 0xe8], ax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeObj
movsx eax, word [ebp - 0xe8]
test eax, eax
je 0x4134c7
mov dword [ebp - 4], 5
and word [ebp - 0x28], 0
mov dword [ebp - 4], 6
push dword [0x421084]
push 1
call sub.MSVBVM60.DLL___vbaUbound
mov dword [ebp - 0xf0], eax
mov dword [ebp - 0xec], 1
and dword [ebp - 0x30], 0
jmp 0x412add
mov eax, dword [ebp - 0x30]
add eax, dword [ebp - 0xec]
jo 0x41382d
mov dword [ebp - 0x30], eax
mov eax, dword [ebp - 0x30]
cmp eax, dword [ebp - 0xf0]
jg 0x412f04
mov dword [ebp - 4], 7
cmp dword [0x421638], 0
jne 0x412b17
push 0x421638
push 0x404a90
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x114], 0x421638
jmp 0x412b21
mov dword [ebp - 0x114], 0x421638
mov eax, dword [ebp - 0x114]
mov eax, dword [eax]
mov dword [ebp - 0xd8], eax
lea eax, [ebp - 0x44]
push eax
mov eax, dword [ebp - 0xd8]
mov eax, dword [eax]
push dword [ebp - 0xd8]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xdc], eax
cmp dword [ebp - 0xdc], 0
jge 0x412b75
push 0x14
push 0x404a80
push dword [ebp - 0xd8]
push dword [ebp - 0xdc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x118], eax
jmp 0x412b7c
and dword [ebp - 0x118], 0
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xe0], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0xe0]
mov eax, dword [eax]
push dword [ebp - 0xe0]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xe4], eax
cmp dword [ebp - 0xe4], 0
jge 0x412bcb
push 0x50
push 0x404aa0
push dword [ebp - 0xe0]
push dword [ebp - 0xe4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x11c], eax
jmp 0x412bd2
and dword [ebp - 0x11c], 0
push dword [ebp - 0x34]
push dword [0x4210ec]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x404bc4
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x30]
push dword [0x421084]
call sub.MSVBVM60.DLL___vbaDerefAry1
push dword [eax]
call sub.MSVBVM60.DLL___vbaStrCat
mov dword [ebp - 0x4c], eax
mov dword [ebp - 0x54], 8
lea eax, [ebp - 0x54]
push eax
call fcn.00410d95
mov word [ebp - 0xe8], ax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
lea eax, [ebp - 0x34]
push eax
push 3
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x10
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeObj
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0xe8]
test eax, eax
je 0x412ef8
mov dword [ebp - 4], 8
or word [ebp - 0x28], 0xffff
mov dword [ebp - 4], 9
push 0
push 5
push 1
push 0
lea eax, [ebp - 0x68]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
and dword [ebp - 0x70], 0
mov dword [ebp - 0x78], 2
lea esi, [ebp - 0x78]
push 0
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x80], 0
mov dword [ebp - 0x88], 2
lea esi, [ebp - 0x88]
push 1
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
cmp dword [0x421638], 0
jne 0x412cfe
push 0x421638
push 0x404a90
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x120], 0x421638
jmp 0x412d08
mov dword [ebp - 0x120], 0x421638
mov eax, dword [ebp - 0x120]
mov eax, dword [eax]
mov dword [ebp - 0xd8], eax
lea eax, [ebp - 0x44]
push eax
mov eax, dword [ebp - 0xd8]
mov eax, dword [eax]
push dword [ebp - 0xd8]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xdc], eax
cmp dword [ebp - 0xdc], 0
jge 0x412d5c
push 0x14
push 0x404a80
push dword [ebp - 0xd8]
push dword [ebp - 0xdc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x124], eax
jmp 0x412d63
and dword [ebp - 0x124], 0
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xe0], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0xe0]
mov eax, dword [eax]
push dword [ebp - 0xe0]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xe4], eax
cmp dword [ebp - 0xe4], 0
jge 0x412db2
push 0x50
push 0x404aa0
push dword [ebp - 0xe0]
push dword [ebp - 0xe4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x128], eax
jmp 0x412db9
and dword [ebp - 0x128], 0
push dword [ebp - 0x34]
push dword [0x4210ec]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x404bc4
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push dword [ebp - 0x30]
push dword [0x421084]
call sub.MSVBVM60.DLL___vbaDerefAry1
push dword [eax]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0x90], eax
mov dword [ebp - 0x98], 3
lea esi, [ebp - 0x98]
push 2
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xa0], 0
mov dword [ebp - 0xa8], 2
lea esi, [ebp - 0xa8]
push 3
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xb0], 0
mov dword [ebp - 0xb8], 2
lea esi, [ebp - 0xb8]
push 4
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov dword [ebp - 0xc0], 1
mov dword [ebp - 0xc8], 2
lea esi, [ebp - 0xc8]
push 5
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x68]
push eax
push dword [0x4211ac]
push dword [0x4211e0]
call fcn.0040b348
lea eax, [ebp - 0x68]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x3c]
push eax
lea eax, [ebp - 0x38]
push eax
lea eax, [ebp - 0x34]
push eax
push 4
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0x14
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0xb
jmp 0x412acb
mov dword [ebp - 4], 0xc
movsx eax, word [ebp - 0x28]
test eax, eax
jne 0x4134c7
mov dword [ebp - 4], 0xd
cmp dword [0x421638], 0
jne 0x412f42
push 0x421638
push 0x404a90
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x12c], 0x421638
jmp 0x412f4c
mov dword [ebp - 0x12c], 0x421638
mov eax, dword [ebp - 0x12c]
mov eax, dword [eax]
mov dword [ebp - 0xd8], eax
lea eax, [ebp - 0x44]
push eax
mov eax, dword [ebp - 0xd8]
mov eax, dword [eax]
push dword [ebp - 0xd8]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xdc], eax
cmp dword [ebp - 0xdc], 0
jge 0x412fa0
push 0x14
push 0x404a80
push dword [ebp - 0xd8]
push dword [ebp - 0xdc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x130], eax
jmp 0x412fa7
and dword [ebp - 0x130], 0
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xe0], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0xe0]
mov eax, dword [eax]
push dword [ebp - 0xe0]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xe4], eax
cmp dword [ebp - 0xe4], 0
jge 0x412ff6
push 0x50
push 0x404aa0
push dword [ebp - 0xe0]
push dword [ebp - 0xe4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x134], eax
jmp 0x412ffd
and dword [ebp - 0x134], 0
push dword [ebp - 0x34]
push dword [0x4210ec]
call sub.MSVBVM60.DLL___vbaStrCat
mov dword [ebp - 0x4c], eax
mov dword [ebp - 0x54], 8
lea eax, [ebp - 0x54]
push eax
call fcn.00410d95
mov word [ebp - 0xe8], ax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeObj
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeVar
movsx eax, word [ebp - 0xe8]
test eax, eax
je 0x41329c
mov dword [ebp - 4], 0xe
push 0
push 5
push 1
push 0
lea eax, [ebp - 0x68]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
and dword [ebp - 0x70], 0
mov dword [ebp - 0x78], 2
lea esi, [ebp - 0x78]
push 0
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x80], 0
mov dword [ebp - 0x88], 2
lea esi, [ebp - 0x88]
push 1
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
cmp dword [0x421638], 0
jne 0x4130da
push 0x421638
push 0x404a90
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x138], 0x421638
jmp 0x4130e4
mov dword [ebp - 0x138], 0x421638
mov eax, dword [ebp - 0x138]
mov eax, dword [eax]
mov dword [ebp - 0xd8], eax
lea eax, [ebp - 0x44]
push eax
mov eax, dword [ebp - 0xd8]
mov eax, dword [eax]
push dword [ebp - 0xd8]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xdc], eax
cmp dword [ebp - 0xdc], 0
jge 0x413138
push 0x14
push 0x404a80
push dword [ebp - 0xd8]
push dword [ebp - 0xdc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x13c], eax
jmp 0x41313f
and dword [ebp - 0x13c], 0
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xe0], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0xe0]
mov eax, dword [eax]
push dword [ebp - 0xe0]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xe4], eax
cmp dword [ebp - 0xe4], 0
jge 0x41318e
push 0x50
push 0x404aa0
push dword [ebp - 0xe0]
push dword [ebp - 0xe4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x140], eax
jmp 0x413195
and dword [ebp - 0x140], 0
push dword [ebp - 0x34]
push dword [0x4210ec]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0x90], eax
mov dword [ebp - 0x98], 3
lea esi, [ebp - 0x98]
push 2
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xa0], 0
mov dword [ebp - 0xa8], 2
lea esi, [ebp - 0xa8]
push 3
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xb0], 0
mov dword [ebp - 0xb8], 2
lea esi, [ebp - 0xb8]
push 4
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov dword [ebp - 0xc0], 1
mov dword [ebp - 0xc8], 2
lea esi, [ebp - 0xc8]
push 5
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x68]
push eax
push dword [0x4211ac]
push dword [0x4211e0]
call fcn.0040b348
lea eax, [ebp - 0x68]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
lea eax, [ebp - 0x38]
push eax
lea eax, [ebp - 0x34]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeStrList
add esp, 0xc
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeObj
jmp 0x4134c7
mov dword [ebp - 4], 0x10
push 0
push 5
push 1
push 0
lea eax, [ebp - 0x68]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
and dword [ebp - 0x70], 0
mov dword [ebp - 0x78], 2
lea esi, [ebp - 0x78]
push 0
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0x80], 0
mov dword [ebp - 0x88], 2
lea esi, [ebp - 0x88]
push 1
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
cmp dword [0x421638], 0
jne 0x41332a
push 0x421638
push 0x404a90
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x144], 0x421638
jmp 0x413334
mov dword [ebp - 0x144], 0x421638
mov eax, dword [ebp - 0x144]
mov eax, dword [eax]
mov dword [ebp - 0xd8], eax
lea eax, [ebp - 0x44]
push eax
mov eax, dword [ebp - 0xd8]
mov eax, dword [eax]
push dword [ebp - 0xd8]
call dword [eax + 0x14]
fnclex
mov dword [ebp - 0xdc], eax
cmp dword [ebp - 0xdc], 0
jge 0x413388
push 0x14
push 0x404a80
push dword [ebp - 0xd8]
push dword [ebp - 0xdc]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x148], eax
jmp 0x41338f
and dword [ebp - 0x148], 0
mov eax, dword [ebp - 0x44]
mov dword [ebp - 0xe0], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0xe0]
mov eax, dword [eax]
push dword [ebp - 0xe0]
call dword [eax + 0x50]
fnclex
mov dword [ebp - 0xe4], eax
cmp dword [ebp - 0xe4], 0
jge 0x4133de
push 0x50
push 0x404aa0
push dword [ebp - 0xe0]
push dword [ebp - 0xe4]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x14c], eax
jmp 0x4133e5
and dword [ebp - 0x14c], 0
push dword [ebp - 0x34]
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0x90], eax
mov dword [ebp - 0x98], 3
lea esi, [ebp - 0x98]
push 2
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xa0], 0
mov dword [ebp - 0xa8], 2
lea esi, [ebp - 0xa8]
push 3
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xb0], 0
mov dword [ebp - 0xb8], 2
lea esi, [ebp - 0xb8]
push 4
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov dword [ebp - 0xc0], 1
mov dword [ebp - 0xc8], 2
lea esi, [ebp - 0xc8]
push 5
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x68]
push eax
push dword [0x4211ac]
push dword [0x4211e0]
call fcn.0040b348
lea eax, [ebp - 0x68]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeObj
mov dword [ebp - 4], 0x14
mov word [ebp - 0xcc], 0x285
lea eax, [ebp - 0xcc]
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 4], 0x15
push pe_nt_image_headers32
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x16
push 0
push 0
push 1
push 0
lea eax, [ebp - 0x68]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov dword [ebp - 0x70], 0x7d0
mov dword [ebp - 0x78], 2
lea esi, [ebp - 0x78]
push 0
push dword [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0x68]
push eax
push dword [0x4211b4]
push dword [0x4211e4]
call fcn.0040b348
lea eax, [ebp - 0x68]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x17
mov word [ebp - 0xcc], 8
lea eax, [ebp - 0xcc]
push eax
call fcn.00406669
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x18
fld qword [0x4029b0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0xd4]
mov dword [ebp - 4], 0x19
fld qword [0x4029a8]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0xd4]
mov dword [ebp - 4], 0x1a
fld qword [0x4029a0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcExp
fstp qword [ebp - 0xd4]
mov dword [ebp - 4], 0x1b
push dword [ebp - 0x2c]
call fcn.0040a230
mov dword [ebp - 4], 0x1c
lea eax, [ebp - 0x2c]
push eax
call fcn.0040a46c
mov dword [ebp - 0x24], eax
mov dword [ebp - 4], 0x1d
push 0x215e
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x1e
lea eax, [ebp - 0x24]
push eax
call fcn.0040bf88
mov dword [ebp - 4], 0x1f
call fcn.0040e4a1
mov dword [ebp - 4], 0x20
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x34]
push eax
push 0x1f40
push dword [0x4212ac]
call fcn.004170a0
mov dword [0x421070], eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x21
fld qword [0x402998]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0xd4]
mov dword [ebp - 4], 0x22
cmp dword [0x421070], 0xffffffff
je 0x4136ca
cmp dword [0x421070], 0
jne 0x413708
mov dword [ebp - 4], 0x23
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x34]
push eax
push 0x1f40
push dword [0x4212b0]
call fcn.004170a0
mov dword [0x421070], eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x25
cmp dword [0x421070], 0xffffffff
je 0x413721
cmp dword [0x421070], 0
jne 0x41375f
mov dword [ebp - 4], 0x26
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrMove
push 0
push dword [ebp - 0x24]
lea eax, [ebp - 0x34]
push eax
push 0x1f40
push dword [0x4212b4]
call fcn.004170a0
mov dword [0x421070], eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x28
fld qword [0x402608]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0xd4]
mov dword [ebp - 4], 0x29
mov dword [ebp - 0x4c], 0x7c
mov dword [ebp - 0x54], 2
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL_rtcUpperCaseVar
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x54]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x2a
fld qword [0x401788]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0xd4]
wait
push 0x41381e
jmp 0x413815
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaFreeStr
ret
call sub.MSVBVM60.DLL___vbaErrorOverflow