Function at 0x40ac42
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x403b36
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x100
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401a78
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
movsx eax, word [0x421088]
test eax, eax
jne 0x40bc05
mov dword [ebp - 4], 4
push 0xc0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 5
mov dword [ebp - 0x64], 0xb
mov dword [ebp - 4], 6
fld qword [0x401c50]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcExp
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 7
mov dword [ebp - 0xa8], 0xea
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 8
mov eax, dword [ebp + 8]
push dword [eax]
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push 0xffffffffffffffff
push 0x120
call sub.MSVBVM60.DLL___vbaFileOpen
mov dword [ebp - 4], 9
mov dword [ebp - 0xa8], 2
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcUpperCaseVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0xa
push 0x33
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0xb
mov dword [ebp - 0xa8], 0x13
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcTrimVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0xc
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL_rtcFileLength
mov dword [ebp - 0xfc], eax
mov dword [ebp - 0xcc], 0x404a8c
mov dword [ebp - 0xd4], 8
lea edx, [ebp - 0xd4]
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaVarDup
lea eax, [ebp - 0xb0]
push eax
push dword [ebp - 0xfc]
call sub.MSVBVM60.DLL_rtcStringBstr
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0xd
push 0x6f
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0xe
mov dword [ebp - 0xa8], 0x22
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0xf
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
lea eax, [ebp - 0x60]
push eax
push 0
call sub.MSVBVM60.DLL___vbaGet3
mov dword [ebp - 4], 0x10
fld qword [0x401c48]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x11
mov dword [ebp - 0xa8], 0x13
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcTrimVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x12
push 0xbd
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x13
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x14
push 0x18
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x15
fld qword [0x401c40]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcTan
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x16
push dword [0x4210b0]
call sub.MSVBVM60.DLL___vbaLenBstr
mov ecx, eax
call sub.MSVBVM60.DLL___vbaI2I4
mov word [ebp - 0xf8], ax
lea eax, [ebp - 0xf8]
push eax
call fcn.0040fb56
mov edx, eax
lea ecx, [ebp - 0x78]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x17
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x78]
push dword [0x4210b0]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x18
mov dword [ebp - 0xa8], 0x8b
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x19
mov dword [ebp - 0xcc], 0x4210b0
mov dword [ebp - 0xd4], 0x4008
push 0
push 0x40
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x1a
lea eax, [ebp - 0x78]
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 0x4008
push 0
push 0x40
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x90]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x1b
push 0x1c
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x1c
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x90]
push dword [ebp - 0x44]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x1d
mov edx, 0x40443c
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0x1e
fld qword [0x401c38]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x1f
push dword [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaLenBstr
mov ecx, eax
call sub.MSVBVM60.DLL___vbaI2I4
mov word [ebp - 0xf8], ax
lea eax, [ebp - 0xf8]
push eax
call fcn.0040fb56
mov edx, eax
lea ecx, [ebp - 0x7c]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x20
fld qword [0x401c30]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x21
mov dword [ebp - 0xa8], 0xba
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcTrimVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x22
fld qword [0x401c28]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x23
mov dword [ebp - 0xcc], 0x40443c
mov dword [ebp - 0xd4], 8
lea edx, [ebp - 0xd4]
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaVarDup
push 0
push 0x40
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x24
push 0xcc
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x25
push 0x83
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcCharValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x26
mov dword [ebp - 0xa8], 0xb0
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x27
lea eax, [ebp - 0x7c]
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 0x4008
push 0
push 0x40
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x28
mov dword [ebp - 0xa8], 0x69
mov dword [ebp - 0xb0], 2
push 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcRightCharVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x29
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x7c]
push dword [ebp - 0x70]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x2a
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x4c]
push dword [ebp - 0x50]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x2b
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcCommandVar
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x2c
fld qword [0x401c20]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcExp
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x2d
push 0x40440c
call sub.MSVBVM60.DLL___vbaLenBstr
mov ecx, eax
call sub.MSVBVM60.DLL___vbaI2I4
mov word [ebp - 0xf8], ax
lea eax, [ebp - 0xf8]
push eax
call fcn.0040fb56
mov edx, eax
lea ecx, [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x2e
mov dword [ebp - 0xcc], 0x40440c
mov dword [ebp - 0xd4], 8
lea edx, [ebp - 0xd4]
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaVarDup
push 0
push 0x40
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x2f
push 0x93
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x30
lea eax, [ebp - 0x68]
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 0x4008
push 0
push 0x40
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x31
mov dword [ebp - 0xa8], 0x23
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcTrimVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x32
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x68]
push 0x40440c
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x33
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x34]
push dword [ebp - 0x38]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x34
push 0x404340
call sub.MSVBVM60.DLL___vbaLenBstr
mov ecx, eax
call sub.MSVBVM60.DLL___vbaI2I4
mov word [ebp - 0xf8], ax
lea eax, [ebp - 0xf8]
push eax
call fcn.0040fb56
mov edx, eax
lea ecx, [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x35
mov dword [ebp - 0xcc], 0x404340
mov dword [ebp - 0xd4], 8
lea edx, [ebp - 0xd4]
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaVarDup
push 0
push 0x40
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x36
lea eax, [ebp - 0x24]
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 0x4008
push 0
push 0x40
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x37
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x24]
push 0x404340
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x38
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x94]
push dword [ebp - 0x40]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x39
push 0x4042dc
call sub.MSVBVM60.DLL___vbaLenBstr
mov ecx, eax
call sub.MSVBVM60.DLL___vbaI2I4
mov word [ebp - 0xf8], ax
lea eax, [ebp - 0xf8]
push eax
call fcn.0040fb56
mov edx, eax
lea ecx, [ebp - 0x84]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x3a
mov dword [ebp - 0xcc], 0x4042dc
mov dword [ebp - 0xd4], 8
lea edx, [ebp - 0xd4]
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaVarDup
push 0
push 0x40
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x3b
lea eax, [ebp - 0x84]
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 0x4008
push 0
push 0x40
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcStrConvVar2
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x80]
call sub.MSVBVM60.DLL___vbaStrMove
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x3c
push 9
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x3d
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x84]
push 0x4042dc
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x3e
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x80]
push dword [ebp - 0x98]
push dword [ebp - 0x60]
call sub.MSVBVM60.DLL_rtcReplace
mov edx, eax
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x3f
push dword [ebp - 0x78]
push dword [0x421288]
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
push 0x42128c
call fcn.0040ed16
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x40
push 0x8c
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x41
mov dword [ebp - 0x64], 0xc
mov dword [ebp - 4], 0x42
mov eax, dword [ebp + 0xc]
push dword [eax]
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push 0xffffffffffffffff
push 0x220
call sub.MSVBVM60.DLL___vbaFileOpen
mov dword [ebp - 4], 0x43
push 0xa4
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcCharValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x44
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
lea eax, [ebp - 0x60]
push eax
push 0
call sub.MSVBVM60.DLL___vbaPut3
mov dword [ebp - 4], 0x45
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x46
fld qword [0x401c18]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcTan
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x47
mov dword [ebp - 0x64], 0xd
mov dword [ebp - 4], 0x48
fld qword [0x401c10]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x49
push 0x2a
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x4a
mov eax, dword [ebp + 0xc]
push dword [eax]
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
push 0xffffffffffffffff
push 0x220
call sub.MSVBVM60.DLL___vbaFileOpen
mov dword [ebp - 4], 0x4b
mov dword [ebp - 0x10c], 0x65a
mov dword [ebp - 0x108], 1
and dword [ebp - 0x9c], 0
jmp 0x40bb08
mov eax, dword [ebp - 0x9c]
add eax, dword [ebp - 0x108]
jo 0x40bfc3
mov dword [ebp - 0x9c], eax
mov eax, dword [ebp - 0x9c]
cmp eax, dword [ebp - 0x10c]
jg 0x40bb89
mov dword [ebp - 4], 0x4c
push 0x24
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcAnsiValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x4d
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
mov eax, dword [0x421210]
add eax, dword [ebp - 0x9c]
jo 0x40bfc3
push eax
push dword [ebp - 0x9c]
push dword [0x42128c]
call sub.MSVBVM60.DLL___vbaDerefAry1
push eax
push 1
call sub.MSVBVM60.DLL___vbaPut4
mov dword [ebp - 4], 0x4e
jmp 0x40baf0
mov dword [ebp - 4], 0x4f
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x50
mov dword [ebp - 0xa8], 0xc0
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLowerCaseVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x51
mov word [ebp - 0xf8], 0x42f
lea eax, [ebp - 0xf8]
push eax
call sub.MSVBVM60.DLL_VarPtr
jmp 0x40bdf5
mov dword [ebp - 4], 0x53
push 0xda0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_VarPtr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x54
push 0xe4
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x55
push 0
push 2
push 1
push 0
lea eax, [ebp - 0xc4]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov eax, dword [ebp + 8]
push dword [eax]
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 3
lea esi, [ebp - 0xd4]
push 0
push dword [ebp - 0xc4]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
mov eax, dword [ebp + 0xc]
push dword [eax]
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0xdc], eax
mov dword [ebp - 0xe4], 3
lea esi, [ebp - 0xe4]
push 1
push dword [ebp - 0xc4]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xec], 0
mov dword [ebp - 0xf4], 0xb
lea esi, [ebp - 0xf4]
push 2
push dword [ebp - 0xc4]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0xc4]
push eax
push dword [0x421264]
push dword [0x4211e4]
call fcn.004146e2
lea eax, [ebp - 0xc4]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x56
push 0
push 1
push 1
push 0
lea eax, [ebp - 0xc4]
push eax
push 0x10
push 0x880
call sub.MSVBVM60.DLL___vbaRedim
add esp, 0x1c
mov eax, dword [ebp + 0xc]
push dword [eax]
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 0xcc], eax
mov dword [ebp - 0xd4], 3
lea esi, [ebp - 0xd4]
push 0
push dword [ebp - 0xc4]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
and dword [ebp - 0xdc], 0
mov dword [ebp - 0xe4], 3
lea esi, [ebp - 0xe4]
push 1
push dword [ebp - 0xc4]
call sub.MSVBVM60.DLL___vbaDerefAry1
mov ecx, eax
mov edx, esi
call sub.MSVBVM60.DLL___vbaVarMove
lea eax, [ebp - 0xc4]
push eax
push dword [0x4210c4]
push dword [0x4211e4]
call fcn.004146e2
lea eax, [ebp - 0xc4]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x58
or word [0x421088], 0xffff
mov dword [ebp - 4], 0x59
mov dword [ebp - 0xa8], 0x1b
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcTrimVar
lea eax, [ebp - 0xc0]
push eax
lea eax, [ebp - 0xb0]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 0x5a
fld qword [0x401c08]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcTan
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x5b
push 0x34
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
wait
push 0x40bfb2
jmp 0x40becd
lea ecx, [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x28]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x38]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x3c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x40]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x44]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x48]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x4c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x50]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x54]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x58]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x5c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x60]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x6c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x74]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x78]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x7c]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x80]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x84]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x90]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x94]
call sub.MSVBVM60.DLL___vbaFreeStr
lea ecx, [ebp - 0x98]
call sub.MSVBVM60.DLL___vbaFreeStr
ret
call sub.MSVBVM60.DLL___vbaErrorOverflow