BonziBuddy Leaked Source Code by NixButterPlay
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1726 lines
54 KiB

  1. VERSION 1.0 CLASS
  2. BEGIN
  3. MultiUse = -1 'True
  4. Persistable = 0 'NotPersistable
  5. DataBindingBehavior = 0 'vbNone
  6. DataSourceBehavior = 0 'vbNone
  7. MTSTransactionMode = 0 'NotAnMTSObject
  8. END
  9. Attribute VB_Name = "CCalendarVBVars"
  10. Attribute VB_GlobalNameSpace = False
  11. Attribute VB_Creatable = True
  12. Attribute VB_PredeclaredId = False
  13. Attribute VB_Exposed = False
  14. Public Property Get Isinitialized(Index As Integer) '705550
  15. loc_00705550: push ebp
  16. loc_00705551: mov ebp, esp
  17. loc_00705553: sub esp, 0000000Ch
  18. loc_00705556: push 00412856h ; __vbaExceptHandler
  19. loc_0070555B: mov eax, fs:[00000000h]
  20. loc_00705561: push eax
  21. loc_00705562: mov fs:[00000000h], esp
  22. loc_00705569: sub esp, 0000000Ch
  23. loc_0070556C: push ebx
  24. loc_0070556D: push esi
  25. loc_0070556E: push edi
  26. loc_0070556F: mov var_C, esp
  27. loc_00705572: mov var_8, 004104F8h
  28. loc_00705579: xor edi, edi
  29. loc_0070557B: mov var_4, edi
  30. loc_0070557E: mov esi, Me
  31. loc_00705581: push esi
  32. loc_00705582: mov eax, [esi]
  33. loc_00705584: call [eax+00000004h]
  34. loc_00705587: mov cx, [esi+0000006Ch]
  35. loc_0070558B: mov var_18, edi
  36. loc_0070558E: mov var_18, ecx
  37. loc_00705591: mov eax, Me
  38. loc_00705594: push eax
  39. loc_00705595: mov edx, [eax]
  40. loc_00705597: call [edx+00000008h]
  41. loc_0070559A: mov eax, Index
  42. loc_0070559D: mov cx, var_18
  43. loc_007055A1: mov [eax], cx
  44. loc_007055A4: mov eax, var_4
  45. loc_007055A7: mov ecx, var_14
  46. loc_007055AA: pop edi
  47. loc_007055AB: pop esi
  48. loc_007055AC: mov fs:[00000000h], ecx
  49. loc_007055B3: pop ebx
  50. loc_007055B4: mov esp, ebp
  51. loc_007055B6: pop ebp
  52. loc_007055B7: retn 0008h
  53. End Sub
  54. Private Sub Proc_55_1_704CD0
  55. loc_00704CD0: push esi
  56. loc_00704CD1: mov esi, [esp+00000008h]
  57. loc_00704CD5: cmp [esi], 0074C2A4h
  58. loc_00704CDB: jz 00704CE3h
  59. loc_00704CDD: call [00401280h] ; __vbaFailedFriend
  60. loc_00704CE3: mov ecx, Proc_55_1_704CD0
  61. loc_00704CE7: mov eax, [esi+00000034h]
  62. loc_00704CEA: mov esi, [esi+00000038h]
  63. loc_00704CED: mov [ecx], eax
  64. loc_00704CEF: mov [ecx+00000004h], esi
  65. loc_00704CF2: xor eax, eax
  66. loc_00704CF4: pop esi
  67. loc_00704CF5: retn 0008h
  68. End Sub
  69. Private Sub Proc_55_2_704D00(arg_C, arg_10) '704D00
  70. loc_00704D00: push ebp
  71. loc_00704D01: mov ebp, esp
  72. loc_00704D03: sub esp, 00000008h
  73. loc_00704D06: push 00412856h ; __vbaExceptHandler
  74. loc_00704D0B: mov eax, fs:[00000000h]
  75. loc_00704D11: push eax
  76. loc_00704D12: mov fs:[00000000h], esp
  77. loc_00704D19: sub esp, 00000018h
  78. loc_00704D1C: push ebx
  79. loc_00704D1D: push esi
  80. loc_00704D1E: push edi
  81. loc_00704D1F: mov var_8, esp
  82. loc_00704D22: mov var_4, 00410468h
  83. loc_00704D29: mov esi, Me
  84. loc_00704D2C: xor eax, eax
  85. loc_00704D2E: mov var_14, eax
  86. loc_00704D31: mov var_24, eax
  87. loc_00704D34: cmp [esi], 0074C2A4h
  88. loc_00704D3A: jz 00704D42h
  89. loc_00704D3C: call [00401280h] ; __vbaFailedFriend
  90. loc_00704D42: lea ecx, var_24
  91. loc_00704D45: lea eax, arg_C
  92. loc_00704D48: push ecx
  93. loc_00704D49: mov var_1C, eax
  94. loc_00704D4C: mov var_24, 00004007h
  95. loc_00704D53: call [004010D0h] ; rtcIsDate
  96. loc_00704D59: test ax, ax
  97. loc_00704D5C: jnz 00704D82h
  98. loc_00704D5E: call [00401290h] ; rtcGetDateBstr
  99. loc_00704D64: mov edx, eax
  100. loc_00704D66: lea ecx, var_14
  101. loc_00704D69: call [004013C0h] ; __vbaStrMove
  102. loc_00704D6F: push eax
  103. loc_00704D70: call [00401268h] ; __vbaDateStr
  104. loc_00704D76: fstp real8 ptr arg_C
  105. loc_00704D79: lea ecx, var_14
  106. loc_00704D7C: call [00401430h] ; __vbaFreeStr
  107. loc_00704D82: mov edx, arg_C
  108. loc_00704D85: mov eax, arg_10
  109. loc_00704D88: mov [esi+00000034h], edx
  110. loc_00704D8B: mov [esi+00000038h], eax
  111. loc_00704D8E: fwait
  112. loc_00704D8F: push 00704DA1h
  113. loc_00704D94: jmp 00704DA0h
  114. loc_00704D96: lea ecx, var_14
  115. loc_00704D99: call [00401430h] ; __vbaFreeStr
  116. loc_00704D9F: ret
  117. loc_00704DA0: ret
  118. loc_00704DA1: mov ecx, var_10
  119. loc_00704DA4: pop edi
  120. loc_00704DA5: pop esi
  121. loc_00704DA6: xor eax, eax
  122. loc_00704DA8: mov fs:[00000000h], ecx
  123. loc_00704DAF: pop ebx
  124. loc_00704DB0: mov esp, ebp
  125. loc_00704DB2: pop ebp
  126. loc_00704DB3: retn 000Ch
  127. End Sub
  128. Private Sub Proc_55_3_704DC0
  129. loc_00704DC0: push esi
  130. loc_00704DC1: mov esi, [esp+00000008h]
  131. loc_00704DC5: cmp [esi], 0074C2A4h
  132. loc_00704DCB: jz 00704DD3h
  133. loc_00704DCD: call [00401280h] ; __vbaFailedFriend
  134. loc_00704DD3: mov ecx, Proc_55_3_704DC0
  135. loc_00704DD7: mov eax, [esi+0000003Ch]
  136. loc_00704DDA: mov esi, [esi+00000040h]
  137. loc_00704DDD: mov [ecx], eax
  138. loc_00704DDF: mov [ecx+00000004h], esi
  139. loc_00704DE2: xor eax, eax
  140. loc_00704DE4: pop esi
  141. loc_00704DE5: retn 0008h
  142. End Sub
  143. Private Sub Proc_55_4_704DF0(arg_C, arg_10) '704DF0
  144. loc_00704DF0: push ebp
  145. loc_00704DF1: mov ebp, esp
  146. loc_00704DF3: sub esp, 00000008h
  147. loc_00704DF6: push 00412856h ; __vbaExceptHandler
  148. loc_00704DFB: mov eax, fs:[00000000h]
  149. loc_00704E01: push eax
  150. loc_00704E02: mov fs:[00000000h], esp
  151. loc_00704E09: sub esp, 00000018h
  152. loc_00704E0C: push ebx
  153. loc_00704E0D: push esi
  154. loc_00704E0E: push edi
  155. loc_00704E0F: mov var_8, esp
  156. loc_00704E12: mov var_4, 00410478h
  157. loc_00704E19: mov esi, Me
  158. loc_00704E1C: xor eax, eax
  159. loc_00704E1E: mov var_14, eax
  160. loc_00704E21: mov var_24, eax
  161. loc_00704E24: cmp [esi], 0074C2A4h
  162. loc_00704E2A: jz 00704E32h
  163. loc_00704E2C: call [00401280h] ; __vbaFailedFriend
  164. loc_00704E32: lea ecx, var_24
  165. loc_00704E35: lea eax, arg_C
  166. loc_00704E38: push ecx
  167. loc_00704E39: mov var_1C, eax
  168. loc_00704E3C: mov var_24, 00004007h
  169. loc_00704E43: call [004010D0h] ; rtcIsDate
  170. loc_00704E49: test ax, ax
  171. loc_00704E4C: jnz 00704E72h
  172. loc_00704E4E: call [00401290h] ; rtcGetDateBstr
  173. loc_00704E54: mov edx, eax
  174. loc_00704E56: lea ecx, var_14
  175. loc_00704E59: call [004013C0h] ; __vbaStrMove
  176. loc_00704E5F: push eax
  177. loc_00704E60: call [00401268h] ; __vbaDateStr
  178. loc_00704E66: fstp real8 ptr arg_C
  179. loc_00704E69: lea ecx, var_14
  180. loc_00704E6C: call [00401430h] ; __vbaFreeStr
  181. loc_00704E72: mov edx, arg_C
  182. loc_00704E75: mov eax, arg_10
  183. loc_00704E78: mov [esi+0000003Ch], edx
  184. loc_00704E7B: mov [esi+00000040h], eax
  185. loc_00704E7E: fwait
  186. loc_00704E7F: push 00704E91h
  187. loc_00704E84: jmp 00704E90h
  188. loc_00704E86: lea ecx, var_14
  189. loc_00704E89: call [00401430h] ; __vbaFreeStr
  190. loc_00704E8F: ret
  191. loc_00704E90: ret
  192. loc_00704E91: mov ecx, var_10
  193. loc_00704E94: pop edi
  194. loc_00704E95: pop esi
  195. loc_00704E96: xor eax, eax
  196. loc_00704E98: mov fs:[00000000h], ecx
  197. loc_00704E9F: pop ebx
  198. loc_00704EA0: mov esp, ebp
  199. loc_00704EA2: pop ebp
  200. loc_00704EA3: retn 000Ch
  201. End Sub
  202. Private Sub Proc_55_5_704EB0
  203. loc_00704EB0: push esi
  204. loc_00704EB1: mov esi, [esp+00000008h]
  205. loc_00704EB5: cmp [esi], 0074C2A4h
  206. loc_00704EBB: jz 00704EC3h
  207. loc_00704EBD: call [00401280h] ; __vbaFailedFriend
  208. loc_00704EC3: mov ecx, Proc_55_5_704EB0
  209. loc_00704EC7: mov eax, [esi+00000044h]
  210. loc_00704ECA: mov esi, [esi+00000048h]
  211. loc_00704ECD: mov [ecx], eax
  212. loc_00704ECF: mov [ecx+00000004h], esi
  213. loc_00704ED2: xor eax, eax
  214. loc_00704ED4: pop esi
  215. loc_00704ED5: retn 0008h
  216. End Sub
  217. Private Sub Proc_55_6_704EE0(arg_C, arg_10) '704EE0
  218. loc_00704EE0: push ebp
  219. loc_00704EE1: mov ebp, esp
  220. loc_00704EE3: sub esp, 00000008h
  221. loc_00704EE6: push 00412856h ; __vbaExceptHandler
  222. loc_00704EEB: mov eax, fs:[00000000h]
  223. loc_00704EF1: push eax
  224. loc_00704EF2: mov fs:[00000000h], esp
  225. loc_00704EF9: sub esp, 00000018h
  226. loc_00704EFC: push ebx
  227. loc_00704EFD: push esi
  228. loc_00704EFE: push edi
  229. loc_00704EFF: mov var_8, esp
  230. loc_00704F02: mov var_4, 00410488h
  231. loc_00704F09: mov esi, Me
  232. loc_00704F0C: xor eax, eax
  233. loc_00704F0E: mov var_14, eax
  234. loc_00704F11: mov var_24, eax
  235. loc_00704F14: cmp [esi], 0074C2A4h
  236. loc_00704F1A: jz 00704F22h
  237. loc_00704F1C: call [00401280h] ; __vbaFailedFriend
  238. loc_00704F22: lea ecx, var_24
  239. loc_00704F25: lea eax, arg_C
  240. loc_00704F28: push ecx
  241. loc_00704F29: mov var_1C, eax
  242. loc_00704F2C: mov var_24, 00004007h
  243. loc_00704F33: call [004010D0h] ; rtcIsDate
  244. loc_00704F39: test ax, ax
  245. loc_00704F3C: jnz 00704F62h
  246. loc_00704F3E: call [00401290h] ; rtcGetDateBstr
  247. loc_00704F44: mov edx, eax
  248. loc_00704F46: lea ecx, var_14
  249. loc_00704F49: call [004013C0h] ; __vbaStrMove
  250. loc_00704F4F: push eax
  251. loc_00704F50: call [00401268h] ; __vbaDateStr
  252. loc_00704F56: fstp real8 ptr arg_C
  253. loc_00704F59: lea ecx, var_14
  254. loc_00704F5C: call [00401430h] ; __vbaFreeStr
  255. loc_00704F62: mov edx, arg_C
  256. loc_00704F65: mov eax, arg_10
  257. loc_00704F68: mov [esi+00000044h], edx
  258. loc_00704F6B: mov [esi+00000048h], eax
  259. loc_00704F6E: fwait
  260. loc_00704F6F: push 00704F81h
  261. loc_00704F74: jmp 00704F80h
  262. loc_00704F76: lea ecx, var_14
  263. loc_00704F79: call [00401430h] ; __vbaFreeStr
  264. loc_00704F7F: ret
  265. loc_00704F80: ret
  266. loc_00704F81: mov ecx, var_10
  267. loc_00704F84: pop edi
  268. loc_00704F85: pop esi
  269. loc_00704F86: xor eax, eax
  270. loc_00704F88: mov fs:[00000000h], ecx
  271. loc_00704F8F: pop ebx
  272. loc_00704F90: mov esp, ebp
  273. loc_00704F92: pop ebp
  274. loc_00704F93: retn 000Ch
  275. End Sub
  276. Private Sub Proc_55_7_704FA0(arg_C) '704FA0
  277. loc_00704FA0: push ebp
  278. loc_00704FA1: mov ebp, esp
  279. loc_00704FA3: sub esp, 00000008h
  280. loc_00704FA6: push 00412856h ; __vbaExceptHandler
  281. loc_00704FAB: mov eax, fs:[00000000h]
  282. loc_00704FB1: push eax
  283. loc_00704FB2: mov fs:[00000000h], esp
  284. loc_00704FB9: sub esp, 00000008h
  285. loc_00704FBC: push ebx
  286. loc_00704FBD: push esi
  287. loc_00704FBE: push edi
  288. loc_00704FBF: mov var_8, esp
  289. loc_00704FC2: mov var_4, 00410498h
  290. loc_00704FC9: mov esi, Me
  291. loc_00704FCC: mov var_14, 00000000h
  292. loc_00704FD3: cmp [esi], 0074C2A4h
  293. loc_00704FD9: jz 00704FE1h
  294. loc_00704FDB: call [00401280h] ; __vbaFailedFriend
  295. loc_00704FE1: mov eax, arg_C
  296. loc_00704FE4: lea edx, var_14
  297. loc_00704FE7: mov [eax], 00000000h
  298. loc_00704FED: mov ecx, [esi+00000074h]
  299. loc_00704FF0: push ecx
  300. loc_00704FF1: push edx
  301. loc_00704FF2: call [00401130h] ; __vbaObjSetAddref
  302. loc_00704FF8: push 0070500Ah
  303. loc_00704FFD: jmp 00705009h
  304. loc_00704FFF: lea ecx, var_14
  305. loc_00705002: call [0040142Ch] ; __vbaFreeObj
  306. loc_00705008: ret
  307. loc_00705009: ret
  308. loc_0070500A: mov eax, arg_C
  309. loc_0070500D: mov ecx, var_14
  310. loc_00705010: pop edi
  311. loc_00705011: pop esi
  312. loc_00705012: mov [eax], ecx
  313. loc_00705014: mov ecx, var_10
  314. loc_00705017: xor eax, eax
  315. loc_00705019: mov fs:[00000000h], ecx
  316. loc_00705020: pop ebx
  317. loc_00705021: mov esp, ebp
  318. loc_00705023: pop ebp
  319. loc_00705024: retn 0008h
  320. End Sub
  321. Private Sub Proc_55_8_705030(arg_C) '705030
  322. loc_00705030: push ebp
  323. loc_00705031: mov ebp, esp
  324. loc_00705033: sub esp, 00000008h
  325. loc_00705036: push 00412856h ; __vbaExceptHandler
  326. loc_0070503B: mov eax, fs:[00000000h]
  327. loc_00705041: push eax
  328. loc_00705042: mov fs:[00000000h], esp
  329. loc_00705049: sub esp, 00000008h
  330. loc_0070504C: push ebx
  331. loc_0070504D: push esi
  332. loc_0070504E: push edi
  333. loc_0070504F: mov var_8, esp
  334. loc_00705052: mov var_4, 004104A8h
  335. loc_00705059: mov edi, Me
  336. loc_0070505C: mov var_14, 00000000h
  337. loc_00705063: cmp [edi], 0074C2A4h
  338. loc_00705069: jz 00705071h
  339. loc_0070506B: call [00401280h] ; __vbaFailedFriend
  340. loc_00705071: mov eax, arg_C
  341. loc_00705074: mov esi, [00401130h] ; __vbaObjSetAddref
  342. loc_0070507A: lea ecx, var_14
  343. loc_0070507D: push eax
  344. loc_0070507E: push ecx
  345. loc_0070507F: call __vbaObjSetAddref
  346. loc_00705081: mov edx, var_14
  347. loc_00705084: add edi, 00000074h
  348. loc_00705087: push edx
  349. loc_00705088: push edi
  350. loc_00705089: call __vbaObjSetAddref
  351. loc_0070508B: push 0070509Ah
  352. loc_00705090: lea ecx, var_14
  353. loc_00705093: call [0040142Ch] ; __vbaFreeObj
  354. loc_00705099: ret
  355. loc_0070509A: mov ecx, var_10
  356. loc_0070509D: pop edi
  357. loc_0070509E: pop esi
  358. loc_0070509F: xor eax, eax
  359. loc_007050A1: mov fs:[00000000h], ecx
  360. loc_007050A8: pop ebx
  361. loc_007050A9: mov esp, ebp
  362. loc_007050AB: pop ebp
  363. loc_007050AC: retn 0008h
  364. End Sub
  365. Private Sub Proc_55_9_7050B0
  366. loc_007050B0: push esi
  367. loc_007050B1: mov esi, [esp+00000008h]
  368. loc_007050B5: cmp [esi], 0074C2A4h
  369. loc_007050BB: jz 007050C3h
  370. loc_007050BD: call [00401280h] ; __vbaFailedFriend
  371. loc_007050C3: mov ecx, Proc_55_9_7050B0
  372. loc_007050C7: mov eax, [esi+0000004Ch]
  373. loc_007050CA: mov esi, [esi+00000050h]
  374. loc_007050CD: mov [ecx], eax
  375. loc_007050CF: mov [ecx+00000004h], esi
  376. loc_007050D2: xor eax, eax
  377. loc_007050D4: pop esi
  378. loc_007050D5: retn 0008h
  379. End Sub
  380. Private Sub Proc_55_10_7050E0(arg_C, arg_10) '7050E0
  381. loc_007050E0: push ebp
  382. loc_007050E1: mov ebp, esp
  383. loc_007050E3: sub esp, 00000008h
  384. loc_007050E6: push 00412856h ; __vbaExceptHandler
  385. loc_007050EB: mov eax, fs:[00000000h]
  386. loc_007050F1: push eax
  387. loc_007050F2: mov fs:[00000000h], esp
  388. loc_007050F9: sub esp, 00000018h
  389. loc_007050FC: push ebx
  390. loc_007050FD: push esi
  391. loc_007050FE: push edi
  392. loc_007050FF: mov var_8, esp
  393. loc_00705102: mov var_4, 004104B8h
  394. loc_00705109: mov esi, Me
  395. loc_0070510C: xor eax, eax
  396. loc_0070510E: mov var_14, eax
  397. loc_00705111: mov var_24, eax
  398. loc_00705114: cmp [esi], 0074C2A4h
  399. loc_0070511A: jz 00705122h
  400. loc_0070511C: call [00401280h] ; __vbaFailedFriend
  401. loc_00705122: lea ecx, var_24
  402. loc_00705125: lea eax, arg_C
  403. loc_00705128: push ecx
  404. loc_00705129: mov var_1C, eax
  405. loc_0070512C: mov var_24, 00004007h
  406. loc_00705133: call [004010D0h] ; rtcIsDate
  407. loc_00705139: test ax, ax
  408. loc_0070513C: jnz 00705162h
  409. loc_0070513E: call [00401290h] ; rtcGetDateBstr
  410. loc_00705144: mov edx, eax
  411. loc_00705146: lea ecx, var_14
  412. loc_00705149: call [004013C0h] ; __vbaStrMove
  413. loc_0070514F: push eax
  414. loc_00705150: call [00401268h] ; __vbaDateStr
  415. loc_00705156: fstp real8 ptr arg_C
  416. loc_00705159: lea ecx, var_14
  417. loc_0070515C: call [00401430h] ; __vbaFreeStr
  418. loc_00705162: mov edx, arg_C
  419. loc_00705165: mov eax, arg_10
  420. loc_00705168: mov [esi+0000004Ch], edx
  421. loc_0070516B: mov [esi+00000050h], eax
  422. loc_0070516E: fwait
  423. loc_0070516F: push 00705181h
  424. loc_00705174: jmp 00705180h
  425. loc_00705176: lea ecx, var_14
  426. loc_00705179: call [00401430h] ; __vbaFreeStr
  427. loc_0070517F: ret
  428. loc_00705180: ret
  429. loc_00705181: mov ecx, var_10
  430. loc_00705184: pop edi
  431. loc_00705185: pop esi
  432. loc_00705186: xor eax, eax
  433. loc_00705188: mov fs:[00000000h], ecx
  434. loc_0070518F: pop ebx
  435. loc_00705190: mov esp, ebp
  436. loc_00705192: pop ebp
  437. loc_00705193: retn 000Ch
  438. End Sub
  439. Private Sub Proc_55_11_7051A0
  440. loc_007051A0: push esi
  441. loc_007051A1: mov esi, [esp+00000008h]
  442. loc_007051A5: cmp [esi], 0074C2A4h
  443. loc_007051AB: jz 007051B3h
  444. loc_007051AD: call [00401280h] ; __vbaFailedFriend
  445. loc_007051B3: mov ecx, Proc_55_11_7051A0
  446. loc_007051B7: mov eax, [esi+00000054h]
  447. loc_007051BA: mov esi, [esi+00000058h]
  448. loc_007051BD: mov [ecx], eax
  449. loc_007051BF: mov [ecx+00000004h], esi
  450. loc_007051C2: xor eax, eax
  451. loc_007051C4: pop esi
  452. loc_007051C5: retn 0008h
  453. End Sub
  454. Private Sub Proc_55_12_7051D0(arg_C, arg_10) '7051D0
  455. loc_007051D0: push ebp
  456. loc_007051D1: mov ebp, esp
  457. loc_007051D3: sub esp, 00000008h
  458. loc_007051D6: push 00412856h ; __vbaExceptHandler
  459. loc_007051DB: mov eax, fs:[00000000h]
  460. loc_007051E1: push eax
  461. loc_007051E2: mov fs:[00000000h], esp
  462. loc_007051E9: sub esp, 00000018h
  463. loc_007051EC: push ebx
  464. loc_007051ED: push esi
  465. loc_007051EE: push edi
  466. loc_007051EF: mov var_8, esp
  467. loc_007051F2: mov var_4, 004104C8h
  468. loc_007051F9: mov esi, Me
  469. loc_007051FC: xor eax, eax
  470. loc_007051FE: mov var_14, eax
  471. loc_00705201: mov var_24, eax
  472. loc_00705204: cmp [esi], 0074C2A4h
  473. loc_0070520A: jz 00705212h
  474. loc_0070520C: call [00401280h] ; __vbaFailedFriend
  475. loc_00705212: lea ecx, var_24
  476. loc_00705215: lea eax, arg_C
  477. loc_00705218: push ecx
  478. loc_00705219: mov var_1C, eax
  479. loc_0070521C: mov var_24, 00004007h
  480. loc_00705223: call [004010D0h] ; rtcIsDate
  481. loc_00705229: test ax, ax
  482. loc_0070522C: jnz 00705252h
  483. loc_0070522E: call [00401290h] ; rtcGetDateBstr
  484. loc_00705234: mov edx, eax
  485. loc_00705236: lea ecx, var_14
  486. loc_00705239: call [004013C0h] ; __vbaStrMove
  487. loc_0070523F: push eax
  488. loc_00705240: call [00401268h] ; __vbaDateStr
  489. loc_00705246: fstp real8 ptr arg_C
  490. loc_00705249: lea ecx, var_14
  491. loc_0070524C: call [00401430h] ; __vbaFreeStr
  492. loc_00705252: mov edx, arg_C
  493. loc_00705255: mov eax, arg_10
  494. loc_00705258: mov [esi+00000054h], edx
  495. loc_0070525B: mov [esi+00000058h], eax
  496. loc_0070525E: fwait
  497. loc_0070525F: push 00705271h
  498. loc_00705264: jmp 00705270h
  499. loc_00705266: lea ecx, var_14
  500. loc_00705269: call [00401430h] ; __vbaFreeStr
  501. loc_0070526F: ret
  502. loc_00705270: ret
  503. loc_00705271: mov ecx, var_10
  504. loc_00705274: pop edi
  505. loc_00705275: pop esi
  506. loc_00705276: xor eax, eax
  507. loc_00705278: mov fs:[00000000h], ecx
  508. loc_0070527F: pop ebx
  509. loc_00705280: mov esp, ebp
  510. loc_00705282: pop ebp
  511. loc_00705283: retn 000Ch
  512. End Sub
  513. Private Sub Proc_55_13_705290
  514. loc_00705290: push esi
  515. loc_00705291: mov esi, [esp+00000008h]
  516. loc_00705295: cmp [esi], 0074C2A4h
  517. loc_0070529B: jz 007052A3h
  518. loc_0070529D: call [00401280h] ; __vbaFailedFriend
  519. loc_007052A3: mov ecx, Proc_55_13_705290
  520. loc_007052A7: mov eax, [esi+0000005Ch]
  521. loc_007052AA: mov esi, [esi+00000060h]
  522. loc_007052AD: mov [ecx], eax
  523. loc_007052AF: mov [ecx+00000004h], esi
  524. loc_007052B2: xor eax, eax
  525. loc_007052B4: pop esi
  526. loc_007052B5: retn 0008h
  527. End Sub
  528. Private Sub Proc_55_14_7052C0(arg_C, arg_10) '7052C0
  529. loc_007052C0: push ebp
  530. loc_007052C1: mov ebp, esp
  531. loc_007052C3: sub esp, 00000008h
  532. loc_007052C6: push 00412856h ; __vbaExceptHandler
  533. loc_007052CB: mov eax, fs:[00000000h]
  534. loc_007052D1: push eax
  535. loc_007052D2: mov fs:[00000000h], esp
  536. loc_007052D9: sub esp, 00000018h
  537. loc_007052DC: push ebx
  538. loc_007052DD: push esi
  539. loc_007052DE: push edi
  540. loc_007052DF: mov var_8, esp
  541. loc_007052E2: mov var_4, 004104D8h
  542. loc_007052E9: mov esi, Me
  543. loc_007052EC: xor eax, eax
  544. loc_007052EE: mov var_14, eax
  545. loc_007052F1: mov var_24, eax
  546. loc_007052F4: cmp [esi], 0074C2A4h
  547. loc_007052FA: jz 00705302h
  548. loc_007052FC: call [00401280h] ; __vbaFailedFriend
  549. loc_00705302: lea ecx, var_24
  550. loc_00705305: lea eax, arg_C
  551. loc_00705308: push ecx
  552. loc_00705309: mov var_1C, eax
  553. loc_0070530C: mov var_24, 00004007h
  554. loc_00705313: call [004010D0h] ; rtcIsDate
  555. loc_00705319: test ax, ax
  556. loc_0070531C: jnz 00705342h
  557. loc_0070531E: call [00401290h] ; rtcGetDateBstr
  558. loc_00705324: mov edx, eax
  559. loc_00705326: lea ecx, var_14
  560. loc_00705329: call [004013C0h] ; __vbaStrMove
  561. loc_0070532F: push eax
  562. loc_00705330: call [00401268h] ; __vbaDateStr
  563. loc_00705336: fstp real8 ptr arg_C
  564. loc_00705339: lea ecx, var_14
  565. loc_0070533C: call [00401430h] ; __vbaFreeStr
  566. loc_00705342: mov edx, arg_C
  567. loc_00705345: mov eax, arg_10
  568. loc_00705348: mov [esi+0000005Ch], edx
  569. loc_0070534B: mov [esi+00000060h], eax
  570. loc_0070534E: fwait
  571. loc_0070534F: push 00705361h
  572. loc_00705354: jmp 00705360h
  573. loc_00705356: lea ecx, var_14
  574. loc_00705359: call [00401430h] ; __vbaFreeStr
  575. loc_0070535F: ret
  576. loc_00705360: ret
  577. loc_00705361: mov ecx, var_10
  578. loc_00705364: pop edi
  579. loc_00705365: pop esi
  580. loc_00705366: xor eax, eax
  581. loc_00705368: mov fs:[00000000h], ecx
  582. loc_0070536F: pop ebx
  583. loc_00705370: mov esp, ebp
  584. loc_00705372: pop ebp
  585. loc_00705373: retn 000Ch
  586. End Sub
  587. Private Sub Proc_55_15_705380
  588. loc_00705380: push esi
  589. loc_00705381: mov esi, [esp+00000008h]
  590. loc_00705385: cmp [esi], 0074C2A4h
  591. loc_0070538B: jz 00705393h
  592. loc_0070538D: call [00401280h] ; __vbaFailedFriend
  593. loc_00705393: mov ecx, Proc_55_15_705380
  594. loc_00705397: mov eax, [esi+00000064h]
  595. loc_0070539A: mov esi, [esi+00000068h]
  596. loc_0070539D: mov [ecx], eax
  597. loc_0070539F: mov [ecx+00000004h], esi
  598. loc_007053A2: xor eax, eax
  599. loc_007053A4: pop esi
  600. loc_007053A5: retn 0008h
  601. End Sub
  602. Private Sub Proc_55_16_7053B0(arg_C, arg_10) '7053B0
  603. loc_007053B0: push ebp
  604. loc_007053B1: mov ebp, esp
  605. loc_007053B3: sub esp, 00000008h
  606. loc_007053B6: push 00412856h ; __vbaExceptHandler
  607. loc_007053BB: mov eax, fs:[00000000h]
  608. loc_007053C1: push eax
  609. loc_007053C2: mov fs:[00000000h], esp
  610. loc_007053C9: sub esp, 00000018h
  611. loc_007053CC: push ebx
  612. loc_007053CD: push esi
  613. loc_007053CE: push edi
  614. loc_007053CF: mov var_8, esp
  615. loc_007053D2: mov var_4, 004104E8h
  616. loc_007053D9: mov esi, Me
  617. loc_007053DC: xor eax, eax
  618. loc_007053DE: mov var_14, eax
  619. loc_007053E1: mov var_24, eax
  620. loc_007053E4: cmp [esi], 0074C2A4h
  621. loc_007053EA: jz 007053F2h
  622. loc_007053EC: call [00401280h] ; __vbaFailedFriend
  623. loc_007053F2: lea ecx, var_24
  624. loc_007053F5: lea eax, arg_C
  625. loc_007053F8: push ecx
  626. loc_007053F9: mov var_1C, eax
  627. loc_007053FC: mov var_24, 00004007h
  628. loc_00705403: call [004010D0h] ; rtcIsDate
  629. loc_00705409: test ax, ax
  630. loc_0070540C: jnz 00705432h
  631. loc_0070540E: call [00401290h] ; rtcGetDateBstr
  632. loc_00705414: mov edx, eax
  633. loc_00705416: lea ecx, var_14
  634. loc_00705419: call [004013C0h] ; __vbaStrMove
  635. loc_0070541F: push eax
  636. loc_00705420: call [00401268h] ; __vbaDateStr
  637. loc_00705426: fstp real8 ptr arg_C
  638. loc_00705429: lea ecx, var_14
  639. loc_0070542C: call [00401430h] ; __vbaFreeStr
  640. loc_00705432: mov edx, arg_C
  641. loc_00705435: mov eax, arg_10
  642. loc_00705438: mov [esi+00000064h], edx
  643. loc_0070543B: mov [esi+00000068h], eax
  644. loc_0070543E: fwait
  645. loc_0070543F: push 00705451h
  646. loc_00705444: jmp 00705450h
  647. loc_00705446: lea ecx, var_14
  648. loc_00705449: call [00401430h] ; __vbaFreeStr
  649. loc_0070544F: ret
  650. loc_00705450: ret
  651. loc_00705451: mov ecx, var_10
  652. loc_00705454: pop edi
  653. loc_00705455: pop esi
  654. loc_00705456: xor eax, eax
  655. loc_00705458: mov fs:[00000000h], ecx
  656. loc_0070545F: pop ebx
  657. loc_00705460: mov esp, ebp
  658. loc_00705462: pop ebp
  659. loc_00705463: retn 000Ch
  660. End Sub
  661. Private Sub Proc_55_17_705470
  662. loc_00705470: push esi
  663. loc_00705471: mov esi, [esp+00000008h]
  664. loc_00705475: cmp [esi], 0074C2A4h
  665. loc_0070547B: jz 00705483h
  666. loc_0070547D: call [00401280h] ; __vbaFailedFriend
  667. loc_00705483: mov ecx, Proc_55_17_705470
  668. loc_00705487: mov ax, [esi+0000006Eh]
  669. loc_0070548B: pop esi
  670. loc_0070548C: mov [ecx], ax
  671. loc_0070548F: xor eax, eax
  672. loc_00705491: retn 0008h
  673. End Sub
  674. Private Sub Proc_55_18_7054A0
  675. loc_007054A0: push esi
  676. loc_007054A1: mov esi, [esp+00000008h]
  677. loc_007054A5: cmp [esi], 0074C2A4h
  678. loc_007054AB: jz 007054C2h
  679. loc_007054AD: call [00401280h] ; __vbaFailedFriend
  680. loc_007054B3: mov ax, Proc_55_18_7054A0
  681. loc_007054B8: mov [esi+0000006Eh], ax
  682. loc_007054BC: xor eax, eax
  683. loc_007054BE: pop esi
  684. loc_007054BF: retn 0008h
  685. End Sub
  686. Private Sub Proc_55_19_7054E0
  687. loc_007054E0: push esi
  688. loc_007054E1: mov esi, [esp+00000008h]
  689. loc_007054E5: cmp [esi], 0074C2A4h
  690. loc_007054EB: jz 007054F3h
  691. loc_007054ED: call [00401280h] ; __vbaFailedFriend
  692. loc_007054F3: mov ecx, Proc_55_19_7054E0
  693. loc_007054F7: mov ax, [esi+00000070h]
  694. loc_007054FB: pop esi
  695. loc_007054FC: mov [ecx], ax
  696. loc_007054FF: xor eax, eax
  697. loc_00705501: retn 0008h
  698. End Sub
  699. Private Sub Proc_55_20_705510
  700. loc_00705510: push esi
  701. loc_00705511: mov esi, [esp+00000008h]
  702. loc_00705515: cmp [esi], 0074C2A4h
  703. loc_0070551B: jz 00705532h
  704. loc_0070551D: call [00401280h] ; __vbaFailedFriend
  705. loc_00705523: mov ax, Proc_55_20_705510
  706. loc_00705528: mov [esi+00000070h], ax
  707. loc_0070552C: xor eax, eax
  708. loc_0070552E: pop esi
  709. loc_0070552F: retn 0008h
  710. End Sub
  711. Private Function Proc_55_21_7055C0(arg_C, arg_10, arg_14, arg_18, arg_1C, arg_20, arg_24) '7055C0
  712. loc_007055C0: push ebp
  713. loc_007055C1: mov ebp, esp
  714. loc_007055C3: sub esp, 00000008h
  715. loc_007055C6: push 00412856h ; __vbaExceptHandler
  716. loc_007055CB: mov eax, fs:[00000000h]
  717. loc_007055D1: push eax
  718. loc_007055D2: mov fs:[00000000h], esp
  719. loc_007055D9: sub esp, 00000100h
  720. loc_007055DF: push ebx
  721. loc_007055E0: push esi
  722. loc_007055E1: push edi
  723. loc_007055E2: mov var_8, esp
  724. loc_007055E5: mov var_4, 00410500h
  725. loc_007055EC: mov esi, Me
  726. loc_007055EF: xor ebx, ebx
  727. loc_007055F1: mov var_14, ebx
  728. loc_007055F4: mov var_28, ebx
  729. loc_007055F7: mov eax, [esi]
  730. loc_007055F9: mov var_2C, ebx
  731. loc_007055FC: cmp eax, 0074C2A4h
  732. loc_00705601: mov var_30, ebx
  733. loc_00705604: mov var_3C, ebx
  734. loc_00705607: mov var_44, ebx
  735. loc_0070560A: mov var_48, ebx
  736. loc_0070560D: mov var_58, ebx
  737. loc_00705610: mov var_68, ebx
  738. loc_00705613: mov var_78, ebx
  739. loc_00705616: mov var_88, ebx
  740. loc_0070561C: mov var_98, ebx
  741. loc_00705622: mov var_AC, ebx
  742. loc_00705628: mov var_B0, ebx
  743. loc_0070562E: mov var_B4, ebx
  744. loc_00705634: mov var_BC, ebx
  745. loc_0070563A: mov var_B8, ebx
  746. loc_00705640: mov var_C4, ebx
  747. loc_00705646: mov var_C0, ebx
  748. loc_0070564C: jz 00705654h
  749. loc_0070564E: call [00401280h] ; __vbaFailedFriend
  750. loc_00705654: mov eax, arg_14
  751. loc_00705657: mov edi, [00401130h] ; __vbaObjSetAddref
  752. loc_0070565D: lea ecx, var_2C
  753. loc_00705660: push eax
  754. loc_00705661: push ecx
  755. loc_00705662: call edi
  756. loc_00705664: cmp var_14, ebx
  757. loc_00705667: jnz 00705678h
  758. loc_00705669: lea edx, var_14
  759. loc_0070566C: push edx
  760. loc_0070566D: push 00414738h
  761. loc_00705672: call [004012FCh] ; __vbaNew2
  762. loc_00705678: mov ecx, arg_24
  763. loc_0070567B: mov ebx, arg_20
  764. loc_0070567E: mov edx, arg_1C
  765. loc_00705681: lea eax, var_58
  766. loc_00705684: push eax
  767. loc_00705685: mov eax, arg_18
  768. loc_00705688: push ecx
  769. loc_00705689: mov ecx, var_2C
  770. loc_0070568C: push ebx
  771. loc_0070568D: push edx
  772. loc_0070568E: push eax
  773. loc_0070568F: lea edx, var_44
  774. loc_00705692: push ecx
  775. loc_00705693: push edx
  776. loc_00705694: call edi
  777. loc_00705696: mov edi, arg_10
  778. loc_00705699: mov ecx, var_14
  779. loc_0070569C: push eax
  780. loc_0070569D: mov eax, arg_C
  781. loc_007056A0: push edi
  782. loc_007056A1: push eax
  783. loc_007056A2: push ecx
  784. loc_007056A3: call 007034D0h
  785. loc_007056A8: lea edx, var_58
  786. loc_007056AB: push edx
  787. loc_007056AC: call [004012B8h] ; __vbaDateVar
  788. loc_007056B2: fstp real8 ptr var_1C
  789. loc_007056B5: lea ecx, var_44
  790. loc_007056B8: call [0040142Ch] ; __vbaFreeObj
  791. loc_007056BE: lea ecx, var_58
  792. loc_007056C1: call [00401030h] ; __vbaFreeVar
  793. loc_007056C7: mov eax, arg_C
  794. loc_007056CA: push eax
  795. loc_007056CB: push esi
  796. loc_007056CC: call 007054A0h
  797. loc_007056D1: push edi
  798. loc_007056D2: push esi
  799. loc_007056D3: call 00705510h
  800. loc_007056D8: mov ecx, var_18
  801. loc_007056DB: mov edx, var_1C
  802. loc_007056DE: push ecx
  803. loc_007056DF: push edx
  804. loc_007056E0: push esi
  805. loc_007056E1: call 007050E0h
  806. loc_007056E6: mov eax, var_14
  807. loc_007056E9: test eax, eax
  808. loc_007056EB: jnz 007056FCh
  809. loc_007056ED: lea eax, var_14
  810. loc_007056F0: push eax
  811. loc_007056F1: push 00414738h
  812. loc_007056F6: call [004012FCh] ; __vbaNew2
  813. loc_007056FC: mov edx, arg_1C
  814. loc_007056FF: mov eax, var_14
  815. loc_00705702: lea ecx, var_BC
  816. loc_00705708: push ecx
  817. loc_00705709: push ebx
  818. loc_0070570A: push edx
  819. loc_0070570B: push edi
  820. loc_0070570C: push eax
  821. loc_0070570D: call 00703B10h
  822. loc_00705712: mov ecx, var_B8
  823. loc_00705718: mov edx, var_BC
  824. loc_0070571E: push ecx
  825. loc_0070571F: push edx
  826. loc_00705720: push esi
  827. loc_00705721: call 00704D00h
  828. loc_00705726: lea eax, var_BC
  829. loc_0070572C: push eax
  830. loc_0070572D: push esi
  831. loc_0070572E: call 00704CD0h
  832. loc_00705733: mov eax, var_14
  833. loc_00705736: test eax, eax
  834. loc_00705738: jnz 00705749h
  835. loc_0070573A: lea ecx, var_14
  836. loc_0070573D: push ecx
  837. loc_0070573E: push 00414738h
  838. loc_00705743: call [004012FCh] ; __vbaNew2
  839. loc_00705749: mov eax, arg_1C
  840. loc_0070574C: mov ecx, var_B8
  841. loc_00705752: lea edx, var_C4
  842. loc_00705758: push edx
  843. loc_00705759: mov edx, var_BC
  844. loc_0070575F: push ebx
  845. loc_00705760: push eax
  846. loc_00705761: mov eax, var_14
  847. loc_00705764: push edi
  848. loc_00705765: push ecx
  849. loc_00705766: push edx
  850. loc_00705767: push eax
  851. loc_00705768: call 00703A10h
  852. loc_0070576D: mov ecx, var_C0
  853. loc_00705773: mov edx, var_C4
  854. loc_00705779: push ecx
  855. loc_0070577A: push edx
  856. loc_0070577B: push esi
  857. loc_0070577C: call 00704DF0h
  858. loc_00705781: lea eax, var_BC
  859. loc_00705787: push eax
  860. loc_00705788: push esi
  861. loc_00705789: call 00704DC0h
  862. loc_0070578E: mov ecx, var_BC
  863. loc_00705794: mov edx, var_B8
  864. loc_0070579A: mov edi, [004010B4h] ; rtcDateAdd
  865. loc_007057A0: lea eax, var_58
  866. loc_007057A3: push eax
  867. loc_007057A4: mov var_50, ecx
  868. loc_007057A7: push 3FF00000h
  869. loc_007057AC: push 00000000h
  870. loc_007057AE: lea ecx, var_68
  871. loc_007057B1: push 00446E3Ch ; "d"
  872. loc_007057B6: push ecx
  873. loc_007057B7: mov var_4C, edx
  874. loc_007057BA: mov var_58, 00000007h
  875. loc_007057C1: call edi
  876. loc_007057C3: lea edx, var_68
  877. loc_007057C6: push edx
  878. loc_007057C7: call [004012B8h] ; __vbaDateVar
  879. loc_007057CD: sub esp, 00000008h
  880. loc_007057D0: fstp real8 ptr [esp]
  881. loc_007057D3: push esi
  882. loc_007057D4: call 007052C0h
  883. loc_007057D9: mov ebx, [00401050h] ; __vbaFreeVarList
  884. loc_007057DF: lea eax, var_68
  885. loc_007057E2: lea ecx, var_58
  886. loc_007057E5: push eax
  887. loc_007057E6: push ecx
  888. loc_007057E7: push 00000002h
  889. loc_007057E9: call ebx
  890. loc_007057EB: mov edx, arg_18
  891. loc_007057EE: add esp, 0000000Ch
  892. loc_007057F1: mov eax, [edx]
  893. loc_007057F3: sub eax, 00000000h
  894. loc_007057F6: jz 00705F98h
  895. loc_007057FC: dec eax
  896. loc_007057FD: jz 007058F7h
  897. loc_00705803: dec eax
  898. loc_00705804: jnz 007061B5h
  899. loc_0070580A: lea eax, var_BC
  900. loc_00705810: push eax
  901. loc_00705811: push esi
  902. loc_00705812: call 007050B0h
  903. loc_00705817: mov ecx, var_BC
  904. loc_0070581D: mov edx, var_B8
  905. loc_00705823: lea eax, var_58
  906. loc_00705826: mov var_50, ecx
  907. loc_00705829: push eax
  908. loc_0070582A: push 3FF00000h
  909. loc_0070582F: push 00000000h
  910. loc_00705831: lea ecx, var_68
  911. loc_00705834: push 00446E44h ; "ww"
  912. loc_00705839: push ecx
  913. loc_0070583A: mov var_4C, edx
  914. loc_0070583D: mov var_58, 00000007h
  915. loc_00705844: call edi
  916. loc_00705846: lea edx, var_68
  917. loc_00705849: lea eax, var_78
  918. loc_0070584C: push edx
  919. loc_0070584D: push BFF00000h
  920. loc_00705852: push 00000000h
  921. loc_00705854: push 00446E3Ch ; "d"
  922. loc_00705859: push eax
  923. loc_0070585A: call edi
  924. loc_0070585C: lea ecx, var_78
  925. loc_0070585F: push ecx
  926. loc_00705860: call [004012B8h] ; __vbaDateVar
  927. loc_00705866: sub esp, 00000008h
  928. loc_00705869: fstp real8 ptr [esp]
  929. loc_0070586C: push esi
  930. loc_0070586D: call 007051D0h
  931. loc_00705872: lea edx, var_78
  932. loc_00705875: lea eax, var_68
  933. loc_00705878: push edx
  934. loc_00705879: lea ecx, var_58
  935. loc_0070587C: push eax
  936. loc_0070587D: push ecx
  937. loc_0070587E: push 00000003h
  938. loc_00705880: call ebx
  939. loc_00705882: add esp, 00000010h
  940. loc_00705885: lea edx, var_BC
  941. loc_0070588B: push edx
  942. loc_0070588C: push esi
  943. loc_0070588D: call 007050B0h
  944. loc_00705892: mov eax, var_BC
  945. loc_00705898: mov ecx, var_B8
  946. loc_0070589E: lea edx, var_58
  947. loc_007058A1: mov var_50, eax
  948. loc_007058A4: push edx
  949. loc_007058A5: push C0000000h
  950. loc_007058AA: push 00000000h
  951. loc_007058AC: lea eax, var_68
  952. loc_007058AF: push 00446E44h ; "ww"
  953. loc_007058B4: push eax
  954. loc_007058B5: mov var_4C, ecx
  955. loc_007058B8: mov var_58, 00000007h
  956. loc_007058BF: call edi
  957. loc_007058C1: lea ecx, var_68
  958. loc_007058C4: push ecx
  959. loc_007058C5: call [004012B8h] ; __vbaDateVar
  960. loc_007058CB: sub esp, 00000008h
  961. loc_007058CE: fstp real8 ptr [esp]
  962. loc_007058D1: push esi
  963. loc_007058D2: call 00704EE0h
  964. loc_007058D7: lea edx, var_68
  965. loc_007058DA: lea eax, var_58
  966. loc_007058DD: push edx
  967. loc_007058DE: push eax
  968. loc_007058DF: push 00000002h
  969. loc_007058E1: call ebx
  970. loc_007058E3: add esp, 0000000Ch
  971. loc_007058E6: mov [esi+0000006Ch], FFFFFFh
  972. loc_007058EC: fwait
  973. loc_007058ED: push 00706203h
  974. loc_007058F2: jmp 007061F2h
  975. loc_007058F7: lea ecx, var_BC
  976. loc_007058FD: push ecx
  977. loc_007058FE: push esi
  978. loc_007058FF: call 00704CD0h
  979. loc_00705904: lea edx, var_AC
  980. loc_0070590A: push edx
  981. loc_0070590B: push esi
  982. loc_0070590C: call 007054E0h
  983. loc_00705911: mov eax, var_14
  984. loc_00705914: test eax, eax
  985. loc_00705916: jnz 00705927h
  986. loc_00705918: lea eax, var_14
  987. loc_0070591B: push eax
  988. loc_0070591C: push 00414738h
  989. loc_00705921: call [004012FCh] ; __vbaNew2
  990. loc_00705927: lea ecx, var_B0
  991. loc_0070592D: push ecx
  992. loc_0070592E: mov ecx, arg_20
  993. loc_00705931: call [004011E4h] ; __vbaI2I4
  994. loc_00705937: mov ecx, arg_1C
  995. loc_0070593A: push eax
  996. loc_0070593B: call [004011E4h] ; __vbaI2I4
  997. loc_00705941: mov edx, var_AC
  998. loc_00705947: mov ecx, var_BC
  999. loc_0070594D: push eax
  1000. loc_0070594E: mov eax, var_B8
  1001. loc_00705954: push edx
  1002. loc_00705955: mov edx, var_14
  1003. loc_00705958: push eax
  1004. loc_00705959: push ecx
  1005. loc_0070595A: push edx
  1006. loc_0070595B: call 00703850h
  1007. loc_00705960: cmp var_B0, 0000h
  1008. loc_00705968: jz 00705DF8h
  1009. loc_0070596E: mov eax, arg_24
  1010. loc_00705971: sub eax, 00000000h
  1011. loc_00705974: jz 00705B81h
  1012. loc_0070597A: dec eax
  1013. loc_0070597B: jnz 00705F26h
  1014. loc_00705981: lea eax, var_44
  1015. loc_00705984: push eax
  1016. loc_00705985: push esi
  1017. loc_00705986: call 00704FA0h
  1018. loc_0070598B: mov eax, var_44
  1019. loc_0070598E: lea ecx, arg_C
  1020. loc_00705991: mov var_90, ecx
  1021. loc_00705997: lea ecx, var_48
  1022. loc_0070599A: push ecx
  1023. loc_0070599B: lea ecx, var_98
  1024. loc_007059A1: mov var_98, 00004002h
  1025. loc_007059AB: mov edx, [eax]
  1026. loc_007059AD: push ecx
  1027. loc_007059AE: push eax
  1028. loc_007059AF: mov var_C8, eax
  1029. loc_007059B5: call [edx+00000028h]
  1030. loc_007059B8: test eax, eax
  1031. loc_007059BA: fnclex
  1032. loc_007059BC: jge 007059D3h
  1033. loc_007059BE: mov edx, var_C8
  1034. loc_007059C4: push 00000028h
  1035. loc_007059C6: push 00446E8Ch
  1036. loc_007059CB: push edx
  1037. loc_007059CC: push eax
  1038. loc_007059CD: call [004010CCh] ; __vbaHresultCheckObj
  1039. loc_007059D3: mov eax, var_48
  1040. loc_007059D6: lea edx, var_AC
  1041. loc_007059DC: push edx
  1042. loc_007059DD: push eax
  1043. loc_007059DE: mov ecx, [eax]
  1044. loc_007059E0: mov var_D0, eax
  1045. loc_007059E6: call [ecx+00000024h]
  1046. loc_007059E9: test eax, eax
  1047. loc_007059EB: fnclex
  1048. loc_007059ED: jge 00705A04h
  1049. loc_007059EF: mov ecx, var_D0
  1050. loc_007059F5: push 00000024h
  1051. loc_007059F7: push 00446E9Ch
  1052. loc_007059FC: push ecx
  1053. loc_007059FD: push eax
  1054. loc_007059FE: call [004010CCh] ; __vbaHresultCheckObj
  1055. loc_00705A04: lea edx, var_BC
  1056. loc_00705A0A: push edx
  1057. loc_00705A0B: push esi
  1058. loc_00705A0C: call 007050B0h
  1059. loc_00705A11: mov eax, var_BC
  1060. loc_00705A17: mov ecx, var_B8
  1061. loc_00705A1D: mov var_50, eax
  1062. loc_00705A20: lea edx, var_58
  1063. loc_00705A23: movsx eax, var_AC
  1064. loc_00705A2A: mov var_E4, eax
  1065. loc_00705A30: mov var_4C, ecx
  1066. loc_00705A33: fild real4 ptr var_E4
  1067. loc_00705A39: push edx
  1068. loc_00705A3A: lea eax, var_68
  1069. loc_00705A3D: mov var_58, 00000007h
  1070. loc_00705A44: fstp real8 ptr var_EC
  1071. loc_00705A4A: mov ecx, var_E8
  1072. loc_00705A50: mov edx, var_EC
  1073. loc_00705A56: push ecx
  1074. loc_00705A57: push edx
  1075. loc_00705A58: push 00446E44h ; "ww"
  1076. loc_00705A5D: push eax
  1077. loc_00705A5E: call edi
  1078. loc_00705A60: lea ecx, var_68
  1079. loc_00705A63: lea edx, var_78
  1080. loc_00705A66: push ecx
  1081. loc_00705A67: push BFF00000h
  1082. loc_00705A6C: push 00000000h
  1083. loc_00705A6E: push 00446E3Ch ; "d"
  1084. loc_00705A73: push edx
  1085. loc_00705A74: call edi
  1086. loc_00705A76: lea eax, var_78
  1087. loc_00705A79: push eax
  1088. loc_00705A7A: call [004012B8h] ; __vbaDateVar
  1089. loc_00705A80: sub esp, 00000008h
  1090. loc_00705A83: fstp real8 ptr [esp]
  1091. loc_00705A86: push esi
  1092. loc_00705A87: call 007051D0h
  1093. loc_00705A8C: lea ecx, var_48
  1094. loc_00705A8F: lea edx, var_44
  1095. loc_00705A92: push ecx
  1096. loc_00705A93: push edx
  1097. loc_00705A94: push 00000002h
  1098. loc_00705A96: call [00401068h] ; __vbaFreeObjList
  1099. loc_00705A9C: lea eax, var_78
  1100. loc_00705A9F: lea ecx, var_68
  1101. loc_00705AA2: push eax
  1102. loc_00705AA3: lea edx, var_58
  1103. loc_00705AA6: push ecx
  1104. loc_00705AA7: push edx
  1105. loc_00705AA8: push 00000003h
  1106. loc_00705AAA: call ebx
  1107. loc_00705AAC: add esp, 0000001Ch
  1108. loc_00705AAF: lea eax, var_44
  1109. loc_00705AB2: push eax
  1110. loc_00705AB3: push esi
  1111. loc_00705AB4: call 00704FA0h
  1112. loc_00705AB9: mov eax, var_44
  1113. loc_00705ABC: lea edx, var_B4
  1114. loc_00705AC2: push edx
  1115. loc_00705AC3: push eax
  1116. loc_00705AC4: mov ecx, [eax]
  1117. loc_00705AC6: mov var_C8, eax
  1118. loc_00705ACC: call [ecx+0000002Ch]
  1119. loc_00705ACF: test eax, eax
  1120. loc_00705AD1: fnclex
  1121. loc_00705AD3: jge 00705AEAh
  1122. loc_00705AD5: mov ecx, var_C8
  1123. loc_00705ADB: push 0000002Ch
  1124. loc_00705ADD: push 00446E8Ch
  1125. loc_00705AE2: push ecx
  1126. loc_00705AE3: push eax
  1127. loc_00705AE4: call [004010CCh] ; __vbaHresultCheckObj
  1128. loc_00705AEA: movsx edx, arg_C
  1129. loc_00705AEE: mov ecx, var_B4
  1130. loc_00705AF4: xor eax, eax
  1131. loc_00705AF6: cmp edx, ecx
  1132. loc_00705AF8: lea ecx, var_44
  1133. loc_00705AFB: setz al
  1134. loc_00705AFE: neg eax
  1135. loc_00705B00: mov var_D0, ax
  1136. loc_00705B07: call [0040142Ch] ; __vbaFreeObj
  1137. loc_00705B0D: cmp var_D0, 0000h
  1138. loc_00705B15: jz 00705F26h
  1139. loc_00705B1B: lea ecx, var_BC
  1140. loc_00705B21: push ecx
  1141. loc_00705B22: push esi
  1142. loc_00705B23: call 007051A0h
  1143. loc_00705B28: mov edx, var_BC
  1144. loc_00705B2E: mov eax, var_B8
  1145. loc_00705B34: lea ecx, var_58
  1146. loc_00705B37: mov var_50, edx
  1147. loc_00705B3A: push ecx
  1148. loc_00705B3B: push 3FF00000h
  1149. loc_00705B40: push 00000000h
  1150. loc_00705B42: lea edx, var_68
  1151. loc_00705B45: push 00446E44h ; "ww"
  1152. loc_00705B4A: push edx
  1153. loc_00705B4B: mov var_4C, eax
  1154. loc_00705B4E: mov var_58, 00000007h
  1155. loc_00705B55: call edi
  1156. loc_00705B57: lea eax, var_68
  1157. loc_00705B5A: push eax
  1158. loc_00705B5B: call [004012B8h] ; __vbaDateVar
  1159. loc_00705B61: sub esp, 00000008h
  1160. loc_00705B64: fstp real8 ptr [esp]
  1161. loc_00705B67: push esi
  1162. loc_00705B68: call 007051D0h
  1163. loc_00705B6D: lea ecx, var_68
  1164. loc_00705B70: lea edx, var_58
  1165. loc_00705B73: push ecx
  1166. loc_00705B74: push edx
  1167. loc_00705B75: push 00000002h
  1168. loc_00705B77: call ebx
  1169. loc_00705B79: add esp, 0000000Ch
  1170. loc_00705B7C: jmp 00705F26h
  1171. loc_00705B81: cmp arg_C, 0001h
  1172. loc_00705B86: jnz 00705D20h
  1173. loc_00705B8C: lea eax, var_44
  1174. loc_00705B8F: push eax
  1175. loc_00705B90: push esi
  1176. loc_00705B91: call 00704FA0h
  1177. loc_00705B96: mov eax, var_44
  1178. loc_00705B99: lea ecx, arg_C
  1179. loc_00705B9C: mov var_90, ecx
  1180. loc_00705BA2: lea ecx, var_48
  1181. loc_00705BA5: push ecx
  1182. loc_00705BA6: lea ecx, var_98
  1183. loc_00705BAC: mov var_98, 00004002h
  1184. loc_00705BB6: mov edx, [eax]
  1185. loc_00705BB8: push ecx
  1186. loc_00705BB9: push eax
  1187. loc_00705BBA: mov var_C8, eax
  1188. loc_00705BC0: call [edx+00000028h]
  1189. loc_00705BC3: test eax, eax
  1190. loc_00705BC5: fnclex
  1191. loc_00705BC7: jge 00705BDEh
  1192. loc_00705BC9: mov edx, var_C8
  1193. loc_00705BCF: push 00000028h
  1194. loc_00705BD1: push 00446E8Ch
  1195. loc_00705BD6: push edx
  1196. loc_00705BD7: push eax
  1197. loc_00705BD8: call [004010CCh] ; __vbaHresultCheckObj
  1198. loc_00705BDE: mov eax, var_48
  1199. loc_00705BE1: lea edx, var_AC
  1200. loc_00705BE7: push edx
  1201. loc_00705BE8: push eax
  1202. loc_00705BE9: mov ecx, [eax]
  1203. loc_00705BEB: mov var_D0, eax
  1204. loc_00705BF1: call [ecx+00000024h]
  1205. loc_00705BF4: test eax, eax
  1206. loc_00705BF6: fnclex
  1207. loc_00705BF8: jge 00705C0Fh
  1208. loc_00705BFA: mov ecx, var_D0
  1209. loc_00705C00: push 00000024h
  1210. loc_00705C02: push 00446E9Ch
  1211. loc_00705C07: push ecx
  1212. loc_00705C08: push eax
  1213. loc_00705C09: call [004010CCh] ; __vbaHresultCheckObj
  1214. loc_00705C0F: lea edx, var_BC
  1215. loc_00705C15: push edx
  1216. loc_00705C16: push esi
  1217. loc_00705C17: call 007050B0h
  1218. loc_00705C1C: mov eax, var_BC
  1219. loc_00705C22: mov ecx, var_B8
  1220. loc_00705C28: mov var_50, eax
  1221. loc_00705C2B: lea edx, var_58
  1222. loc_00705C2E: movsx eax, var_AC
  1223. loc_00705C35: mov var_F0, eax
  1224. loc_00705C3B: mov var_4C, ecx
  1225. loc_00705C3E: fild real4 ptr var_F0
  1226. loc_00705C44: push edx
  1227. loc_00705C45: lea eax, var_68
  1228. loc_00705C48: mov var_58, 00000007h
  1229. loc_00705C4F: fstp real8 ptr var_F8
  1230. loc_00705C55: mov ecx, var_F4
  1231. loc_00705C5B: mov edx, var_F8
  1232. loc_00705C61: push ecx
  1233. loc_00705C62: push edx
  1234. loc_00705C63: push 00446E44h ; "ww"
  1235. loc_00705C68: push eax
  1236. loc_00705C69: call edi
  1237. loc_00705C6B: lea ecx, var_68
  1238. loc_00705C6E: lea edx, var_78
  1239. loc_00705C71: push ecx
  1240. loc_00705C72: push BFF00000h
  1241. loc_00705C77: push 00000000h
  1242. loc_00705C79: push 00446E3Ch ; "d"
  1243. loc_00705C7E: push edx
  1244. loc_00705C7F: call edi
  1245. loc_00705C81: lea eax, var_78
  1246. loc_00705C84: push eax
  1247. loc_00705C85: call [004012B8h] ; __vbaDateVar
  1248. loc_00705C8B: sub esp, 00000008h
  1249. loc_00705C8E: fstp real8 ptr [esp]
  1250. loc_00705C91: push esi
  1251. loc_00705C92: call 007051D0h
  1252. loc_00705C97: lea ecx, var_48
  1253. loc_00705C9A: lea edx, var_44
  1254. loc_00705C9D: push ecx
  1255. loc_00705C9E: push edx
  1256. loc_00705C9F: push 00000002h
  1257. loc_00705CA1: call [00401068h] ; __vbaFreeObjList
  1258. loc_00705CA7: lea eax, var_78
  1259. loc_00705CAA: lea ecx, var_68
  1260. loc_00705CAD: push eax
  1261. loc_00705CAE: lea edx, var_58
  1262. loc_00705CB1: push ecx
  1263. loc_00705CB2: push edx
  1264. loc_00705CB3: push 00000003h
  1265. loc_00705CB5: call ebx
  1266. loc_00705CB7: add esp, 0000001Ch
  1267. loc_00705CBA: lea eax, var_BC
  1268. loc_00705CC0: push eax
  1269. loc_00705CC1: push esi
  1270. loc_00705CC2: call 007051A0h
  1271. loc_00705CC7: mov ecx, var_BC
  1272. loc_00705CCD: mov edx, var_B8
  1273. loc_00705CD3: lea eax, var_58
  1274. loc_00705CD6: mov var_50, ecx
  1275. loc_00705CD9: push eax
  1276. loc_00705CDA: push 3FF00000h
  1277. loc_00705CDF: push 00000000h
  1278. loc_00705CE1: lea ecx, var_68
  1279. loc_00705CE4: push 00446E44h ; "ww"
  1280. loc_00705CE9: push ecx
  1281. loc_00705CEA: mov var_4C, edx
  1282. loc_00705CED: mov var_58, 00000007h
  1283. loc_00705CF4: call edi
  1284. loc_00705CF6: lea edx, var_68
  1285. loc_00705CF9: push edx
  1286. loc_00705CFA: call [004012B8h] ; __vbaDateVar
  1287. loc_00705D00: sub esp, 00000008h
  1288. loc_00705D03: fstp real8 ptr [esp]
  1289. loc_00705D06: push esi
  1290. loc_00705D07: call 007051D0h
  1291. loc_00705D0C: lea eax, var_68
  1292. loc_00705D0F: lea ecx, var_58
  1293. loc_00705D12: push eax
  1294. loc_00705D13: push ecx
  1295. loc_00705D14: push 00000002h
  1296. loc_00705D16: call ebx
  1297. loc_00705D18: add esp, 0000000Ch
  1298. loc_00705D1B: jmp 00705F26h
  1299. loc_00705D20: lea edx, var_44
  1300. loc_00705D23: push edx
  1301. loc_00705D24: push esi
  1302. loc_00705D25: call 00704FA0h
  1303. loc_00705D2A: mov eax, var_44
  1304. loc_00705D2D: lea ecx, arg_C
  1305. loc_00705D30: mov var_90, ecx
  1306. loc_00705D36: lea ecx, var_48
  1307. loc_00705D39: push ecx
  1308. loc_00705D3A: lea ecx, var_98
  1309. loc_00705D40: mov var_98, 00004002h
  1310. loc_00705D4A: mov edx, [eax]
  1311. loc_00705D4C: push ecx
  1312. loc_00705D4D: push eax
  1313. loc_00705D4E: mov var_C8, eax
  1314. loc_00705D54: call [edx+00000028h]
  1315. loc_00705D57: test eax, eax
  1316. loc_00705D59: fnclex
  1317. loc_00705D5B: jge 00705D72h
  1318. loc_00705D5D: mov edx, var_C8
  1319. loc_00705D63: push 00000028h
  1320. loc_00705D65: push 00446E8Ch
  1321. loc_00705D6A: push edx
  1322. loc_00705D6B: push eax
  1323. loc_00705D6C: call [004010CCh] ; __vbaHresultCheckObj
  1324. loc_00705D72: mov eax, var_48
  1325. loc_00705D75: lea edx, var_AC
  1326. loc_00705D7B: push edx
  1327. loc_00705D7C: push eax
  1328. loc_00705D7D: mov ecx, [eax]
  1329. loc_00705D7F: mov var_D0, eax
  1330. loc_00705D85: call [ecx+00000024h]
  1331. loc_00705D88: test eax, eax
  1332. loc_00705D8A: fnclex
  1333. loc_00705D8C: jge 00705DA3h
  1334. loc_00705D8E: mov ecx, var_D0
  1335. loc_00705D94: push 00000024h
  1336. loc_00705D96: push 00446E9Ch
  1337. loc_00705D9B: push ecx
  1338. loc_00705D9C: push eax
  1339. loc_00705D9D: call [004010CCh] ; __vbaHresultCheckObj
  1340. loc_00705DA3: lea edx, var_BC
  1341. loc_00705DA9: push edx
  1342. loc_00705DAA: push esi
  1343. loc_00705DAB: call 007050B0h
  1344. loc_00705DB0: mov eax, var_BC
  1345. loc_00705DB6: mov ecx, var_B8
  1346. loc_00705DBC: mov var_50, eax
  1347. loc_00705DBF: mov var_4C, ecx
  1348. loc_00705DC2: movsx eax, var_AC
  1349. loc_00705DC9: mov var_FC, eax
  1350. loc_00705DCF: lea edx, var_58
  1351. loc_00705DD2: fild real4 ptr var_FC
  1352. loc_00705DD8: push edx
  1353. loc_00705DD9: mov var_58, 00000007h
  1354. loc_00705DE0: fstp real8 ptr var_104
  1355. loc_00705DE6: mov ecx, var_100
  1356. loc_00705DEC: mov edx, var_104
  1357. loc_00705DF2: push ecx
  1358. loc_00705DF3: jmp 00705ECBh
  1359. loc_00705DF8: lea eax, var_44
  1360. loc_00705DFB: push eax
  1361. loc_00705DFC: push esi
  1362. loc_00705DFD: call 00704FA0h
  1363. loc_00705E02: mov eax, var_44
  1364. loc_00705E05: lea ecx, arg_C
  1365. loc_00705E08: mov var_90, ecx
  1366. loc_00705E0E: lea ecx, var_48
  1367. loc_00705E11: push ecx
  1368. loc_00705E12: lea ecx, var_98
  1369. loc_00705E18: mov var_98, 00004002h
  1370. loc_00705E22: mov edx, [eax]
  1371. loc_00705E24: push ecx
  1372. loc_00705E25: push eax
  1373. loc_00705E26: mov var_C8, eax
  1374. loc_00705E2C: call [edx+00000028h]
  1375. loc_00705E2F: test eax, eax
  1376. loc_00705E31: fnclex
  1377. loc_00705E33: jge 00705E4Ah
  1378. loc_00705E35: mov edx, var_C8
  1379. loc_00705E3B: push 00000028h
  1380. loc_00705E3D: push 00446E8Ch
  1381. loc_00705E42: push edx
  1382. loc_00705E43: push eax
  1383. loc_00705E44: call [004010CCh] ; __vbaHresultCheckObj
  1384. loc_00705E4A: mov eax, var_48
  1385. loc_00705E4D: lea edx, var_AC
  1386. loc_00705E53: push edx
  1387. loc_00705E54: push eax
  1388. loc_00705E55: mov ecx, [eax]
  1389. loc_00705E57: mov var_D0, eax
  1390. loc_00705E5D: call [ecx+00000024h]
  1391. loc_00705E60: test eax, eax
  1392. loc_00705E62: fnclex
  1393. loc_00705E64: jge 00705E7Bh
  1394. loc_00705E66: mov ecx, var_D0
  1395. loc_00705E6C: push 00000024h
  1396. loc_00705E6E: push 00446E9Ch
  1397. loc_00705E73: push ecx
  1398. loc_00705E74: push eax
  1399. loc_00705E75: call [004010CCh] ; __vbaHresultCheckObj
  1400. loc_00705E7B: lea edx, var_BC
  1401. loc_00705E81: push edx
  1402. loc_00705E82: push esi
  1403. loc_00705E83: call 007050B0h
  1404. loc_00705E88: mov eax, var_BC
  1405. loc_00705E8E: mov ecx, var_B8
  1406. loc_00705E94: mov var_50, eax
  1407. loc_00705E97: mov var_4C, ecx
  1408. loc_00705E9A: movsx eax, var_AC
  1409. loc_00705EA1: mov var_108, eax
  1410. loc_00705EA7: lea edx, var_58
  1411. loc_00705EAA: fild real4 ptr var_108
  1412. loc_00705EB0: push edx
  1413. loc_00705EB1: mov var_58, 00000007h
  1414. loc_00705EB8: fstp real8 ptr var_110
  1415. loc_00705EBE: mov ecx, var_10C
  1416. loc_00705EC4: mov edx, var_110
  1417. loc_00705ECA: push ecx
  1418. loc_00705ECB: push edx
  1419. loc_00705ECC: lea eax, var_68
  1420. loc_00705ECF: push 00446E44h ; "ww"
  1421. loc_00705ED4: push eax
  1422. loc_00705ED5: call edi
  1423. loc_00705ED7: lea ecx, var_68
  1424. loc_00705EDA: lea edx, var_78
  1425. loc_00705EDD: push ecx
  1426. loc_00705EDE: push BFF00000h
  1427. loc_00705EE3: push 00000000h
  1428. loc_00705EE5: push 00446E3Ch ; "d"
  1429. loc_00705EEA: push edx
  1430. loc_00705EEB: call edi
  1431. loc_00705EED: lea eax, var_78
  1432. loc_00705EF0: push eax
  1433. loc_00705EF1: call [004012B8h] ; __vbaDateVar
  1434. loc_00705EF7: sub esp, 00000008h
  1435. loc_00705EFA: fstp real8 ptr [esp]
  1436. loc_00705EFD: push esi
  1437. loc_00705EFE: call 007051D0h
  1438. loc_00705F03: lea ecx, var_48
  1439. loc_00705F06: lea edx, var_44
  1440. loc_00705F09: push ecx
  1441. loc_00705F0A: push edx
  1442. loc_00705F0B: push 00000002h
  1443. loc_00705F0D: call [00401068h] ; __vbaFreeObjList
  1444. loc_00705F13: lea eax, var_78
  1445. loc_00705F16: lea ecx, var_68
  1446. loc_00705F19: push eax
  1447. loc_00705F1A: lea edx, var_58
  1448. loc_00705F1D: push ecx
  1449. loc_00705F1E: push edx
  1450. loc_00705F1F: push 00000003h
  1451. loc_00705F21: call ebx
  1452. loc_00705F23: add esp, 0000001Ch
  1453. loc_00705F26: lea eax, var_BC
  1454. loc_00705F2C: push eax
  1455. loc_00705F2D: push esi
  1456. loc_00705F2E: call 007050B0h
  1457. loc_00705F33: mov ecx, var_BC
  1458. loc_00705F39: mov edx, var_B8
  1459. loc_00705F3F: lea eax, var_58
  1460. loc_00705F42: mov var_50, ecx
  1461. loc_00705F45: push eax
  1462. loc_00705F46: push BFF00000h
  1463. loc_00705F4B: push 00000000h
  1464. loc_00705F4D: lea ecx, var_68
  1465. loc_00705F50: push 00446E44h ; "ww"
  1466. loc_00705F55: push ecx
  1467. loc_00705F56: mov var_4C, edx
  1468. loc_00705F59: mov var_58, 00000007h
  1469. loc_00705F60: call edi
  1470. loc_00705F62: lea edx, var_68
  1471. loc_00705F65: push edx
  1472. loc_00705F66: call [004012B8h] ; __vbaDateVar
  1473. loc_00705F6C: sub esp, 00000008h
  1474. loc_00705F6F: fstp real8 ptr [esp]
  1475. loc_00705F72: push esi
  1476. loc_00705F73: call 00704EE0h
  1477. loc_00705F78: lea eax, var_68
  1478. loc_00705F7B: lea ecx, var_58
  1479. loc_00705F7E: push eax
  1480. loc_00705F7F: push ecx
  1481. loc_00705F80: push 00000002h
  1482. loc_00705F82: call ebx
  1483. loc_00705F84: add esp, 0000000Ch
  1484. loc_00705F87: mov [esi+0000006Ch], FFFFFFh
  1485. loc_00705F8D: fwait
  1486. loc_00705F8E: push 00706203h
  1487. loc_00705F93: jmp 007061F2h
  1488. loc_00705F98: lea edx, var_BC
  1489. loc_00705F9E: push edx
  1490. loc_00705F9F: push esi
  1491. loc_00705FA0: call 007050B0h
  1492. loc_00705FA5: mov eax, var_BC
  1493. loc_00705FAB: mov ecx, var_B8
  1494. loc_00705FB1: lea edx, var_58
  1495. loc_00705FB4: mov var_50, eax
  1496. loc_00705FB7: push edx
  1497. loc_00705FB8: push 3FF00000h
  1498. loc_00705FBD: push 00000000h
  1499. loc_00705FBF: lea eax, var_68
  1500. loc_00705FC2: push 00446E18h ; "m"
  1501. loc_00705FC7: push eax
  1502. loc_00705FC8: mov var_4C, ecx
  1503. loc_00705FCB: mov var_58, 00000007h
  1504. loc_00705FD2: call edi
  1505. loc_00705FD4: lea ecx, var_68
  1506. loc_00705FD7: lea edx, var_78
  1507. loc_00705FDA: push ecx
  1508. loc_00705FDB: push BFF00000h
  1509. loc_00705FE0: push 00000000h
  1510. loc_00705FE2: push 00446E3Ch ; "d"
  1511. loc_00705FE7: push edx
  1512. loc_00705FE8: call edi
  1513. loc_00705FEA: lea eax, var_78
  1514. loc_00705FED: push eax
  1515. loc_00705FEE: call [004012B8h] ; __vbaDateVar
  1516. loc_00705FF4: sub esp, 00000008h
  1517. loc_00705FF7: fstp real8 ptr [esp]
  1518. loc_00705FFA: push esi
  1519. loc_00705FFB: call 007051D0h
  1520. loc_00706000: lea ecx, var_78
  1521. loc_00706003: lea edx, var_68
  1522. loc_00706006: push ecx
  1523. loc_00706007: lea eax, var_58
  1524. loc_0070600A: push edx
  1525. loc_0070600B: push eax
  1526. loc_0070600C: push 00000003h
  1527. loc_0070600E: call ebx
  1528. loc_00706010: add esp, 00000010h
  1529. loc_00706013: lea ecx, var_BC
  1530. loc_00706019: push ecx
  1531. loc_0070601A: push esi
  1532. loc_0070601B: call 007050B0h
  1533. loc_00706020: mov edx, var_BC
  1534. loc_00706026: mov eax, var_B8
  1535. loc_0070602C: mov var_50, edx
  1536. loc_0070602F: lea ecx, var_58
  1537. loc_00706032: lea edx, var_68
  1538. loc_00706035: push ecx
  1539. loc_00706036: push edx
  1540. loc_00706037: mov var_4C, eax
  1541. loc_0070603A: mov var_58, 00000007h
  1542. loc_00706041: call [004013F8h] ; rtcGetMonthOfYear
  1543. loc_00706047: mov eax, var_14
  1544. loc_0070604A: test eax, eax
  1545. loc_0070604C: jnz 0070605Dh
  1546. loc_0070604E: lea eax, var_14
  1547. loc_00706051: push eax
  1548. loc_00706052: push 00414738h
  1549. loc_00706057: call [004012FCh] ; __vbaNew2
  1550. loc_0070605D: lea ecx, var_3C
  1551. loc_00706060: lea edx, var_30
  1552. loc_00706063: push ecx
  1553. loc_00706064: mov ecx, arg_10
  1554. loc_00706067: lea eax, var_28
  1555. loc_0070606A: push edx
  1556. loc_0070606B: mov edx, arg_1C
  1557. loc_0070606E: push eax
  1558. loc_0070606F: push ecx
  1559. loc_00706070: lea eax, var_68
  1560. loc_00706073: push edx
  1561. loc_00706074: push eax
  1562. loc_00706075: call [0040134Ch] ; __vbaI4Var
  1563. loc_0070607B: mov ecx, var_14
  1564. loc_0070607E: push eax
  1565. loc_0070607F: push ecx
  1566. loc_00706080: call 00703FB0h
  1567. loc_00706085: lea edx, var_68
  1568. loc_00706088: lea eax, var_58
  1569. loc_0070608B: push edx
  1570. loc_0070608C: push eax
  1571. loc_0070608D: push 00000002h
  1572. loc_0070608F: call ebx
  1573. loc_00706091: mov eax, var_30
  1574. loc_00706094: add esp, 0000000Ch
  1575. loc_00706097: cmp eax, FFFFFFFFh
  1576. loc_0070609A: jnz 0070610Eh
  1577. loc_0070609C: lea ecx, var_BC
  1578. loc_007060A2: push ecx
  1579. loc_007060A3: push esi
  1580. loc_007060A4: call 007050B0h
  1581. loc_007060A9: mov edx, var_BC
  1582. loc_007060AF: mov eax, var_B8
  1583. loc_007060B5: lea ecx, var_58
  1584. loc_007060B8: mov var_50, edx
  1585. loc_007060BB: push ecx
  1586. loc_007060BC: push C01C0000h
  1587. loc_007060C1: push 00000000h
  1588. loc_007060C3: lea edx, var_68
  1589. loc_007060C6: push 00446E3Ch ; "d"
  1590. loc_007060CB: push edx
  1591. loc_007060CC: mov var_4C, eax
  1592. loc_007060CF: mov var_58, 00000007h
  1593. loc_007060D6: call edi
  1594. loc_007060D8: lea eax, var_68
  1595. loc_007060DB: push eax
  1596. loc_007060DC: call [004012B8h] ; __vbaDateVar
  1597. loc_007060E2: sub esp, 00000008h
  1598. loc_007060E5: fstp real8 ptr [esp]
  1599. loc_007060E8: push esi
  1600. loc_007060E9: call 00704EE0h
  1601. loc_007060EE: lea ecx, var_68
  1602. loc_007060F1: lea edx, var_58
  1603. loc_007060F4: push ecx
  1604. loc_007060F5: push edx
  1605. loc_007060F6: push 00000002h
  1606. loc_007060F8: call ebx
  1607. loc_007060FA: add esp, 0000000Ch
  1608. loc_007060FD: mov [esi+0000006Ch], FFFFFFh
  1609. loc_00706103: fwait
  1610. loc_00706104: push 00706203h
  1611. loc_00706109: jmp 007061F2h
  1612. loc_0070610E: lea eax, var_BC
  1613. loc_00706114: push eax
  1614. loc_00706115: push esi
  1615. loc_00706116: call 007050B0h
  1616. loc_0070611B: mov ecx, var_BC
  1617. loc_00706121: mov edx, var_B8
  1618. loc_00706127: lea eax, var_58
  1619. loc_0070612A: mov var_50, ecx
  1620. loc_0070612D: push eax
  1621. loc_0070612E: push BFF00000h
  1622. loc_00706133: push 00000000h
  1623. loc_00706135: lea ecx, var_68
  1624. loc_00706138: push 00446E18h ; "m"
  1625. loc_0070613D: push ecx
  1626. loc_0070613E: mov var_4C, edx
  1627. loc_00706141: mov var_58, 00000007h
  1628. loc_00706148: call edi
  1629. loc_0070614A: lea edx, var_68
  1630. loc_0070614D: lea eax, var_78
  1631. loc_00706150: push edx
  1632. loc_00706151: push eax
  1633. loc_00706152: call [004013F8h] ; rtcGetMonthOfYear
  1634. loc_00706158: mov ecx, var_28
  1635. loc_0070615B: mov edi, [004011E4h] ; __vbaI2I4
  1636. loc_00706161: call edi
  1637. loc_00706163: lea ecx, var_78
  1638. loc_00706166: push eax
  1639. loc_00706167: push ecx
  1640. loc_00706168: call [004012C0h] ; __vbaI2Var
  1641. loc_0070616E: mov ecx, var_3C
  1642. loc_00706171: push eax
  1643. loc_00706172: call edi
  1644. loc_00706174: lea edx, var_88
  1645. loc_0070617A: push eax
  1646. loc_0070617B: push edx
  1647. loc_0070617C: call [004012CCh] ; rtcPackDate
  1648. loc_00706182: lea eax, var_88
  1649. loc_00706188: push eax
  1650. loc_00706189: call [004012B8h] ; __vbaDateVar
  1651. loc_0070618F: sub esp, 00000008h
  1652. loc_00706192: fstp real8 ptr [esp]
  1653. loc_00706195: push esi
  1654. loc_00706196: call 00704EE0h
  1655. loc_0070619B: lea ecx, var_88
  1656. loc_007061A1: lea edx, var_78
  1657. loc_007061A4: push ecx
  1658. loc_007061A5: lea eax, var_68
  1659. loc_007061A8: push edx
  1660. loc_007061A9: lea ecx, var_58
  1661. loc_007061AC: push eax
  1662. loc_007061AD: push ecx
  1663. loc_007061AE: push 00000004h
  1664. loc_007061B0: call ebx
  1665. loc_007061B2: add esp, 00000014h
  1666. loc_007061B5: mov [esi+0000006Ch], FFFFFFh
  1667. loc_007061BB: push 00706203h
  1668. loc_007061C0: fwait
  1669. loc_007061C1: jmp 007061F2h
  1670. loc_007061C3: lea edx, var_48
  1671. loc_007061C6: lea eax, var_44
  1672. loc_007061C9: push edx
  1673. loc_007061CA: push eax
  1674. loc_007061CB: push 00000002h
  1675. loc_007061CD: call [00401068h] ; __vbaFreeObjList
  1676. loc_007061D3: lea ecx, var_88
  1677. loc_007061D9: lea edx, var_78
  1678. loc_007061DC: push ecx
  1679. loc_007061DD: lea eax, var_68
  1680. loc_007061E0: push edx
  1681. loc_007061E1: lea ecx, var_58
  1682. loc_007061E4: push eax
  1683. loc_007061E5: push ecx
  1684. loc_007061E6: push 00000004h
  1685. loc_007061E8: call [00401050h] ; __vbaFreeVarList
  1686. loc_007061EE: add esp, 00000020h
  1687. loc_007061F1: ret
  1688. loc_007061F2: mov esi, [0040142Ch] ; __vbaFreeObj
  1689. loc_007061F8: lea ecx, var_14
  1690. loc_007061FB: call __vbaFreeObj
  1691. loc_007061FD: lea ecx, var_2C
  1692. loc_00706200: call __vbaFreeObj
  1693. loc_00706202: ret
  1694. loc_00706203: mov ecx, var_10
  1695. loc_00706206: pop edi
  1696. loc_00706207: pop esi
  1697. loc_00706208: xor eax, eax
  1698. loc_0070620A: mov fs:[00000000h], ecx
  1699. loc_00706211: pop ebx
  1700. loc_00706212: mov esp, ebp
  1701. loc_00706214: pop ebp
  1702. loc_00706215: retn 0020h
  1703. End Function