Function at 0x40af04
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x403b76
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], 0x401a90
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 - 0xa8], 0x19
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], 4
mov dword [ebp - 0xa8], 0x1e
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], 5
movsx eax, word [0x421088]
test eax, eax
jne 0x40c21d
mov dword [ebp - 4], 6
fld qword [0x401ce8]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 7
mov dword [ebp - 0x64], 0xb
mov dword [ebp - 4], 8
mov dword [ebp - 0xa8], 0xdf
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], 9
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], 0xa
push 0xf7
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], 0xb
push 0xf8
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], 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], 0x404838
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
mov dword [ebp - 0xa8], 0x3e
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], 0xe
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], 0xf
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x10
mov dword [ebp - 0xa8], 0xad
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], 0x11
push 0x1585
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], 0x12
push 0x9cc
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], 0x13
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.0040fc17
mov edx, eax
lea ecx, [ebp - 0x78]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x14
mov dword [ebp - 0xa8], 0x62
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], 0x15
fld qword [0x401ce0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x16
fld qword [0x401cd8]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
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 - 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], 0x19
push 0xcb
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], 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 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], 0x1c
fld qword [0x401cd0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x1d
mov dword [ebp - 0xa8], 0xb7
mov dword [ebp - 0xb0], 2
push 3
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftCharVar
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], 0x1e
mov edx, 0x40450c
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0x1f
mov dword [ebp - 0xa8], 0x7a
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], 0x20
push 0x85
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], 0x21
fld qword [0x401cc8]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x22
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.0040fc17
mov edx, eax
lea ecx, [ebp - 0x7c]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x23
mov dword [ebp - 0xcc], 0x40450c
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
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], 0x25
fld qword [0x401cc0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x26
mov dword [ebp - 0xa8], 0xc6
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], 0x27
mov dword [ebp - 0xa8], 0xd5
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], 0x28
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], 0x29
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], 0x2a
fld qword [0x4012c0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x2b
mov word [ebp - 0xf8], 0x967
lea eax, [ebp - 0xf8]
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 4], 0x2c
mov dword [ebp - 0xa8], 0x72
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], 0x2d
push 0x404454
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.0040fc17
mov edx, eax
lea ecx, [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x2e
mov dword [ebp - 0xa8], 0xf0
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], 0x2f
push 0xda
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], 0x30
mov dword [ebp - 0xcc], 0x404454
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], 0x31
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], 0x32
mov word [ebp - 0xf8], 0x1081
lea eax, [ebp - 0xf8]
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 4], 0x33
push 0x6a
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], 0x34
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x68]
push 0x404454
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], 0x35
fld qword [0x401cb8]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x36
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], 0x37
push 0x4043ec
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.0040fc17
mov edx, eax
lea ecx, [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x38
mov dword [ebp - 0xa8], 0x72
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], 0x39
mov dword [ebp - 0xcc], 0x4043ec
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], 0x3a
fld qword [0x401cb0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x3b
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], 0x3c
mov dword [ebp - 0xa8], 0x9f
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], 0x3d
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x24]
push 0x4043ec
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
fld qword [0x401ca8]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x3f
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], 0x40
fld qword [0x401ca0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x41
mov word [ebp - 0xf8], 0x40b
lea eax, [ebp - 0xf8]
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 4], 0x42
push 0x6d
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], 0x43
push 0x40433c
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.0040fc17
mov edx, eax
lea ecx, [ebp - 0x84]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x44
mov dword [ebp - 0xcc], 0x40433c
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], 0x45
fld qword [0x401c98]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcExp
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x46
fld qword [0x401c90]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcCos
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x47
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], 0x48
mov dword [ebp - 0xa8], 0x87
mov dword [ebp - 0xb0], 2
push 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftCharVar
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], 0x49
push 0x1ad0
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], 0x4a
fld qword [0x401c88]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x4b
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x84]
push 0x40433c
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], 0x4c
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], 0x4d
mov dword [ebp - 0xa8], 0x47
mov dword [ebp - 0xb0], 2
push 3
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], 0x4e
fld qword [0x401c80]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x4f
push 0x13
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], 0x50
fld qword [0x401c78]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x51
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.0040ef0b
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x52
mov dword [ebp - 0x64], 0xc
mov dword [ebp - 4], 0x53
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], 0x54
push 0xb
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], 0x55
lea eax, [ebp - 0xb0]
push eax
call sub.MSVBVM60.DLL_rtcCommandVar
lea ecx, [ebp - 0xb0]
call sub.MSVBVM60.DLL___vbaFreeVar
mov dword [ebp - 4], 0x56
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], 0x57
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x58
fld qword [0x401c70]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x59
fld qword [0x401c68]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcTan
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x5a
mov dword [ebp - 0x64], 0xd
mov dword [ebp - 4], 0x5b
mov dword [ebp - 0xa8], 0x18
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], 0x5c
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], 0x5d
mov dword [ebp - 0x10c], 0x65a
mov dword [ebp - 0x108], 1
and dword [ebp - 0x9c], 0
jmp 0x40c0e8
mov eax, dword [ebp - 0x9c]
add eax, dword [ebp - 0x108]
jo 0x40c50b
mov dword [ebp - 0x9c], eax
mov eax, dword [ebp - 0x9c]
cmp eax, dword [ebp - 0x10c]
jg 0x40c203
mov dword [ebp - 4], 0x5e
push 0x9f
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], 0x5f
mov word [ebp - 0xf8], 0x1919
lea eax, [ebp - 0xf8]
push eax
call sub.MSVBVM60.DLL_VarPtr
mov dword [ebp - 4], 0x60
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
mov eax, dword [0x421210]
add eax, dword [ebp - 0x9c]
jo 0x40c50b
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], 0x61
mov dword [ebp - 0xa8], 0xe4
mov dword [ebp - 0xb0], 2
push 1
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], 0x62
push 0xf7
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], 0x63
jmp 0x40c0d0
mov dword [ebp - 4], 0x64
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
jmp 0x40c3af
mov dword [ebp - 4], 0x66
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.00414460
lea eax, [ebp - 0xc4]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x67
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.00414460
lea eax, [ebp - 0xc4]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x69
fld qword [0x401c60]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x6a
or word [0x421088], 0xffff
wait
push 0x40c4fa
jmp 0x40c415
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