Function at 0x413af1
Capabilities:
Check os version

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x18
push 0x4041a6
mov eax, dword fs:[0]
push eax
mov dword fs:[0], esp
mov eax, 0x248
call sub.MSVBVM60.DLL___vbaChkstk
push ebx
push esi
push edi
mov dword [ebp - 0x18], esp
mov dword [ebp - 0x14], 0x401848
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
call sub.KERNEL32.DLL_GetVersion
mov dword [ebp - 4], 4
mov dword [ebp - 0x230], 5
mov dword [ebp - 0x22c], 1
lea eax, [ebp - 0x230]
push eax
lea eax, [ebp - 0x22c]
push eax
call fcn.00423d0d
mov dword [ebp - 0x24], eax
mov dword [ebp - 4], 5
push 0x6e
lea eax, [ebp - 0x44]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x73
lea eax, [ebp - 0x54]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
mov dword [ebp - 0x1ec], 0x408e4c
mov dword [ebp - 0x1f4], 8
push 0x2e
call sub.MSVBVM60.DLL_rtcBstrFromAnsi
mov dword [ebp - 0x7c], eax
mov dword [ebp - 0x84], 8
push 0x68
lea eax, [ebp - 0xa4]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x65
call sub.MSVBVM60.DLL_rtcBstrFromAnsi
mov dword [ebp - 0xbc], eax
mov dword [ebp - 0xc4], 8
mov dword [ebp - 0x1fc], 0x408e54
mov dword [ebp - 0x204], 8
push 0x70
lea eax, [ebp - 0xf4]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x75
lea eax, [ebp - 0x114]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
mov dword [ebp - 0x20c], 0x408e5c
mov dword [ebp - 0x214], 8
push 0x64
lea eax, [ebp - 0x144]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x61
lea eax, [ebp - 0x164]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x74
lea eax, [ebp - 0x184]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x65
lea eax, [ebp - 0x1a4]
push eax
call sub.MSVBVM60.DLL_rtcVarBstrFromAnsi
push 0x73
call sub.MSVBVM60.DLL_rtcBstrFromAnsi
mov dword [ebp - 0x1bc], eax
mov dword [ebp - 0x1c4], 8
mov dword [ebp - 0x21c], 0x408e64
mov dword [ebp - 0x224], 8
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x64]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x1f4]
push eax
lea eax, [ebp - 0x74]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x94]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0xa4]
push eax
lea eax, [ebp - 0xb4]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0xc4]
push eax
lea eax, [ebp - 0xd4]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x204]
push eax
lea eax, [ebp - 0xe4]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0xf4]
push eax
lea eax, [ebp - 0x104]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x114]
push eax
lea eax, [ebp - 0x124]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x214]
push eax
lea eax, [ebp - 0x134]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x144]
push eax
lea eax, [ebp - 0x154]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x164]
push eax
lea eax, [ebp - 0x174]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x184]
push eax
lea eax, [ebp - 0x194]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x1a4]
push eax
lea eax, [ebp - 0x1b4]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x1c4]
push eax
lea eax, [ebp - 0x1d4]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
lea eax, [ebp - 0x224]
push eax
lea eax, [ebp - 0x1e4]
push eax
call sub.MSVBVM60.DLL___vbaVarCat
push eax
call sub.MSVBVM60.DLL___vbaStrVarMove
mov edx, eax
lea ecx, [ebp - 0x28]
call sub.MSVBVM60.DLL___vbaStrMove
lea eax, [ebp - 0x1e4]
push eax
lea eax, [ebp - 0x1d4]
push eax
lea eax, [ebp - 0x1c4]
push eax
lea eax, [ebp - 0x1b4]
push eax
lea eax, [ebp - 0x1a4]
push eax
lea eax, [ebp - 0x194]
push eax
lea eax, [ebp - 0x184]
push eax
lea eax, [ebp - 0x174]
push eax
lea eax, [ebp - 0x164]
push eax
lea eax, [ebp - 0x154]
push eax
lea eax, [ebp - 0x144]
push eax
lea eax, [ebp - 0x134]
push eax
lea eax, [ebp - 0x124]
push eax
lea eax, [ebp - 0x114]
push eax
lea eax, [ebp - 0x104]
push eax
lea eax, [ebp - 0xf4]
push eax
lea eax, [ebp - 0xe4]
push eax
lea eax, [ebp - 0xd4]
push eax
lea eax, [ebp - 0xc4]
push eax
lea eax, [ebp - 0xb4]
push eax
lea eax, [ebp - 0xa4]
push eax
lea eax, [ebp - 0x94]
push eax
lea eax, [ebp - 0x84]
push eax
lea eax, [ebp - 0x74]
push eax
lea eax, [ebp - 0x64]
push eax
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x44]
push eax
push 0x1b
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0x70
mov dword [ebp - 4], 6
and dword [ebp - 0x3c], 0
mov dword [ebp - 0x44], 2
lea eax, [ebp - 0x44]
push eax
lea eax, [ebp - 0x54]
push eax
call sub.MSVBVM60.DLL_rtcGetHourOfDay
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x44]
push eax
push 2
call sub.MSVBVM60.DLL___vbaFreeVarList
add esp, 0xc
mov dword [ebp - 4], 7
mov eax, dword [ebp - 0x24]
mov dword [ebp - 0x244], eax
mov eax, dword [ebp - 0x244]
mov dword [ebp - 0x25c], eax
cmp dword [ebp - 0x25c], 1
je 0x413f13
cmp dword [ebp - 0x25c], 2
je 0x413f42
cmp dword [ebp - 0x25c], 3
je 0x413f9f
cmp dword [ebp - 0x25c], 4
je 0x413fce
cmp dword [ebp - 0x25c], 5
je 0x414107
jmp 0x41413a
mov dword [ebp - 4], 9
call sub.KERNEL32.DLL_GetVersion
mov dword [ebp - 4], 0xa
push dword [ebp - 0x28]
push 0x408e6c
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
jmp 0x41413a
mov dword [ebp - 4], 0xc
push 0
push 0
call fcn.00408c30
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0xd
push dword [ebp - 0x28]
push 0x408e78
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0xe
and dword [ebp - 0x22c], 0
push 0
push 0
lea eax, [ebp - 0x22c]
push eax
push 0
call fcn.00408c80
call sub.MSVBVM60.DLL___vbaSetSystemError
jmp 0x41413a
mov dword [ebp - 4], 0x10
call sub.COMDLG32.DLL_CommDlgExtendedError
mov dword [ebp - 4], 0x11
push dword [ebp - 0x28]
push 0x408cc4
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
jmp 0x41413a
mov dword [ebp - 4], 0x13
push 0
call sub.MSVBVM60.DLL___vbaStrI2
mov edx, eax
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaStrMove
push eax
call sub.MSVBVM60.DLL_rtcRemoveDir
lea ecx, [ebp - 0x30]
call sub.MSVBVM60.DLL___vbaFreeStr
mov dword [ebp - 4], 0x14
push dword [ebp - 0x28]
push 0x408cd0
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
mov dword [ebp - 4], 0x15
cmp dword [0x441e38], 0
jne 0x41403d
push 0x441e38
push 0x408dd8
call sub.MSVBVM60.DLL___vbaNew2
mov dword [ebp - 0x260], 0x441e38
jmp 0x414047
mov dword [ebp - 0x260], 0x441e38
mov eax, dword [ebp - 0x260]
mov eax, dword [eax]
mov dword [ebp - 0x234], eax
lea eax, [ebp - 0x34]
push eax
mov eax, dword [ebp - 0x234]
mov eax, dword [eax]
push dword [ebp - 0x234]
call dword [eax + 0x1c]
fnclex
mov dword [ebp - 0x238], eax
cmp dword [ebp - 0x238], 0
jge 0x41409b
push 0x1c
push 0x408dc8
push dword [ebp - 0x234]
push dword [ebp - 0x238]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x264], eax
jmp 0x4140a2
and dword [ebp - 0x264], 0
mov eax, dword [ebp - 0x34]
mov dword [ebp - 0x23c], eax
lea eax, [ebp - 0x228]
push eax
push 0
mov eax, dword [ebp - 0x23c]
mov eax, dword [eax]
push dword [ebp - 0x23c]
call dword [eax + 0x64]
fnclex
mov dword [ebp - 0x240], eax
cmp dword [ebp - 0x240], 0
jge 0x4140f6
push 0x64
push 0x408de8
push dword [ebp - 0x23c]
push dword [ebp - 0x240]
call sub.MSVBVM60.DLL___vbaHresultCheckObj
mov dword [ebp - 0x268], eax
jmp 0x4140fd
and dword [ebp - 0x268], 0
lea ecx, [ebp - 0x34]
call sub.MSVBVM60.DLL___vbaFreeObj
jmp 0x41413a
mov dword [ebp - 4], 0x17
push 0
push 0
call fcn.00408d38
call sub.MSVBVM60.DLL___vbaSetSystemError
mov dword [ebp - 4], 0x18
push dword [ebp - 0x28]
push 0x408574
call sub.MSVBVM60.DLL___vbaStrCat
mov edx, eax
lea ecx, [ebp - 0x2c]
call sub.MSVBVM60.DLL___vbaStrMove
push 0x41422b
jmp 0x414222
lea ecx, [ebp - 0x28]
call sub.MSVBVM60.DLL___vbaFreeStr
ret