Function at 0x40ae95
Capabilities:
Parse pe header

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x403b06
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], 0x401a70
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
fld qword [0x401c98]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 4
mov dword [ebp - 0xa8], 0xc3
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
mov dword [ebp - 0xa8], 0x90
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], 6
movsx eax, word [0x421088]
test eax, eax
jne 0x40c155
mov dword [ebp - 4], 7
fld qword [0x401c90]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 8
mov dword [ebp - 0x64], 0xb
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
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], 0x4046c0
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], 0xb
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], 0xc
mov dword [ebp - 0xa8], 3
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], 0xd
mov dword [ebp - 0xa8], 0xc4
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], 0xe
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0xf
mov dword [ebp - 0xa8], 0xbc
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], 0x10
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.0040fc20
mov edx, eax
lea ecx, [ebp - 0x78]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x11
mov dword [ebp - 0xa8], 0x9e
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], 0x12
mov dword [ebp - 0xa8], 0x87
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], 0x13
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], 0x14
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], 0x15
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], 0x16
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], 0x17
mov edx, 0x4043b0
lea ecx, [ebp - 0x70]
call sub.MSVBVM60.DLL___vbaStrCopy
mov dword [ebp - 4], 0x18
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.0040fc20
mov edx, eax
lea ecx, [ebp - 0x7c]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x19
push 0x25
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], 0x1a
mov dword [ebp - 0xa8], 0xd7
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
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], 0x1b
mov dword [ebp - 0xa8], 0x66
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], 0x1c
mov dword [ebp - 0xcc], 0x4043b0
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], 0x1d
mov dword [ebp - 0xa8], 0x59
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
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
fld qword [0x4019a0]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x1f
fld qword [0x401c88]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x20
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], 0x21
fld qword [0x401c80]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcCos
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x22
fld qword [0x401c78]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x23
mov dword [ebp - 0xa8], 0x63
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], 0x24
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], 0x25
push 6
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], 0x26
mov dword [ebp - 0xa8], 0xda
mov dword [ebp - 0xb0], 2
push 0
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcRound
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
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], 0x28
fld qword [0x401c70]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcCos
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x29
push 0x404368
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.0040fc20
mov edx, eax
lea ecx, [ebp - 0x68]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x2a
mov dword [ebp - 0xcc], 0x404368
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], 0x2b
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], 0x2c
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x68]
push 0x404368
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], 0x2d
fld qword [0x401c68]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcCos
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x2e
fld qword [0x401c60]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcLog
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x2f
mov dword [ebp - 0xa8], 8
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], 0x30
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], 0x31
push 0xc6
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], 0x32
mov dword [ebp - 0xa8], 0x31
mov dword [ebp - 0xb0], 2
push 0
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcRound
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], 0x33
push 0x404324
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.0040fc20
mov edx, eax
lea ecx, [ebp - 0x24]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x34
mov dword [ebp - 0xa8], 0x39
mov dword [ebp - 0xb0], 2
push 0
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcRound
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], 0x35
fld qword [0x401c58]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcCos
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x36
mov dword [ebp - 0xa8], 0x4f
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
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], 0x37
mov dword [ebp - 0xcc], 0x404324
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], 0x38
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], 0x39
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x24]
push 0x404324
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], 0x3a
fld qword [0x401c50]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x3b
mov dword [ebp - 0xa8], 0x31
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], 0x3c
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], 0x3d
push 0x4042e0
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.0040fc20
mov edx, eax
lea ecx, [ebp - 0x84]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x3e
push 0x72
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], 0x3f
mov dword [ebp - 0xcc], 0x4042e0
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], 0x40
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], 0x41
push 0
push 0xffffffffffffffff
push 1
push dword [ebp - 0x84]
push 0x4042e0
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], 0x42
push 0x52
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], 0x43
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], 0x44
push 0xe
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], 0x45
fld qword [0x401c48]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSin
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x46
fld qword [0x401c40]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcSqr
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x47
fld qword [0x401c38]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcTan
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x48
mov dword [ebp - 0xa8], 0x59
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
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 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.0040eecc
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x4a
mov dword [ebp - 0x64], 0xc
mov dword [ebp - 4], 0x4b
mov dword [ebp - 0xa8], 0xf2
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
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], 0x4c
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_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], 0x4d
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], 0x4e
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], 0x4f
fld qword [0x401c30]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcAtn
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x50
push 0x7e
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], 0x51
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
mov dword [ebp - 4], 0x52
mov dword [ebp - 0xa8], 0x78
mov dword [ebp - 0xb0], 2
lea eax, [ebp - 0xb0]
push eax
lea eax, [ebp - 0xc0]
push eax
call sub.MSVBVM60.DLL_rtcLeftTrimVar
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], 0x53
mov dword [ebp - 0x64], 0xd
mov dword [ebp - 4], 0x54
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], 0x55
mov dword [ebp - 0xa8], 0xae
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], 0x56
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_rtcByteValueBstr
lea ecx, [ebp - 0xa0]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x57
mov dword [ebp - 0xa8], 0x32
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], 0x58
mov dword [ebp - 0x10c], 0x65a
mov dword [ebp - 0x108], 1
and dword [ebp - 0x9c], 0
jmp 0x40c09c
mov eax, dword [ebp - 0x9c]
add eax, dword [ebp - 0x108]
jo 0x40c49e
mov dword [ebp - 0x9c], eax
mov eax, dword [ebp - 0x9c]
cmp eax, dword [ebp - 0x10c]
jg 0x40c13b
mov dword [ebp - 4], 0x59
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
mov eax, dword [0x421210]
add eax, dword [ebp - 0x9c]
jo 0x40c49e
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], 0x5a
mov dword [ebp - 0xa8], 0xfe
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], 0x5b
jmp 0x40c084
mov dword [ebp - 4], 0x5c
mov ecx, dword [ebp - 0x64]
call sub.MSVBVM60.DLL___vbaI2I4
push eax
call sub.MSVBVM60.DLL___vbaFileClose
jmp 0x40c333
mov dword [ebp - 4], 0x5e
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.00414523
lea eax, [ebp - 0xc4]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x5f
fld qword [0x401c28]
push ecx
push ecx
fstp qword [esp]
call sub.MSVBVM60.DLL_rtcExp
fstp qword [ebp - 0x104]
mov dword [ebp - 4], 0x60
push 0xf3
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], 0x61
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.00414523
lea eax, [ebp - 0xc4]
push eax
push 0
call sub.MSVBVM60.DLL___vbaErase
mov dword [ebp - 4], 0x63
push 0x45
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], 0x64
or word [0x421088], 0xffff
wait
push 0x40c48d
jmp 0x40c3a8
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