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.

143 lines
4.3 KiB

  1. VERSION 5.00
  2. Object = "{831FDD16-0C5C-11D2-A9FC0000F8754DA1}#2.0#0"; "C:\Program Files (x86)\BonziBuddy432\MSCOMCTL.OCX"
  3. Begin VB.Form frmProgress
  4. Caption = "BonziBUDDY Update Progress"
  5. ScaleMode = 1
  6. AutoRedraw = False
  7. FontTransparent = True
  8. BorderStyle = 1 'Fixed Single
  9. Icon = "frmProgress.frx":0000
  10. LinkTopic = "Form1"
  11. MaxButton = 0 'False
  12. ClientLeft = 45
  13. ClientTop = 330
  14. ClientWidth = 3825
  15. ClientHeight = 900
  16. LockControls = -1 'True
  17. StartUpPosition = 2 'CenterScreen
  18. Begin VB.Frame fraProgress
  19. Caption = "Update Progress"
  20. Left = 120
  21. Top = 90
  22. Width = 3585
  23. Height = 675
  24. TabIndex = 0
  25. Begin MSComctlLib.ProgressBar prgDL
  26. Left = 150
  27. Top = 240
  28. Width = 3315
  29. Height = 315
  30. TabIndex = 1
  31. OleObjectBlob = "frmProgress.frx":08CA
  32. End
  33. End
  34. End
  35. Attribute VB_Name = "frmProgress"
  36. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) '5BEB60
  37. loc_005BEB60: push ebp
  38. loc_005BEB61: mov ebp, esp
  39. loc_005BEB63: sub esp, 00000018h
  40. loc_005BEB66: push 00412856h ; __vbaExceptHandler
  41. loc_005BEB6B: mov eax, fs:[00000000h]
  42. loc_005BEB71: push eax
  43. loc_005BEB72: mov fs:[00000000h], esp
  44. loc_005BEB79: mov eax, 00000014h
  45. loc_005BEB7E: call 00412850h ; __vbaChkstk
  46. loc_005BEB83: push ebx
  47. loc_005BEB84: push esi
  48. loc_005BEB85: push edi
  49. loc_005BEB86: mov var_18, esp
  50. loc_005BEB89: mov var_14, 00401528h
  51. loc_005BEB90: mov eax, Me
  52. loc_005BEB93: and eax, 00000001h
  53. loc_005BEB96: mov var_10, eax
  54. loc_005BEB99: mov ecx, Me
  55. loc_005BEB9C: and ecx, FFFFFFFEh
  56. loc_005BEB9F: mov Me, ecx
  57. loc_005BEBA2: mov var_C, 00000000h
  58. loc_005BEBA9: mov edx, Me
  59. loc_005BEBAC: mov eax, [edx]
  60. loc_005BEBAE: mov ecx, Me
  61. loc_005BEBB1: push ecx
  62. loc_005BEBB2: call [eax+00000004h]
  63. loc_005BEBB5: mov var_4, 00000001h
  64. loc_005BEBBC: mov var_4, 00000002h
  65. loc_005BEBC3: push FFFFFFFFh
  66. loc_005BEBC5: call [00401124h] ; __vbaOnError
  67. loc_005BEBCB: mov var_4, 00000003h
  68. loc_005BEBD2: mov edx, UnloadMode
  69. loc_005BEBD5: movsx eax, [edx]
  70. loc_005BEBD8: cmp eax, 00000001h
  71. loc_005BEBDB: jz 005BEBFCh
  72. loc_005BEBDD: mov var_4, 00000004h
  73. loc_005BEBE4: mov [0073A0D0h], FFFFFFh
  74. loc_005BEBED: mov var_4, 00000005h
  75. loc_005BEBF4: mov ecx, Cancel
  76. loc_005BEBF7: mov [ecx], 0001h
  77. loc_005BEBFC: mov var_10, 00000000h
  78. loc_005BEC03: mov edx, Me
  79. loc_005BEC06: mov eax, [edx]
  80. loc_005BEC08: mov ecx, Me
  81. loc_005BEC0B: push ecx
  82. loc_005BEC0C: call [eax+00000008h]
  83. loc_005BEC0F: mov eax, var_10
  84. loc_005BEC12: mov ecx, var_20
  85. loc_005BEC15: mov fs:[00000000h], ecx
  86. loc_005BEC1C: pop edi
  87. loc_005BEC1D: pop esi
  88. loc_005BEC1E: pop ebx
  89. loc_005BEC1F: mov esp, ebp
  90. loc_005BEC21: pop ebp
  91. loc_005BEC22: retn 000Ch
  92. End Sub
  93. Private Sub Form_Activate() '5BEAC0
  94. loc_005BEAC0: push ebp
  95. loc_005BEAC1: mov ebp, esp
  96. loc_005BEAC3: sub esp, 00000018h
  97. loc_005BEAC6: push 00412856h ; __vbaExceptHandler
  98. loc_005BEACB: mov eax, fs:[00000000h]
  99. loc_005BEAD1: push eax
  100. loc_005BEAD2: mov fs:[00000000h], esp
  101. loc_005BEAD9: mov eax, 00000014h
  102. loc_005BEADE: call 00412850h ; __vbaChkstk
  103. loc_005BEAE3: push ebx
  104. loc_005BEAE4: push esi
  105. loc_005BEAE5: push edi
  106. loc_005BEAE6: mov var_18, esp
  107. loc_005BEAE9: mov var_14, 004014F8h
  108. loc_005BEAF0: mov eax, Me
  109. loc_005BEAF3: and eax, 00000001h
  110. loc_005BEAF6: mov var_10, eax
  111. loc_005BEAF9: mov ecx, Me
  112. loc_005BEAFC: and ecx, FFFFFFFEh
  113. loc_005BEAFF: mov Me, ecx
  114. loc_005BEB02: mov var_C, 00000000h
  115. loc_005BEB09: mov edx, Me
  116. loc_005BEB0C: mov eax, [edx]
  117. loc_005BEB0E: mov ecx, Me
  118. loc_005BEB11: push ecx
  119. loc_005BEB12: call [eax+00000004h]
  120. loc_005BEB15: mov var_4, 00000001h
  121. loc_005BEB1C: mov var_4, 00000002h
  122. loc_005BEB23: push FFFFFFFFh
  123. loc_005BEB25: call [00401124h] ; __vbaOnError
  124. loc_005BEB2B: mov var_10, 00000000h
  125. loc_005BEB32: mov edx, Me
  126. loc_005BEB35: mov eax, [edx]
  127. loc_005BEB37: mov ecx, Me
  128. loc_005BEB3A: push ecx
  129. loc_005BEB3B: call [eax+00000008h]
  130. loc_005BEB3E: mov eax, var_10
  131. loc_005BEB41: mov ecx, var_20
  132. loc_005BEB44: mov fs:[00000000h], ecx
  133. loc_005BEB4B: pop edi
  134. loc_005BEB4C: pop esi
  135. loc_005BEB4D: pop ebx
  136. loc_005BEB4E: mov esp, ebp
  137. loc_005BEB50: pop ebp
  138. loc_005BEB51: retn 0004h
  139. End Sub