Initial import, raw disassembly
This commit is contained in:
35 files changed
+28732
No files matched your search
@@ -0,0 +1,346 @@
|
||||
VERSION 5.00
|
||||
Begin VB.Form Backdrop
|
||||
BackColor = &H0&
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Icon = "Backdrop.frx":0
|
||||
LinkTopic = "Form1"
|
||||
ControlBox = 0 'False
|
||||
Tag = "backdrop"
|
||||
ClientLeft = 2220
|
||||
ClientTop = 450
|
||||
ClientWidth = 11220
|
||||
ClientHeight = 8685
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox tempLoad
|
||||
BackColor = &H80000005&
|
||||
ForeColor = &H80000008&
|
||||
Left = 300
|
||||
Top = 3840
|
||||
Width = 1755
|
||||
Height = 1515
|
||||
Visible = 0 'False
|
||||
TabIndex = 1
|
||||
ScaleMode = 3
|
||||
AutoRedraw = True
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin Timer tmrActivate
|
||||
Interval = 1
|
||||
Left = 4200
|
||||
Top = 4680
|
||||
End
|
||||
Begin Image cursorBlank
|
||||
Picture = "Backdrop.frx":8CA
|
||||
Left = 2790
|
||||
Top = 2100
|
||||
Width = 480
|
||||
Height = 480
|
||||
Visible = 0 'False
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin Label devLabel
|
||||
Caption = "BackDrop"
|
||||
BackColor = &H0&
|
||||
ForeColor = &HFFFFFF&
|
||||
Left = 960
|
||||
Top = 660
|
||||
Width = 2655
|
||||
Height = 690
|
||||
Visible = 0 'False
|
||||
TabIndex = 0
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "MS Sans Serif"
|
||||
Size = 29.25
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
Begin Image cursorNormal
|
||||
Picture = "Backdrop.frx":BD4
|
||||
Left = 3360
|
||||
Top = 2160
|
||||
Width = 480
|
||||
Height = 480
|
||||
Visible = 0 'False
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin Image cursorMove
|
||||
Picture = "Backdrop.frx":D26
|
||||
Left = 3840
|
||||
Top = 2160
|
||||
Width = 480
|
||||
Height = 480
|
||||
Visible = 0 'False
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
|
||||
Attribute VB_Name = "Backdrop"
|
||||
|
||||
'VA: 40F46C
|
||||
Private Declare Function KillTimer Lib "user32" Alias "KillTimer" (ByVal hwnd As Long, ByVal nIDEvent As Long) As Long
|
||||
'VA: 40F428
|
||||
Private Declare Function SetTimer Lib "user32" Alias "SetTimer" (ByVal hWnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long
|
||||
'VA: 40E2F4
|
||||
Private Declare Function FillRect Lib "user32" Alias "FillRect" (ByVal hdc As Long, lpRect As RECT, ByVal hBrush As Long) As Long
|
||||
'VA: 40E2B0
|
||||
Private Declare Function CreateFontIndirect Lib "gdi32" Alias "CreateFontIndirectA" (lpLogFont As LOGFONT) As Long
|
||||
'VA: 40E248
|
||||
Private Declare Function SetBkMode Lib "gdi32" Alias "SetBkMode" (ByVal hdc As Long, ByVal nBkMode As Long) As Long
|
||||
'VA: 40E204
|
||||
Private Declare Function SetBkColor Lib "gdi32" Alias "SetBkColor" (ByVal hdc As Long, ByVal crColor As Long) As Long
|
||||
'VA: 40E1C0
|
||||
Private Declare Function SetTextColor Lib "gdi32" Alias "SetTextColor" (ByVal hdc As Long, ByVal crColor As Long) As Long
|
||||
'VA: 40E178
|
||||
Private Declare Function SetTextCharacterExtra Lib "gdi32" Alias "SetTextCharacterExtraA" (ByVal hdc As Long, ByVal nCharExtra As Long) As Long
|
||||
'VA: 40E128
|
||||
Private Declare Function TextOut Lib "gdi32" Alias "TextOutA" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal lpString As String, ByVal nCount As Long) As Long
|
||||
'VA: 40E0E4
|
||||
Private Declare Function SetPixel Lib "gdi32" Alias "SetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
|
||||
'VA: 40E088
|
||||
Private Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
|
||||
'VA: 40E044
|
||||
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
|
||||
'VA: 40DFFC
|
||||
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
|
||||
'VA: 40DFB4
|
||||
Private Declare Function GetDesktopWindow Lib "user32" Alias "GetDesktopWindow" () As Long
|
||||
'VA: 40DF68
|
||||
Private Declare Function ReleaseDC Lib "user32" Alias "ReleaseDC" (ByVal hwnd As Long, ByVal hdc As Long) As Long
|
||||
'VA: 40DF24
|
||||
Private Declare Function GetWindowDC Lib "user32" Alias "GetWindowDC" (ByVal hwnd As Long) As Long
|
||||
'VA: 40DEC8
|
||||
Private Declare Function GetDC Lib "user32" Alias "GetDC" (ByVal hwnd As Long) As Long
|
||||
'VA: 40DE88
|
||||
Private Declare Function CreateIC Lib "gdi32" Alias "CreateICA" (ByVal lpDriverName As String, ByVal lpDeviceName As String, ByVal lpOutput As String, lpInitData As DEVMODE) As Long
|
||||
'VA: 40DE44
|
||||
Private Declare Function CreateBitmapIndirect Lib "gdi32" Alias "CreateBitmapIndirect" (lpBitmap As BITMAP) As Long
|
||||
'VA: 40DDF4
|
||||
Private Declare Function CreateCompatibleBitmap Lib "gdi32" Alias "CreateCompatibleBitmap" (ByVal hdc As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long
|
||||
'VA: 40DDA4
|
||||
Private Declare Function CreateBitmap Lib "gdi32" Alias "CreateBitmap" (ByVal nWidth As Long, ByVal nHeight As Long, ByVal nPlanes As Long, ByVal nBitCount As Long, lpBits As Any) As Long
|
||||
'VA: 40DD5C
|
||||
Private Declare Function BitBlt Lib "gdi32" Alias "BitBlt" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
|
||||
'VA: 40DCEC
|
||||
Private Declare Function GetClientRect Lib "user32" Alias "GetClientRect" (ByVal hwnd As Long, lpRect As RECT) As Long
|
||||
'VA: 40DCA4
|
||||
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
|
||||
'VA: 40DB64
|
||||
Private Declare Function GetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Long, lpRect As RECT) As Long
|
||||
'VA: 40DB30
|
||||
Private Declare Sub _MIDASremoveEchoEffect@4 Lib "midas11.dll"()
|
||||
'VA: 40DADC
|
||||
Private Declare Sub _MIDASaddEchoEffect@4 Lib "midas11.dll"()
|
||||
'VA: 40DA8C
|
||||
Private Declare Sub _MIDASresumeStream@4 Lib "midas11.dll"()
|
||||
'VA: 40DA3C
|
||||
Private Declare Sub _MIDASpauseStream@4 Lib "midas11.dll"()
|
||||
'VA: 40D9F0
|
||||
Private Declare Sub _MIDASgetStreamBytesBuffered@4 Lib "midas11.dll"()
|
||||
'VA: 40D998
|
||||
Private Declare Sub _MIDASsetStreamPanning@8 Lib "midas11.dll"()
|
||||
'VA: 40D944
|
||||
Private Declare Sub _MIDASsetStreamVolume@8 Lib "midas11.dll"()
|
||||
'VA: 40D8F4
|
||||
Private Declare Sub _MIDASsetStreamRate@8 Lib "midas11.dll"()
|
||||
'VA: 40D8A4
|
||||
Private Declare Sub _MIDASfeedStreamData@16 Lib "midas11.dll"()
|
||||
'VA: 40D854
|
||||
Private Declare Sub _MIDASplayStreamPolling@12 Lib "midas11.dll"()
|
||||
'VA: 40D800
|
||||
Private Declare Sub _MIDASstopStream@4 Lib "midas11.dll"()
|
||||
'VA: 40D7CC
|
||||
Private Declare Sub _MIDASplayStreamWaveFile@12 Lib "midas11.dll"()
|
||||
'VA: 40D778
|
||||
Private Declare Sub _MIDASplayStreamFile@20 Lib "midas11.dll"()
|
||||
'VA: 40D728
|
||||
Private Declare Sub _MIDASgetSamplePlayStatus@4 Lib "midas11.dll"()
|
||||
'VA: 40D6D4
|
||||
Private Declare Sub _MIDASsetSamplePriority@8 Lib "midas11.dll"()
|
||||
'VA: 40D680
|
||||
Private Declare Sub _MIDASsetSamplePanning@8 Lib "midas11.dll"()
|
||||
'VA: 40D62C
|
||||
Private Declare Sub _MIDASsetSampleVolume@8 Lib "midas11.dll"()
|
||||
'VA: 40D5F8
|
||||
Private Declare Sub _MIDASsetSampleRate@8 Lib "midas11.dll"()
|
||||
'VA: 40D5A8
|
||||
Private Declare Sub _MIDASstopSample@4 Lib "midas11.dll"()
|
||||
'VA: 40D55C
|
||||
Private Declare Sub _MIDASplaySample@24 Lib "midas11.dll"()
|
||||
'VA: 40D510
|
||||
Private Declare Sub _MIDASfreeAutoEffectChannels@0 Lib "midas11.dll"()
|
||||
'VA: 40D4B8
|
||||
Private Declare Sub _MIDASallocAutoEffectChannels@4 Lib "midas11.dll"()
|
||||
'VA: 40D460
|
||||
Private Declare Sub _MIDASfreeSample@4 Lib "midas11.dll"()
|
||||
'VA: 40D3F4
|
||||
Private Declare Sub _MIDASloadWaveSample@8 Lib "midas11.dll"()
|
||||
'VA: 40D3A4
|
||||
Private Declare Sub _MIDASloadRawSample@12 Lib "midas11.dll"()
|
||||
'VA: 40D354
|
||||
Private Declare Sub _MIDASfadeMusicChannel@12 Lib "midas11.dll"()
|
||||
'VA: 40D300
|
||||
Private Declare Sub _MIDASgetInstrumentInfo@12 Lib "midas11.dll"()
|
||||
'VA: 40D2AC
|
||||
Private Declare Sub _MIDASgetModuleInfo@8 Lib "midas11.dll"()
|
||||
'VA: 40D244
|
||||
Private Declare Sub _MIDASsetMusicVolume@8 Lib "midas11.dll"()
|
||||
'VA: 40D1F4
|
||||
Private Declare Sub _MIDASsetPosition@8 Lib "midas11.dll"()
|
||||
'VA: 40D1A8
|
||||
Private Declare Sub _MIDASgetPlayStatus@8 Lib "midas11.dll"()
|
||||
'VA: 40D158
|
||||
Private Declare Sub _MIDASfreeModule@4 Lib "midas11.dll"()
|
||||
'VA: 40D10C
|
||||
Private Declare Sub _MIDASstopModule@4 Lib "midas11.dll"()
|
||||
'VA: 40D0C0
|
||||
Private Declare Sub _MIDASplayModuleSection@20 Lib "midas11.dll"()
|
||||
'VA: 40D078
|
||||
Private Declare Sub _MIDASplayModule@8 Lib "midas11.dll"()
|
||||
'VA: 40D02C
|
||||
Private Declare Sub _MIDASloadModule@4 Lib "midas11.dll"()
|
||||
'VA: 40CFE0
|
||||
Private Declare Sub _MIDASfreeChannel@4 Lib "midas11.dll"()
|
||||
'VA: 40CF94
|
||||
Private Declare Sub _MIDASallocateChannel@0 Lib "midas11.dll"()
|
||||
'VA: 40CF44
|
||||
Private Declare Sub _MIDASgetVersionString@0 Lib "midas11.dll"()
|
||||
'VA: 40CEF0
|
||||
Private Declare Sub _MIDASunlock@0 Lib "midas11.dll"()
|
||||
'VA: 40CE7C
|
||||
Private Declare Sub _MIDASlock@0 Lib "midas11.dll"()
|
||||
'VA: 40CE34
|
||||
Private Declare Sub _MIDASpoll@0 Lib "midas11.dll"()
|
||||
'VA: 40CDEC
|
||||
Private Declare Sub _MIDASstopBackgroundPlay@0 Lib "midas11.dll"()
|
||||
'VA: 40CD98
|
||||
Private Declare Sub _MIDASstartBackgroundPlay@4 Lib "midas11.dll"()
|
||||
'VA: 40CD44
|
||||
Private Declare Sub _MIDASsetAmplification@4 Lib "midas11.dll"()
|
||||
'VA: 40CCF0
|
||||
Private Declare Sub _MIDAScloseChannels@0 Lib "midas11.dll"()
|
||||
'VA: 40CCA0
|
||||
Private Declare Sub _MIDASopenChannels@4 Lib "midas11.dll"()
|
||||
'VA: 40CC50
|
||||
Private Declare Sub _MIDASresume@0 Lib "midas11.dll"()
|
||||
'VA: 40CC08
|
||||
Private Declare Sub _MIDASclose@0 Lib "midas11.dll"()
|
||||
'VA: 40CBC0
|
||||
Private Declare Sub _MIDASgetOption@4 Lib "midas11.dll"()
|
||||
'VA: 40CB74
|
||||
Private Declare Sub _MIDASsetOption@8 Lib "midas11.dll"()
|
||||
'VA: 40CB28
|
||||
Private Declare Sub _MIDASinit@0 Lib "midas11.dll"()
|
||||
'VA: 40CAE0
|
||||
Private Declare Sub _MIDASwriteConfigRegistry@8 Lib "midas11.dll"()
|
||||
'VA: 40CA8C
|
||||
Private Declare Sub _MIDASreadConfigRegistry@8 Lib "midas11.dll"()
|
||||
'VA: 40CA38
|
||||
Private Declare Sub _MIDASsaveConfig@4 Lib "midas11.dll"()
|
||||
'VA: 40C9EC
|
||||
Private Declare Sub _MIDASloadConfig@4 Lib "midas11.dll"()
|
||||
'VA: 40C9A0
|
||||
Private Declare Sub _MIDASconfig@0 Lib "midas11.dll"()
|
||||
'VA: 40C948
|
||||
Private Declare Sub _MIDASstartup@0 Lib "midas11.dll"()
|
||||
'VA: 40C900
|
||||
Private Declare Sub _MIDASgetErrorMessage@4 Lib "midas11.dll"()
|
||||
'VA: 40C8B0
|
||||
Private Declare Sub _MIDASgetLastError@0 Lib "midas11.dll"()
|
||||
'VA: 40C7C8
|
||||
Private Declare Function GetObject Lib "gdi32" Alias "GetObjectA" (ByVal hObject As Long, ByVal nCount As Long, lpObject As Any) As Long
|
||||
'VA: 40C774
|
||||
Private Declare Function GetStretchBltMode Lib "gdi32" Alias "GetStretchBltMode" (ByVal hdc As Long) As Long
|
||||
'VA: 40C730
|
||||
Private Declare Function DeleteDC Lib "gdi32" Alias "DeleteDC" (ByVal hdc As Long) As Long
|
||||
'VA: 40C6EC
|
||||
Private Declare Function CreateCompatibleDC Lib "gdi32" Alias "CreateCompatibleDC" (ByVal hdc As Long) As Long
|
||||
'VA: 40C6A0
|
||||
Private Declare Function DeleteObject Lib "gdi32" Alias "DeleteObject" (ByVal hObject As Long) As Long
|
||||
'VA: 40C658
|
||||
Private Declare Function SelectObject Lib "gdi32" Alias "SelectObject" (ByVal hdc As Long, ByVal hObject As Long) As Long
|
||||
'VA: 40C610
|
||||
Private Declare Function LoadImage Lib "user32" Alias "LoadImageA" (ByVal hInst As Long, ByVal lpsz As String, ByVal un1 As Long, ByVal n1 As Long, ByVal n2 As Long, ByVal un2 As Long) As Long
|
||||
'VA: 40C1C0
|
||||
Private Declare Function GetMapMode Lib "gdi32" Alias "GetMapMode" (ByVal hdc As Long) As Long
|
||||
'VA: 40C18C
|
||||
Private Declare Function QueryPerformanceCounter Lib "kernel32" Alias "QueryPerformanceCounter" (lpPerformanceCount As LARGE_INTEGER) As Long
|
||||
'VA: 40BF84
|
||||
Private Declare Function SetWindowPos Lib "user32" Alias "SetWindowPos" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
|
||||
'VA: 40BF3C
|
||||
Private Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long
|
||||
'VA: 40BEF4
|
||||
Private Declare Function SetCursorPos Lib "user32" Alias "SetCursorPos" (ByVal x As Long, ByVal y As Long) As Long
|
||||
'VA: 40BEA0
|
||||
Private Declare Function QueryPerformanceFrequency Lib "kernel32" Alias "QueryPerformanceFrequency" (lpFrequency As LARGE_INTEGER) As Long
|
||||
'VA: 40BDB0
|
||||
Private Declare Function SetMapMode Lib "gdi32" Alias "SetMapMode" (ByVal hdc As Long, ByVal nMapMode As Long) As Long
|
||||
|
||||
|
||||
Private Sub tmrActivate_Timer() '81D050
|
||||
loc_0081D0F6: var_eax = intro.Show var_28, var_24
|
||||
loc_0081D132: tmrActivate.Enabled = False
|
||||
loc_0081D15F: GoTo loc_0081D16B
|
||||
loc_0081D16A: Exit Sub
|
||||
loc_0081D16B: 'Referenced from: 0081D15F
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Load() '81CB30
|
||||
Dim Me As Me
|
||||
Dim var_68 As Variant
|
||||
Dim var_70 As Image
|
||||
loc_0081CB87: var_eax = Proc_884A30(edi, Me, ebx)
|
||||
loc_0081CBAB: var_eax = Proc_10_10_84A620(var_68, var_68, Proc_884A30(edi, Me, ebx))
|
||||
loc_0081CBED: var_eax = Proc_86F040(var_68, var_68, CreateObject(global_00404970, global_00886638))
|
||||
loc_0081CC3C: var_eax = Proc_847130(var_68, var_68, CreateObject(global_00404970, global_00886638))
|
||||
loc_0081CC59: var_eax = Proc_10_8_84A010(global_00886638, Proc_847130(var_68, var_68, CreateObject(global_00404970, global_00886638)), var_68)
|
||||
loc_0081CC5E: var_eax = Proc_10_7_849D50(global_0040C204, global_00886638, global_0040C7EC)
|
||||
loc_0081CC89: var_68 = Global.Screen
|
||||
loc_0081CCAB: Global.MousePointer = CInt(99)
|
||||
loc_0081CCEE: var_70 = Global.Screen
|
||||
loc_0081CD40: var_6C = cursorNormal.Picture
|
||||
loc_0081CD6D: cursorNormal.MousePointer = var_74
|
||||
loc_0081CDA7: var_eax = QueryPerformanceFrequency(global_008860D8)
|
||||
loc_0081CDB2: var_eax = Proc_9_16_846930(var_74, var_6C, var_68)
|
||||
loc_0081CDB7: var_eax = Proc_10_9_84A250(global_00886638, global_00886638, global_00886638)
|
||||
loc_0081CDBC: var_eax = Proc_868150(Proc_86F040(var_68, var_68, CreateObject(global_00404970, global_00886638)), var_68, global_0040C204)
|
||||
loc_0081CDC1: var_eax = Proc_12_49_86ECB0(global_00886638, global_0040C7EC, Me)
|
||||
loc_0081CE3A: var_eax = Unknown_VTable_Call[edi+000002A4h]
|
||||
loc_0081CE5D: var_eax = Proc_9_13_8457B0(global_00FFFFFF, Me, 0)
|
||||
loc_0081CE68: global_88659A = Proc_9_13_8457B0(global_00FFFFFF, Me, 0)
|
||||
loc_0081CE8A: var_eax = Proc_12_43_86D100(var_84, var_68, var_68)
|
||||
loc_0081CEB1: GoTo loc_0081CEDB
|
||||
loc_0081CEDA: Exit Sub
|
||||
loc_0081CEDB: 'Referenced from: 0081CEB1
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Unload(Cancel As Integer) '81CF00
|
||||
Dim var_18 As Screen
|
||||
loc_0081CF44: var_eax = Proc_86F0B0(edi, esi, ebx)
|
||||
loc_0081CF49: var_eax = Proc_86F250(, , )
|
||||
loc_0081CF4E: var_eax = Proc_847190(, , )
|
||||
loc_0081CF8F: var_eax = Proc_84AB80(var_18, var_18, global_00886638)
|
||||
loc_0081CFD7: var_18 = Global.Screen
|
||||
loc_0081CFF8: Global.MousePointer = 0
|
||||
loc_0081D015: End
|
||||
loc_0081D023: GoTo loc_0081D02F
|
||||
loc_0081D02E: Exit Sub
|
||||
loc_0081D02F: 'Referenced from: 0081D023
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '81CAB0
|
||||
loc_0081CAF6: If KeyCode = 123 Then
|
||||
loc_0081CAF8: var_eax = Proc_12_18_864A90(edi, esi, ebx)
|
||||
loc_0081CAFD: End If
|
||||
End Sub
|
||||
Binary file not shown.
Whitespace-only changes.
File diff suppressed because it is too large.
Load diff
File diff suppressed because it is too large.
Load diff
Whitespace-only changes.
File diff suppressed because it is too large.
Load diff
File renamed without changes.
Whitespace-only changes.
Whitespace-only changes.
Whitespace-only changes.
@@ -0,0 +1,62 @@
|
||||
Type=Exe
|
||||
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\WINDOWS\SYSTEM32\STDOLE2.TLB#OLE Automation
|
||||
Form=Backdrop.frm
|
||||
Form=buttons.frm
|
||||
Form=gameOptions.frm
|
||||
Form=frmMain.frm
|
||||
Form=login.frm
|
||||
Form=classicOptions.frm
|
||||
Form=scoring.frm
|
||||
Form=titleScreen.frm
|
||||
Module=generateLevels; generateLevels.bas
|
||||
Module=GraphicsFunctions; GraphicsFunctions.bas
|
||||
Module=SoundFunctions; SoundFunctions.bas
|
||||
Module=DirectDrawModule; DirectDrawModule.bas
|
||||
Module=DirectSoundModule; DirectSoundModule.bas
|
||||
Module=MainGame; MainGame.bas
|
||||
Module=Globals; Globals.bas
|
||||
Module=MiscFunctions; MiscFunctions.bas
|
||||
Module=MIDASFunctions; MIDASFunctions.bas
|
||||
Module=DefineChallengeLevels; DefineChallengeLevels.bas
|
||||
Form=intro.frm
|
||||
Form=topScores.frm
|
||||
Form=about.frm
|
||||
Form=challengeOptions.frm
|
||||
Module=versionDeclare; versionDeclare.bas
|
||||
Startup="Sub Main"
|
||||
HelpFile=""
|
||||
ExeName32="Flux.exe"
|
||||
Name="Flux"
|
||||
Title="Flux"
|
||||
VersionCompanyName="MasterWorks Software"
|
||||
MajorVer=1
|
||||
MinorVer=00
|
||||
RevisionVer=0078
|
||||
Command32 = ""
|
||||
HelpContextID = "0"
|
||||
CompatibleMode = "0"
|
||||
AutoIncrementVer = 0
|
||||
ServerSupportFiles = 0
|
||||
CompilationType = 0
|
||||
OptimizationType = 0
|
||||
FavorPentiumPro(tm) = 0
|
||||
CodeViewDebugInfo = 0
|
||||
NoAliasing = 0
|
||||
BoundsCheck = 0
|
||||
OverflowCheck = -1
|
||||
FlPointCheck = 0
|
||||
FDIVCheck = 0
|
||||
UnroundedFP = 0
|
||||
StartMode = 0
|
||||
Unattended = 0
|
||||
Retained = 0
|
||||
ThreadPerObject = 0
|
||||
MaxNumberOfThreads = 1
|
||||
|
||||
[MS Transaction Server]
|
||||
AutoRefresh = 1
|
||||
|
||||
[VB Decompiler]
|
||||
Build = 10.0.5630.3733
|
||||
Date = 4/25/2023
|
||||
|
||||
File diff suppressed because it is too large.
Load diff
+403
@@ -0,0 +1,403 @@
|
||||
VERSION 5.00
|
||||
Begin VB.Form about
|
||||
BackColor = &H0&
|
||||
WindowState = 2
|
||||
ScaleMode = 3
|
||||
AutoRedraw = True
|
||||
FontTransparent = True
|
||||
Picture = "about.frx":0
|
||||
BorderStyle = 0 'None
|
||||
'Icon = n/a
|
||||
LinkTopic = "Form1"
|
||||
MaxButton = 0 'False
|
||||
MinButton = 0 'False
|
||||
ControlBox = 0 'False
|
||||
Tag = "about"
|
||||
KeyPreview = -1 'True
|
||||
ClientLeft = 4560
|
||||
ClientTop = 1665
|
||||
ClientWidth = 14910
|
||||
ClientHeight = 10125
|
||||
ShowInTaskbar = 0 'False
|
||||
Moveable = 0 'False
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 1
|
||||
ForeColor = &H80000008&
|
||||
Left = 8280
|
||||
Top = 6660
|
||||
Width = 1200
|
||||
Height = 450
|
||||
TabIndex = 2
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 1
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 3
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "ok"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox rotateDisplay
|
||||
BackColor = &H8080FF&
|
||||
ForeColor = &H80000008&
|
||||
Left = 7860
|
||||
Top = 90
|
||||
Width = 1725
|
||||
Height = 1725
|
||||
Visible = 0 'False
|
||||
TabIndex = 1
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox animDisplay
|
||||
BackColor = &H8080FF&
|
||||
ForeColor = &H80000008&
|
||||
Left = 210
|
||||
Top = 120
|
||||
Width = 2835
|
||||
Height = 690
|
||||
Visible = 0 'False
|
||||
TabIndex = 0
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin Timer tmrMainLoop
|
||||
Interval = 1
|
||||
Left = 6990
|
||||
Top = 450
|
||||
End
|
||||
Begin Label lblVersionInfo
|
||||
Caption = "Version 1.00"
|
||||
ForeColor = &HFFFFFF&
|
||||
Left = 2010
|
||||
Top = 2475
|
||||
Width = 1365
|
||||
Height = 240
|
||||
TabIndex = 4
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "Verdana"
|
||||
Size = 9.75
|
||||
Charset = 0
|
||||
Weight = 700
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
End
|
||||
|
||||
Attribute VB_Name = "about"
|
||||
|
||||
|
||||
Private Sub tmrMainLoop_Timer() '879350
|
||||
Dim Me As Variant
|
||||
Dim var_2C As PictureBox
|
||||
loc_008793B0: var_eax = about.drawDefaultPics
|
||||
loc_008793ED: 1 = btnButton._Default
|
||||
loc_00879411: var_50 = btnButton.Visible
|
||||
loc_0087943C: If var_50 = var_FFFFFF Then eax = 1
|
||||
loc_00879453: If eax Then
|
||||
loc_00879470: 1 = btnButton._Default
|
||||
loc_00879490: var_eax = btnButton.SetFocus
|
||||
loc_008794C1: End If
|
||||
loc_008794D8: var_eax = Proc_10_11_84A820(var_28, var_28, var_28)
|
||||
loc_008794E9: var_eax = about.resetHighLights
|
||||
loc_00879505: var_eax = Proc_86B860(Me, global_0040C7EC, var_2C)
|
||||
loc_00879521: tmrMainLoop.Enabled = False
|
||||
loc_00879542:
|
||||
loc_00879546: var_eax = QueryPerformanceCounter(var_24)
|
||||
loc_0087956A: var_eax = Proc_12_46_86D7E0(var_28, var_28, GetLastError)
|
||||
loc_0087958B: var_eax = Proc_10_11_84A820(var_28, var_28, Proc_12_46_86D7E0(var_28, var_28, GetLastError))
|
||||
loc_0087959E: If esi+0000003Ah Then
|
||||
loc_008795A3: var_eax = about.drawAnimations
|
||||
loc_008795BF: End If
|
||||
loc_008795C3: var_eax = QueryPerformanceCounter(var_1C)
|
||||
loc_008795DE: call __vbaCySub(var_1C, var_18, var_24, var_20, Me, global_0040C7EC, Me, global_0040C7EC, var_28, Proc_86B860(Me, global_0040C7EC, var_2C), Me, var_28, Me, Me, var_2C, var_28)
|
||||
loc_008795E6: call __vbaR8Cy(__vbaCySub(var_1C, var_18, var_24, var_20, Me, global_0040C7EC, Me, global_0040C7EC, var_28, Proc_86B860(Me, global_0040C7EC, var_2C), Me, var_28, Me, Me, var_2C, var_28), var_1C)
|
||||
loc_008795FC: call __vbaR8Cy(global_008860D8, global_008860DC)
|
||||
loc_00879609: If global_886000 = 0 Then
|
||||
loc_0087960B: fdivr st0, var_78
|
||||
loc_0087960E: GoTo loc_0087961B
|
||||
loc_00879610: End If
|
||||
loc_0087961B: 'Referenced from: 0087960E
|
||||
loc_0087961B: global_8860D4 = __vbaR8Cy(global_008860D8, global_008860DC)
|
||||
loc_00879642: If Err.Number Then
|
||||
loc_00879644: global_8860D4 = 3DCCCCCDh
|
||||
loc_0087964E: End If
|
||||
loc_00879653: If esi+00000034h = 0 Then GoTo loc_00879542
|
||||
loc_00879659: var_eax = Proc_845A50(var_78, var_74)
|
||||
loc_00879662: eax = Me(14) - 1
|
||||
loc_00879663: If Me(14) - 1 = 0 Then
|
||||
loc_0087968F: Set var_28 = Me
|
||||
loc_00879697: var_eax = Global.Unload var_28
|
||||
loc_00879718: var_eax = titleScreen.Show var_3C, var_38
|
||||
loc_00879736: End If
|
||||
loc_00879743: GoTo loc_00879759
|
||||
loc_00879758: Exit Sub
|
||||
loc_00879759: 'Referenced from: 00879743
|
||||
loc_00879759: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub picAnim_Click() '878E10
|
||||
loc_00878E57: var_eax = about.btnButton_Click
|
||||
End Sub
|
||||
|
||||
Private Sub picAnim_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '878EA0
|
||||
loc_00878F15: Button = picAnim._Default
|
||||
loc_00878F39: var_1C = picAnim.Tag
|
||||
loc_00878F68: var_20 = Right$(var_1C, 1)
|
||||
loc_00878F87: esi = (var_20 = global_0040F164) + 1
|
||||
loc_00878FA9: If (var_20 = global_0040F164) + 1 = 0 Then
|
||||
loc_00878FC5:
|
||||
loc_00878FCF: If Err.Number Then
|
||||
loc_00878FE4: var_58 = Button
|
||||
loc_00878FF1: If Err.Number Then
|
||||
loc_00879012: var_5C = Err.Number
|
||||
loc_00879020: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00879044: var_1C = picAnim.Tag
|
||||
loc_0087907A: esi = (var_1C = "ok") + 1
|
||||
loc_00879099: If (var_1C = "ok") + 1 Then
|
||||
loc_008790C8: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_008790ED: picAnim.Tag = "oka"
|
||||
loc_00879125: End If
|
||||
loc_00879128:
|
||||
loc_00879139: GoTo loc_00878FC5
|
||||
loc_00879159: var_60 = Err.Number
|
||||
loc_00879167: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087918B: var_1C = picAnim.Tag
|
||||
loc_008791BC: var_18 = var_1C
|
||||
loc_008791E2: var_1C = Right$(var_18, 1)
|
||||
loc_008791F9: esi = (var_1C = global_0040F164) + 1
|
||||
loc_00879205: If (var_1C = global_0040F164) + 1 = 0 Then GoTo loc_00879125
|
||||
loc_00879234: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087925E: Len(var_18) = Len(var_18) - 00000001h
|
||||
loc_00879274: var_1C = Left$(var_18, Len(var_18))
|
||||
loc_0087927C: picAnim.Tag = var_1C
|
||||
loc_008792C5: var_eax = about.drawDefaultPic(CInt(6.37066138261923E-314))
|
||||
loc_008792E5: GoTo loc_00879128
|
||||
loc_008792EC: End If
|
||||
loc_008792F5: GoTo loc_0087931B
|
||||
loc_0087931A: Exit Sub
|
||||
loc_0087931B: 'Referenced from: 008792F5
|
||||
loc_00879324: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub btnButton_Click() '878590
|
||||
Dim Me As Me
|
||||
loc_008785D0: var_eax = Proc_9_20_8476B0(edi, Me, ebx)
|
||||
loc_008785DB: eax = arg_C - 1
|
||||
loc_008785DC: If arg_C - 1 = 0 Then
|
||||
loc_008785EA: End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnButton_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '878610
|
||||
loc_00878681: var_eax = about.picAnim_MouseMove(Button, var_18, var_1C, var_20)
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Load() '878780
|
||||
Dim var_20 As Screen
|
||||
Dim var_24 As Variant
|
||||
Dim var_7C As Label
|
||||
loc_008787FC: var_eax = Proc_12_43_86D100(var_34, var_20, var_20)
|
||||
loc_00878838: var_20 = Global.Screen
|
||||
loc_00878866: var_6C = Global.Width
|
||||
loc_008788A6: var_24 = Global.Screen
|
||||
loc_008788C6: var_70 = Global.Height
|
||||
loc_00878938: var_eax = Unknown_VTable_Call[edi+000002A4h]
|
||||
loc_00878990: var_eax = Proc_12_45_86D280(var_20, var_20, Unknown_VTable_Call[edi+000002A4h])
|
||||
loc_008789A1: var_eax = about.positionControls
|
||||
loc_008789BC: var_eax = about.resetHighLights
|
||||
loc_008789E2: If global_886010 = 2 Then
|
||||
loc_008789F8: var_7C = about.resetHighLights
|
||||
loc_00878A14: var_18 = lblVersionInfo.Caption
|
||||
loc_00878A4B: var_A0 = var_7C
|
||||
loc_00878A5C: lblVersionInfo.Caption = var_18 & " (FULL VERSION)"
|
||||
loc_00878A8C: GoTo loc_00878B2B
|
||||
loc_00878A91: End If
|
||||
loc_00878AA4: var_7C = var_24
|
||||
loc_00878ABD: var_18 = lblVersionInfo.Caption
|
||||
loc_00878AEE: var_1C = var_18 & " (Evaluation version)"
|
||||
loc_00878AFB: lblVersionInfo.Caption = var_1C
|
||||
loc_00878B2B: 'Referenced from: 00878A8C
|
||||
loc_00878B74: var_eax = Proc_12_47_86E570(var_20, var_20, global_00886BCC)
|
||||
loc_00878BA0: var_eax = Proc_12_25_868460(4, global_00886BCC, var_20)
|
||||
loc_00878BB2: GoTo loc_00878BE1
|
||||
loc_00878BE0: Exit Sub
|
||||
loc_00878BE1: 'Referenced from: 00878BB2
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Unload(Cancel As Integer) '878D20
|
||||
loc_00878D87: var_eax = Proc_12_44_86D1C0(var_28, var_18, var_18)
|
||||
loc_00878DA6: GoTo loc_00878DBB
|
||||
loc_00878DBA: Exit Sub
|
||||
loc_00878DBB: 'Referenced from: 00878DA6
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '8786C0
|
||||
Dim Me As Me
|
||||
loc_0087870F: If KeyCode = 123 Then
|
||||
loc_00878711: var_eax = Proc_12_18_864A90(edi, Me, ebx)
|
||||
loc_00878716: GoTo loc_00878758
|
||||
loc_00878718: End If
|
||||
loc_0087871E: If Proc_12_18_864A90(edi, Me, ebx) <> 0 Then ecx = 1
|
||||
loc_00878727: If Proc_12_18_864A90(edi, Me, ebx) <> 0 Then edx = 1
|
||||
loc_0087872C: If edx = 0 Then
|
||||
loc_0087873C: var_eax = about.btnButton_Click
|
||||
loc_00878758:
|
||||
loc_00878758: End If
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '878C10
|
||||
loc_00878C53: var_eax = about.highLightCheck
|
||||
End Sub
|
||||
|
||||
Public Sub positionControls() '878180
|
||||
loc_008781DC: 1 = btnButton._Default
|
||||
loc_0087820B: btnButton.Left = global_440A0000
|
||||
loc_00878251: 1 = btnButton._Default
|
||||
loc_00878272: btnButton.Top = global_43DE0000
|
||||
loc_008782B8: 1 = btnButton._Default
|
||||
loc_008782D9: btnButton.Width = global_42A00000
|
||||
loc_00878325: 1 = btnButton._Default
|
||||
loc_00878346: btnButton.Height = global_41F00000
|
||||
loc_00878392: 1 = picAnim._Default
|
||||
loc_008783B3: picAnim.Width = global_41C80000
|
||||
loc_008783FF: 1 = picAnim._Default
|
||||
loc_00878420: picAnim.Height = global_41C00000
|
||||
loc_0087846B: lblVersionInfo.Top = global_43250000
|
||||
loc_008784A8: lblVersionInfo.Left = global_43060000
|
||||
loc_008784C7: GoTo loc_008784DD
|
||||
loc_008784DC: Exit Sub
|
||||
loc_008784DD: 'Referenced from: 008784C7
|
||||
End Sub
|
||||
|
||||
Public Sub highLightCheck() '878500
|
||||
Dim Me As Me
|
||||
loc_0087853E: If Me.GetPalette 'Ignore this = 0 Then
|
||||
loc_00878545: If esi+0000003Ah = 0 Then GoTo loc_00878566
|
||||
loc_00878547: End If
|
||||
loc_0087854A: var_eax = about.resetHighLights
|
||||
loc_00878566:
|
||||
End Sub
|
||||
|
||||
Public Sub resetHighLights() '878CA0
|
||||
loc_00878CE2: var_eax = about.drawDefaultPics
|
||||
End Sub
|
||||
|
||||
Public Sub drawDefaultPics() '879780
|
||||
Dim Me As Variant
|
||||
Dim var_50 As Me
|
||||
Dim var_2C As PictureBox
|
||||
Dim var_38 As PictureBox
|
||||
Dim var_34 As PictureBox
|
||||
loc_008797F1: 1 = btnButton._Default
|
||||
loc_00879813: var_50 = var_34
|
||||
loc_00879830: var_eax = Unknown_VTable_Call[ecx+00000354h]
|
||||
loc_0087984A: var_2C = buttons.hWnd
|
||||
loc_0087987F: buttons.BackColor = var_38
|
||||
loc_008798C2: If 00000001h <= 1 Then
|
||||
loc_008798CC: var_eax = about.drawDefaultPic(1)
|
||||
loc_00879906: 1 = picAnim._Default
|
||||
loc_0087992A: var_1C = picAnim.Tag
|
||||
loc_00879978: esi = (Right$(var_1C, 1) = global_0040F164) + 1
|
||||
loc_0087999A: var_eax = Unknown_8BE84589(var_2C, var_28, about.drawDefaultPic(1), Me, var_38)
|
||||
loc_008799BE: 1 = picAnim._Default
|
||||
loc_008799E2: var_1C = picAnim.Tag
|
||||
loc_00879A1E: 1 = picAnim._Default
|
||||
loc_00879A5A: var_18 = picAnim._Default
|
||||
loc_00879A7E: var_20 = picAnim.Tag
|
||||
loc_00879AA8: Len(var_20) = Len(var_20) - 00000001h
|
||||
loc_00879AC1: var_24 = Left$(var_1C, Len(var_20))
|
||||
loc_00879AC9: picAnim.Tag = var_24
|
||||
loc_00879B26: 00000001h = 00000001h + var_18
|
||||
loc_00879B2B: var_18 = 00000001h+var_18
|
||||
loc_00879B30: var_eax = Unknown_26D(var_34, var_30, Me)
|
||||
loc_00879B35: End If
|
||||
loc_00879B40: GoTo loc_00879B7A
|
||||
loc_00879B79: Exit Sub
|
||||
loc_00879B7A: 'Referenced from: 00879B40
|
||||
loc_00879B7A: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub drawDefaultPic(X) '879BA0
|
||||
loc_00879C04: X = picAnim._Default
|
||||
loc_00879C3F: var_eax = about.drawFrame(var_20, var_24)
|
||||
loc_00879C73: GoTo loc_00879C8D
|
||||
loc_00879C8C: Exit Sub
|
||||
loc_00879C8D: 'Referenced from: 00879C73
|
||||
End Sub
|
||||
|
||||
Public Sub drawFrame(pic, frame) '879CB0
|
||||
Dim Me As Me
|
||||
loc_00879D0B: var_18 = Me.Visible
|
||||
loc_00879D32: var_3C = var_18
|
||||
loc_00879D4B: If (var_3C = "ok") Then
|
||||
loc_00879D5A: If (var_3C <> "oka") <> 0 Then GoTo loc_00879E37
|
||||
loc_00879D60: End If
|
||||
loc_00879D81: var_eax = Unknown_VTable_Call[ecx+00000330h]
|
||||
loc_00879DE3: frame = frame - 0001h
|
||||
loc_00879DEF: frame = frame * 0019h
|
||||
loc_00879E05: var_eax = Proc_9_0_843110(var_20, var_24, ebx)
|
||||
loc_00879E37:
|
||||
loc_00879E3C: GoTo loc_00879E63
|
||||
loc_00879E62: Exit Sub
|
||||
loc_00879E63: 'Referenced from: 00879E3C
|
||||
loc_00879E6C: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub drawAnimations() '879EA0
|
||||
Dim Me As Variant
|
||||
Dim var_28 As PictureBox
|
||||
loc_00879F19: If global_886000 = 0 Then
|
||||
loc_00879F1E: GoTo loc_00879F28
|
||||
loc_00879F20: End If
|
||||
loc_00879F23: call _adj_fdiv_m32
|
||||
loc_00879F28: 'Referenced from: 00879F1E
|
||||
loc_00879F42: var_5C = var_58
|
||||
loc_00879F77: If var_18 <= 1 Then
|
||||
loc_00879F9E: var_18 = picAnim._Default
|
||||
loc_00879FBE: var_1C = picAnim.Tag
|
||||
loc_0087A008: esi = (Right$(var_1C, 1) = global_0040F164) + 1
|
||||
loc_0087A02A: var_eax = Unknown_E845896A(var_28, var_24)
|
||||
loc_0087A051: var_18 = picAnim._Default
|
||||
loc_0087A085: var_eax = about.drawFrame(var_2C, Me(16))
|
||||
loc_0087A0B5: 00000001h = 00000001h + var_18
|
||||
loc_0087A0BB: var_18 = 00000001h+var_18
|
||||
loc_0087A0BE: var_eax = Unknown_1468F(var_2C, var_28, var_28, var_24)
|
||||
loc_0087A0C3: End If
|
||||
loc_0087A0C3: End If
|
||||
loc_0087A0C8: If edi+0000003Ch > 39 Then
|
||||
loc_0087A0D0: End If
|
||||
loc_0087A0D6: GoTo loc_0087A100
|
||||
loc_0087A0FF: Exit Sub
|
||||
loc_0087A100: 'Referenced from: 0087A0D6
|
||||
loc_0087A100: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub Proc_20_16_878DE0
|
||||
loc_00878DE8: var_eax = Me.1788
|
||||
End Sub
|
||||
Binary file not shown.
@@ -0,0 +1,18 @@
|
||||
VERSION 5.00
|
||||
Begin VB.Form buttons
|
||||
Caption = "OH MY!!"
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
'Icon = n/a
|
||||
LinkTopic = "Form1"
|
||||
Visible = 0 'False
|
||||
Tag = "buttons"
|
||||
ClientLeft = 60
|
||||
ClientTop = 900
|
||||
ClientWidth = 15240
|
||||
ClientHeight = 10140
|
||||
End
|
||||
|
||||
Attribute VB_Name = "buttons"
|
||||
|
||||
@@ -0,0 +1,882 @@
|
||||
VERSION 5.00
|
||||
Begin VB.Form challengeOptions
|
||||
BackColor = &H800000&
|
||||
WindowState = 2
|
||||
ScaleMode = 3
|
||||
AutoRedraw = True
|
||||
FontTransparent = True
|
||||
Picture = "challengeOptions.frx":0
|
||||
BorderStyle = 0 'None
|
||||
'Icon = n/a
|
||||
LinkTopic = "Form1"
|
||||
MaxButton = 0 'False
|
||||
MinButton = 0 'False
|
||||
Tag = "randomoptions"
|
||||
KeyPreview = -1 'True
|
||||
ClientLeft = 3165
|
||||
ClientTop = 1545
|
||||
ClientWidth = 9600
|
||||
ClientHeight = 8625
|
||||
ShowInTaskbar = 0 'False
|
||||
Begin PictureBox rotateDisplay
|
||||
BackColor = &H8080FF&
|
||||
ForeColor = &H80000008&
|
||||
Left = 7560
|
||||
Top = 360
|
||||
Width = 1725
|
||||
Height = 1725
|
||||
Visible = 0 'False
|
||||
TabIndex = 20
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin TextBox txtLevel
|
||||
BackColor = &H400000&
|
||||
ForeColor = &HFF&
|
||||
Left = 1050
|
||||
Top = 3870
|
||||
Width = 765
|
||||
Height = 270
|
||||
MousePointer = 3 'I-Beam
|
||||
Text = "1"
|
||||
TabIndex = 18
|
||||
MaxLength = 5
|
||||
BeginProperty Font
|
||||
Name = "Verdana"
|
||||
Size = 6.75
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 1
|
||||
ForeColor = &H80000008&
|
||||
Left = 810
|
||||
Top = 3120
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 16
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "left"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 2
|
||||
ForeColor = &H80000008&
|
||||
Left = 3285
|
||||
Top = 3120
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 15
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "right"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 3
|
||||
ForeColor = &H80000008&
|
||||
Left = 795
|
||||
Top = 3900
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 14
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "left"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 4
|
||||
ForeColor = &H80000008&
|
||||
Left = 3315
|
||||
Top = 3900
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 13
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "right"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox animDisplay
|
||||
BackColor = &H8080FF&
|
||||
ForeColor = &H80000008&
|
||||
Left = 150
|
||||
Top = 90
|
||||
Width = 2835
|
||||
Height = 690
|
||||
Visible = 0 'False
|
||||
TabIndex = 12
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 2
|
||||
ForeColor = &H80000008&
|
||||
Left = 8280
|
||||
Top = 6675
|
||||
Width = 1200
|
||||
Height = 450
|
||||
TabIndex = 9
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 10
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 11
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "back"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 1
|
||||
ForeColor = &H80000008&
|
||||
Left = 6960
|
||||
Top = 6675
|
||||
Width = 1200
|
||||
Height = 450
|
||||
TabIndex = 8
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 9
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 10
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "play"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 6
|
||||
ForeColor = &H80000008&
|
||||
Left = 3330
|
||||
Top = 4665
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 7
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "right"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 7
|
||||
ForeColor = &H80000008&
|
||||
Left = 810
|
||||
Top = 5445
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 6
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "left"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 8
|
||||
ForeColor = &H80000008&
|
||||
Left = 3330
|
||||
Top = 5445
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 5
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "right"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H800000&
|
||||
Index = 5
|
||||
ForeColor = &H80000008&
|
||||
Left = 810
|
||||
Top = 4665
|
||||
Width = 150
|
||||
Height = 210
|
||||
TabIndex = 4
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "left"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox display
|
||||
BackColor = &H410514&
|
||||
ForeColor = &H80000008&
|
||||
Left = 3645
|
||||
Top = 2820
|
||||
Width = 5685
|
||||
Height = 2895
|
||||
TabIndex = 2
|
||||
ScaleMode = 0
|
||||
ScaleLeft = -100
|
||||
ScaleTop = -100
|
||||
ScaleWidth = 262.285
|
||||
ScaleHeight = 143.498
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox work
|
||||
BackColor = &H450A1A&
|
||||
ForeColor = &H80000008&
|
||||
Left = 3480
|
||||
Top = 7560
|
||||
Width = 3195
|
||||
Height = 3135
|
||||
Visible = 0 'False
|
||||
TabIndex = 1
|
||||
ScaleMode = 0
|
||||
ScaleLeft = -100
|
||||
ScaleTop = -100
|
||||
ScaleWidth = 147.405
|
||||
ScaleHeight = 155.39
|
||||
AutoRedraw = True
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin Timer tmrMainLoop
|
||||
Interval = 1
|
||||
Left = 8340
|
||||
Top = 1080
|
||||
End
|
||||
Begin Label lblMaxLevel
|
||||
Caption = "out of 61"
|
||||
ForeColor = &HFF&
|
||||
Left = 1950
|
||||
Top = 3900
|
||||
Width = 675
|
||||
Height = 180
|
||||
TabIndex = 19
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "Verdana"
|
||||
Size = 6.75
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
Begin Label lblDifficulty
|
||||
Caption = "(Default)"
|
||||
ForeColor = &HFF&
|
||||
Left = 1080
|
||||
Top = 3120
|
||||
Width = 660
|
||||
Height = 180
|
||||
TabIndex = 17
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "Verdana"
|
||||
Size = 6.75
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 1
|
||||
Left = 330
|
||||
Top = 3090
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 2
|
||||
Left = 3015
|
||||
Top = 3090
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 3
|
||||
Left = 360
|
||||
Top = 3870
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 4
|
||||
Left = 3045
|
||||
Top = 3870
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 6
|
||||
Left = 3060
|
||||
Top = 4635
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 5
|
||||
Left = 375
|
||||
Top = 4635
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 8
|
||||
Left = 3030
|
||||
Top = 5400
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Image arrowExtender
|
||||
Index = 7
|
||||
Left = 405
|
||||
Top = 5415
|
||||
Width = 825
|
||||
Height = 300
|
||||
End
|
||||
Begin Label lblBackground
|
||||
Caption = "(HeHe)"
|
||||
ForeColor = &HFF&
|
||||
Left = 1080
|
||||
Top = 5445
|
||||
Width = 540
|
||||
Height = 180
|
||||
TabIndex = 3
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "Verdana"
|
||||
Size = 6.75
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
Begin Label lblPieceSet
|
||||
Caption = "(Default)"
|
||||
ForeColor = &HFF&
|
||||
Left = 1080
|
||||
Top = 4665
|
||||
Width = 660
|
||||
Height = 180
|
||||
TabIndex = 0
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "Verdana"
|
||||
Size = 6.75
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
End
|
||||
|
||||
Attribute VB_Name = "challengeOptions"
|
||||
|
||||
|
||||
Private Sub arrowExtender_Click() '87B650
|
||||
loc_0087B6BF: arg_C = picAnim._Default
|
||||
loc_0087B6ED: var_20 = picAnim.Visible
|
||||
loc_0087B720: If var_20 Then
|
||||
loc_0087B729: var_eax = challengeOptions.picAnim_Click
|
||||
loc_0087B741: End If
|
||||
loc_0087B74D: GoTo loc_0087B763
|
||||
loc_0087B762: Exit Sub
|
||||
loc_0087B763: 'Referenced from: 0087B74D
|
||||
End Sub
|
||||
|
||||
Private Sub arrowExtender_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '87B790
|
||||
loc_0087B808: Button = picAnim._Default
|
||||
loc_0087B82C: var_20 = picAnim.Visible
|
||||
loc_0087B863: If var_20 Then
|
||||
loc_0087B888: var_eax = challengeOptions.picAnim_MouseMove(Button, var_20, var_24, var_28)
|
||||
loc_0087B8A4: End If
|
||||
loc_0087B8AD: GoTo loc_0087B8C3
|
||||
loc_0087B8C2: Exit Sub
|
||||
loc_0087B8C3: 'Referenced from: 0087B8AD
|
||||
End Sub
|
||||
|
||||
Private Sub tmrMainLoop_Timer() '87DED0
|
||||
Dim Me As Me
|
||||
Dim var_2C As Timer
|
||||
Dim var_4C As Timer
|
||||
loc_0087DF3B: tmrMainLoop.Enabled = ebx
|
||||
loc_0087DF63: var_eax = challengeOptions.VTable_00000718
|
||||
loc_0087DF85: var_eax = Proc_86B860(Me, var_2C, Me)
|
||||
loc_0087DF8A:
|
||||
loc_0087DF8E: var_eax = QueryPerformanceCounter(var_24)
|
||||
loc_0087DFA0:
|
||||
loc_0087DFAE: If 00000001h <= 4 Then
|
||||
loc_0087DFC5: var_eax = Proc_10_11_84A820(var_2C, var_2C, 4)
|
||||
loc_0087DFD6: 00000001h = 00000001h + 00000001h
|
||||
loc_0087DFE1: GoTo loc_0087DFA0
|
||||
loc_0087DFF8: var_eax = Proc_12_46_86D7E0(var_2C, var_2C, 00000001h+00000001h)
|
||||
loc_0087E009: var_eax = challengeOptions.VTable_00000708
|
||||
loc_0087E02B: If esi+00000036h Then
|
||||
loc_0087E030: var_eax = challengeOptions.VTable_00000714
|
||||
loc_0087E04C: End If
|
||||
loc_0087E050: var_eax = QueryPerformanceCounter(var_1C)
|
||||
loc_0087E06B: call __vbaCySub(var_1C, var_18, var_24, var_20, Me, Me, Me, global_0040C7EC, Me, edi, Me, 00000001h)
|
||||
loc_0087E073: call __vbaR8Cy(__vbaCySub(var_1C, var_18, var_24, var_20, Me, Me, Me, global_0040C7EC, Me, edi, Me, 00000001h), var_18)
|
||||
loc_0087E085: var_4C = __vbaR8Cy(__vbaCySub(var_1C, var_18, var_24, var_20, Me, Me, Me, global_0040C7EC, Me, edi, Me, 00000001h), var_18)
|
||||
loc_0087E08A: call __vbaR8Cy(global_008860D8, global_008860DC)
|
||||
loc_0087E097: If global_886000 = 0 Then
|
||||
loc_0087E099: fdivr st0, var_4C
|
||||
loc_0087E09C: GoTo loc_0087E0A9
|
||||
loc_0087E09E: End If
|
||||
loc_0087E0A9: 'Referenced from: 0087E09C
|
||||
loc_0087E0A9: global_8860D4 = __vbaR8Cy(global_008860D8, global_008860DC)
|
||||
loc_0087E0D0: If Err.Number Then
|
||||
loc_0087E0D2: global_8860D4 = 3DCCCCCDh
|
||||
loc_0087E0DC: End If
|
||||
loc_0087E0E3: If global_886054 Then
|
||||
loc_0087E0F2: End If
|
||||
loc_0087E0F6: If esi+0000003Ch = 0 Then GoTo loc_0087DF8A
|
||||
loc_0087E103: var_eax = challengeOptions.VTable_00000750
|
||||
loc_0087E116: GoTo loc_0087E122
|
||||
loc_0087E121: Exit Sub
|
||||
loc_0087E122: 'Referenced from: 0087E116
|
||||
loc_0087E122: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub picAnim_Click() '87CB40
|
||||
Dim Me As Me
|
||||
loc_0087CB89: var_eax = Proc_9_20_8476B0(1, Me, ebx)
|
||||
loc_0087CB97: ecx = arg_C - 1
|
||||
loc_0087CB9B: If arg_C - 1 <= 0 Then
|
||||
loc_0087CBA1: GoTo loc_[ecx*4+0087D0DCh]
|
||||
loc_0087CBAF: If global_886010 = 1 Then
|
||||
loc_0087CBB8: var_eax = challengeOptions.VTable_0000073C
|
||||
loc_0087CBD6: GoTo loc_0087CC14
|
||||
loc_0087CBDE: If Me.GetPalette 'Ignore this Then
|
||||
loc_0087CBE0: ecx = Me.GetPalette 'Ignore this - 1
|
||||
loc_0087CBE1: If ecx Then
|
||||
loc_0087CBE3: ecx = Me.GetPalette 'Ignore this - 1 - 1
|
||||
loc_0087CBE4: If ecx <> 0 Then GoTo loc_0087CC0E
|
||||
loc_0087CBEB: If challengeOptions.VTable_0000073C = 0 Then ecx = 1
|
||||
loc_0087CBF2: GoTo loc_0087CC0E
|
||||
loc_0087CBF4: End If
|
||||
loc_0087CBF4: eax = challengeOptions.VTable_0000073C - 1
|
||||
loc_0087CBFE: GoTo loc_0087CC0A
|
||||
loc_0087CC00: End If
|
||||
loc_0087CC00: eax = challengeOptions.VTable_0000073C - 1 And 2 - 1
|
||||
loc_0087CC07: challengeOptions.VTable_0000073C - 1 And 2 - 1 = challengeOptions.VTable_0000073C - 1 And 2 - 1 + 00000002h
|
||||
loc_0087CC0A: 'Referenced from: 0087CBFE
|
||||
loc_0087CC0E: 'Referenced from: 0087CBF2
|
||||
loc_0087CC14: 'Referenced from: 0087CBD6
|
||||
loc_0087CC17: var_eax = challengeOptions.VTable_0000073C
|
||||
loc_0087CC32: var_eax = challengeOptions.VTable_00000734
|
||||
loc_0087CC4D: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_0087CC65: var_eax = Proc_9_10_844CB0(Me, Me, Me)
|
||||
loc_0087CC6D: var_eax = challengeOptions.VTable_00000704
|
||||
loc_0087CC83:
|
||||
loc_0087CC85:
|
||||
loc_0087CC88: var_eax = challengeOptions.VTable_00000730
|
||||
loc_0087CCE6: var_eax = challengeOptions.VTable_00000740
|
||||
loc_0087CD01: var_eax = challengeOptions.VTable_00000734
|
||||
loc_0087CD1C: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_0087CD34: var_eax = Proc_9_10_844CB0(Me, Me, Me)
|
||||
loc_0087CD3C: var_eax = challengeOptions.VTable_00000704
|
||||
loc_0087CD57: var_eax = challengeOptions.VTable_00000730
|
||||
loc_0087CDB5: var_eax = challengeOptions.VTable_00000740
|
||||
loc_0087CDD0: var_eax = challengeOptions.VTable_00000734
|
||||
loc_0087CDEB: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_0087CE03: var_eax = Proc_9_10_844CB0(Me, Me, Me)
|
||||
loc_0087CE0B: var_eax = challengeOptions.VTable_00000704
|
||||
loc_0087CE26: var_eax = challengeOptions.VTable_00000730
|
||||
loc_0087CE42: GoTo loc_0087D09C
|
||||
loc_0087CE4D: global_8861A2 = %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CE54: 008861A0h = 008861A0h - %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CE60: global_8861A0 = global_008861A0
|
||||
loc_0087CE66: If 008861A0h = 0 Then
|
||||
loc_0087CE6E: global_8861A0 = global_00886038
|
||||
loc_0087CE74: var_eax = Proc_9_10_844CB0(Me, Me, Me)
|
||||
loc_0087CE7C: var_eax = challengeOptions.VTable_00000730
|
||||
loc_0087CEA5: var_eax = challengeOptions.VTable_00000720
|
||||
loc_0087CEC0: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_0087CEDC: GoTo loc_0087D09C
|
||||
loc_0087CEEE: 008861A0h = 008861A0h + %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CEF1: global_8861A2 = %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CEFE: 00886038h = 00886038h + %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CF01: global_8861A0 = 008861A0h+%StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CF10: If 008861A0h+%StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4) = 0 Then
|
||||
loc_0087CF12: global_8861A0 = %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CF19: var_eax = Proc_9_10_844CB0(Me, Me, Me)
|
||||
loc_0087CF21: var_eax = challengeOptions.VTable_00000730
|
||||
loc_0087CF4A: var_eax = challengeOptions.VTable_00000720
|
||||
loc_0087CF65: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_0087CF81: GoTo loc_0087D09C
|
||||
loc_0087CF8C: 008861A2h = 008861A2h - %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CF99: global_8861A2 = global_008861A2
|
||||
loc_0087CF9F: If 008861A2h = var_FFFFFF Then
|
||||
loc_0087CFA1: global_8861A2 = 6
|
||||
loc_0087CFAD: var_eax = challengeOptions.VTable_00000720
|
||||
loc_0087CFB5: If challengeOptions.VTable_00000720 < 0 Then
|
||||
loc_0087CFC9: GoTo loc_0087CC83
|
||||
loc_0087CFCE: End If
|
||||
loc_0087CFD4: GoTo loc_0087CC85
|
||||
loc_0087CFDF: 008861A2h = 008861A2h + %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CFEC: global_8861A2 = 008861A2h+%StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087CFF2: If 008861A2h+%StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4) = 0 Then
|
||||
loc_0087CFFB: End If
|
||||
loc_0087CFFE: var_eax = challengeOptions.VTable_00000720
|
||||
loc_0087D039: GoTo loc_0087CC8E
|
||||
loc_0087D045: var_18 = %StkVar1 = CheckObj(%StkVar2, %StkVar3, %StkVar4)
|
||||
loc_0087D048: var_eax = challengeOptions.btnButton_Click
|
||||
loc_0087D094: GoTo loc_0087D09C
|
||||
loc_0087D096: End If
|
||||
loc_0087D096: End If
|
||||
loc_0087D096: End If
|
||||
loc_0087D09C: End If
|
||||
loc_0087D09C: End If
|
||||
loc_0087D09C: End If
|
||||
loc_0087D09C: End If
|
||||
loc_0087D09C: End If
|
||||
loc_0087D09F: var_eax = challengeOptions.VTable_0000071C
|
||||
End Sub
|
||||
|
||||
Private Sub picAnim_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '87D110
|
||||
Dim var_28 As PictureBox
|
||||
Dim var_48 As PictureBox
|
||||
loc_0087D19D: Button = picAnim._Default
|
||||
loc_0087D1CC: var_18 = picAnim.Tag
|
||||
loc_0087D20E: Button = picAnim._Default
|
||||
loc_0087D232: var_1C = picAnim.Tag
|
||||
loc_0087D273: Button = picAnim._Default
|
||||
loc_0087D293: var_20 = picAnim.Tag
|
||||
loc_0087D2D1: Button = picAnim._Default
|
||||
loc_0087D2F1: var_24 = picAnim.Tag
|
||||
loc_0087D324: edi = (var_24 = "backa") + 1
|
||||
loc_0087D33A: eax = (var_20 = "playa") + 1
|
||||
loc_0087D34E: eax = (var_1C = "righta") + 1
|
||||
loc_0087D369: eax = (var_18 = "lefta") + 1
|
||||
loc_0087D3B1: If (var_18 = "lefta") + 1 = 0 Then
|
||||
loc_0087D3DA:
|
||||
loc_0087D3E7: If Err.Number Then
|
||||
loc_0087D3FF: var_A0 = Button
|
||||
loc_0087D412: If Err.Number Then
|
||||
loc_0087D44E: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D46E: var_18 = picAnim.Tag
|
||||
loc_0087D4A0: edi = (var_18 = "left") + 1
|
||||
loc_0087D4BF: If (var_18 = "left") + 1 Then
|
||||
loc_0087D4ED: var_A8 = var_28
|
||||
loc_0087D4FE: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D51F: picAnim.Tag = "lefta"
|
||||
loc_0087D553: End If
|
||||
loc_0087D56C: var_48 = var_28
|
||||
loc_0087D582: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D5A2: var_18 = picAnim.Tag
|
||||
loc_0087D5D4: edi = (var_18 = "right") + 1
|
||||
loc_0087D5F3: If (var_18 = "right") + 1 Then
|
||||
loc_0087D628: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D649: picAnim.Tag = "righta"
|
||||
loc_0087D67D: End If
|
||||
loc_0087D699: var_48 = var_28
|
||||
loc_0087D6A5: var_B4 = var_28
|
||||
loc_0087D6B6: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D6D6: var_18 = picAnim.Tag
|
||||
loc_0087D708: edi = (var_18 = "play") + 1
|
||||
loc_0087D727: If (var_18 = "play") + 1 Then
|
||||
loc_0087D75C: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D77D: picAnim.Tag = "playa"
|
||||
loc_0087D7B1: End If
|
||||
loc_0087D7CD: var_48 = var_28
|
||||
loc_0087D7D9: var_BC = var_28
|
||||
loc_0087D7EA: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D80A: var_18 = picAnim.Tag
|
||||
loc_0087D83C: edi = (var_18 = "back") + 1
|
||||
loc_0087D85B: If (var_18 = "back") + 1 Then
|
||||
loc_0087D890: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D8B1: picAnim.Tag = "backa"
|
||||
loc_0087D8E5: GoTo loc_0087DE37
|
||||
loc_0087D8EA: End If
|
||||
loc_0087D906: var_48 = var_28
|
||||
loc_0087D909: var_C4 = var_28
|
||||
loc_0087D920: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D940: var_18 = picAnim.Tag
|
||||
loc_0087D972: edi = (var_18 = "lefta") + 1
|
||||
loc_0087D991: If (var_18 = "lefta") + 1 Then
|
||||
loc_0087D9C6: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087D9E7: picAnim.Tag = "left"
|
||||
loc_0087DA23: var_eax = challengeOptions.VTable_0000070C
|
||||
loc_0087DA3B: End If
|
||||
loc_0087DA6A: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087DA8A: var_18 = picAnim.Tag
|
||||
loc_0087DABC: edi = (var_18 = "righta") + 1
|
||||
loc_0087DADB: If (var_18 = "righta") + 1 Then
|
||||
loc_0087DB09: var_D0 = var_28
|
||||
loc_0087DB1A: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087DB3B: picAnim.Tag = "right"
|
||||
loc_0087DB77: var_eax = challengeOptions.VTable_0000070C
|
||||
loc_0087DB8F: End If
|
||||
loc_0087DBAB: var_48 = var_28
|
||||
loc_0087DBB7: var_D4 = var_28
|
||||
loc_0087DBC8: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087DBE8: var_18 = picAnim.Tag
|
||||
loc_0087DC1A: edi = (var_18 = "playa") + 1
|
||||
loc_0087DC39: If (var_18 = "playa") + 1 Then
|
||||
loc_0087DC6E: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087DC8F: picAnim.Tag = "play"
|
||||
loc_0087DCCB: var_eax = challengeOptions.VTable_0000070C
|
||||
loc_0087DCE3: End If
|
||||
loc_0087DD12: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087DD32: var_18 = picAnim.Tag
|
||||
loc_0087DD64: edi = (var_18 = "backa") + 1
|
||||
loc_0087DD83: If (var_18 = "backa") + 1 Then
|
||||
loc_0087DDB1: var_E0 = var_28
|
||||
loc_0087DDC2: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0087DDE3: picAnim.Tag = "back"
|
||||
loc_0087DE1F: var_eax = challengeOptions.VTable_0000070C
|
||||
loc_0087DE37:
|
||||
loc_0087DE37: End If
|
||||
loc_0087DE37: End If
|
||||
loc_0087DE4C: GoTo loc_0087D3DA
|
||||
loc_0087DE51: End If
|
||||
loc_0087DE51: End If
|
||||
loc_0087DE5E: GoTo loc_0087DEA4
|
||||
loc_0087DEA3: Exit Sub
|
||||
loc_0087DEA4: 'Referenced from: 0087DE5E
|
||||
loc_0087DEA4: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub btnButton_Click() '87B8F0
|
||||
loc_0087B95F: arg_C = btnButton._Default
|
||||
loc_0087B983: var_20 = btnButton.Visible
|
||||
loc_0087B9AD: If var_20 = 0 Then eax = 1
|
||||
loc_0087B9C4: If eax = 0 Then
|
||||
loc_0087B9D6: End If
|
||||
loc_0087B9DE: GoTo loc_0087B9F4
|
||||
loc_0087B9F3: Exit Sub
|
||||
loc_0087B9F4: 'Referenced from: 0087B9DE
|
||||
End Sub
|
||||
|
||||
Private Sub btnButton_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '87BA20
|
||||
loc_0087BA70: Button = Button + 0008h
|
||||
loc_0087BAA3: var_eax = challengeOptions.picAnim_MouseMove(var_18, var_1C, var_20, var_24)
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Load() '87BE20
|
||||
Dim Me As Variant
|
||||
Dim var_18 As Variant
|
||||
Dim var_1C As Variant
|
||||
Dim var_6C As PictureBox
|
||||
Dim global_00886072 As PictureBox
|
||||
Dim var_74 As PictureBox
|
||||
loc_0087BE9D: var_18 = Global.Screen
|
||||
loc_0087BECB: var_64 = Global.Width
|
||||
loc_0087BF0B: var_1C = Global.Screen
|
||||
loc_0087BF2B: var_68 = Global.Height
|
||||
loc_0087BF9E: var_eax = Unknown_VTable_Call[edi+000002A4h]
|
||||
loc_0087BFEE: var_eax = Proc_12_45_86D280(var_18, var_18, Unknown_VTable_Call[edi+000002A4h])
|
||||
loc_0087BFFF: var_eax = challengeOptions.VTable_000006F8
|
||||
loc_0087C032: var_eax = Proc_12_43_86D100(var_2C, var_18, var_18)
|
||||
loc_0087C074: work.ForeColor = RGB(180, 30, 70)
|
||||
loc_0087C0DA: var_eax = Proc_12_47_86E570(var_18, var_18, global_008868BC)
|
||||
loc_0087C10A: var_eax = Proc_12_25_868460(4, global_008868BC, var_18)
|
||||
loc_0087C122: If global_886010 = 1 Then
|
||||
loc_0087C130: End If
|
||||
loc_0087C133: var_eax = challengeOptions.VTable_0000073C
|
||||
loc_0087C14E: var_eax = challengeOptions.VTable_00000734
|
||||
loc_0087C166: global_886124 = FFFFFFh
|
||||
loc_0087C172: var_eax = challengeOptions.VTable_00000748
|
||||
loc_0087C18A: var_eax = Proc_9_10_844CB0(Me, Me, Me)
|
||||
loc_0087C192: var_eax = challengeOptions.VTable_00000720
|
||||
loc_0087C1AD: var_eax = challengeOptions.VTable_000006FC
|
||||
loc_0087C1C8: var_eax = challengeOptions.VTable_0000071C
|
||||
loc_0087C1E0: var_eax = Proc_84A1B0(Me, Me, Me)
|
||||
loc_0087C1FF: var_64 = display.Width
|
||||
loc_0087C228: global_886070 = CInt(var_64)
|
||||
loc_0087C24E: var_64 = display.Height
|
||||
loc_0087C277: global_886072 = CInt(var_64)
|
||||
loc_0087C2B9: work.Width = global_00886070
|
||||
loc_0087C315: work.Height = global_00886072
|
||||
loc_0087C354: Set work.Top = work.Top = %x1s = var_18
|
||||
loc_0087C371: call Proc_10_13_84B1F0(work.Top = %x1s, global_00886070, Me)
|
||||
loc_0087C38E: var_6C = work.Top = %x1s
|
||||
loc_0087C391: display.ScaleLeft = global_C2C80000
|
||||
loc_0087C3D2: display.ScaleWidth = global_43480000
|
||||
loc_0087C426: var_B4 = global_00886072
|
||||
loc_0087C439: var_6C = var_18
|
||||
loc_0087C43C: var_C0 = global_00886070
|
||||
loc_0087C44F: If global_886000 = 0 Then
|
||||
loc_0087C457: GoTo loc_0087C46A
|
||||
loc_0087C459: End If
|
||||
loc_0087C46A: 'Referenced from: 0087C457
|
||||
loc_0087C48A: display.ScaleTop = ((var_B4 / var_C0) * global_401680)
|
||||
loc_0087C4DE: var_D0 = global_00886072
|
||||
loc_0087C4F1: var_6C = var_18
|
||||
loc_0087C4F4: var_DC = global_00886070
|
||||
loc_0087C507: If global_886000 = 0 Then
|
||||
loc_0087C50F: GoTo loc_0087C522
|
||||
loc_0087C511: End If
|
||||
loc_0087C522: 'Referenced from: 0087C50F
|
||||
loc_0087C542: display.ScaleHeight = ((var_D0 / var_DC) * global_401678)
|
||||
loc_0087C57B: var_74 = var_1C
|
||||
loc_0087C595: var_64 = display.ScaleLeft
|
||||
loc_0087C5BC: display.ScaleLeft = var_64
|
||||
loc_0087C5FF: var_74 = var_1C
|
||||
loc_0087C619: var_64 = display.ScaleWidth
|
||||
loc_0087C640: display.ScaleWidth = var_64
|
||||
loc_0087C683: var_74 = var_1C
|
||||
loc_0087C69D: var_64 = display.ScaleTop
|
||||
loc_0087C6C4: display.ScaleTop = var_64
|
||||
loc_0087C707: var_74 = var_1C
|
||||
loc_0087C721: var_64 = display.ScaleHeight
|
||||
loc_0087C748: display.ScaleHeight = var_64
|
||||
loc_0087C79D: work.DrawWidth = CInt(1)
|
||||
loc_0087C7C3: var_eax = challengeOptions.VTable_00000704
|
||||
loc_0087C7DE: var_eax = challengeOptions.VTable_00000730
|
||||
loc_0087C7F9: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_0087C81E: GoTo loc_0087C83D
|
||||
loc_0087C83C: Exit Sub
|
||||
loc_0087C83D: 'Referenced from: 0087C81E
|
||||
loc_0087C83D: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Unload(Cancel As Integer) '87CA10
|
||||
Dim Me As Me
|
||||
Dim var_18 As Me
|
||||
loc_0087CA7B: var_eax = Proc_12_44_86D1C0(var_28, var_18, var_18)
|
||||
loc_0087CAA7: Set %x1 = Me.Top = var_18
|
||||
loc_0087CACB: Set Me.Top = Me.Top = %x1s = %x1 = Me.Top
|
||||
loc_0087CADD: var_eax = challengeOptions.VTable_00000744
|
||||
loc_0087CB05: GoTo loc_0087CB1A
|
||||
loc_0087CB19: Exit Sub
|
||||
loc_0087CB1A: 'Referenced from: 0087CB05
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '87BC00
|
||||
Dim Me As Variant
|
||||
loc_0087BC52: If KeyCode = 123 Then
|
||||
loc_0087BC54: var_eax = Proc_12_18_864A90(edi, Me, ebx)
|
||||
loc_0087BC59: GoTo loc_0087BD3B
|
||||
loc_0087BC5E: End If
|
||||
loc_0087BC7D: 1 = btnButton._Default
|
||||
loc_0087BCAB: var_20 = btnButton.Visible
|
||||
loc_0087BCD5: If var_20 = 13 Then eax = 1
|
||||
loc_0087BCF0: If var_20 Then
|
||||
loc_0087BD00: var_eax = challengeOptions.btnButton_Click
|
||||
loc_0087BD08: If challengeOptions.btnButton_Click >= 0 Then GoTo loc_0087BD3B
|
||||
loc_0087BD0A: GoTo loc_0087BD2D
|
||||
loc_0087BD0C: End If
|
||||
loc_0087BD13: If KeyCode <> 27 Then GoTo loc_0087BD3B
|
||||
loc_0087BD23: var_eax = challengeOptions.btnButton_Click
|
||||
loc_0087BD2B: If challengeOptions.btnButton_Click >= 0 Then GoTo loc_0087BD3B
|
||||
loc_0087BD2D: 'Referenced from: 0087BD0A
|
||||
loc_0087BD39: challengeOptions.btnButton_Click = CheckObj(Me, global_0040EDD0, 1884)
|
||||
loc_0087BD3B: 'Referenced from: 0087BC59
|
||||
loc_0087BD47: GoTo loc_0087BD5D
|
||||
loc_0087BD5C: Exit Sub
|
||||
loc_0087BD5D: 'Referenced from: 0087BD47
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyPress(KeyAscii As Integer) '87BD80
|
||||
loc_0087BDCC: If KeyAscii = 13 Then
|
||||
loc_0087BDDC: var_eax = challengeOptions.btnButton_Click
|
||||
loc_0087BDF8: End If
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '87C980
|
||||
loc_0087C9C3: var_eax = challengeOptions.VTable_00000700
|
||||
End Sub
|
||||
|
||||
Private Sub txtLevel_Change() '8839F0
|
||||
loc_00883A55: var_18 = txtLevel.Text
|
||||
loc_00883A9C: var_eax = challengeOptions.VTable_00000738
|
||||
loc_00883AC1: GoTo loc_00883AD6
|
||||
loc_00883AD5: Exit Sub
|
||||
loc_00883AD6: 'Referenced from: 00883AC1
|
||||
End Sub
|
||||
|
||||
Private Sub txtLevel_LostFocus() '883B00
|
||||
loc_00883B65: var_18 = txtLevel.Text
|
||||
loc_00883BB6: var_eax = challengeOptions.VTable_00000738
|
||||
loc_00883BD1: var_eax = challengeOptions.VTable_0000071C
|
||||
loc_00883BEC: var_eax = challengeOptions.VTable_0000074C
|
||||
loc_00883C0D: GoTo loc_00883C22
|
||||
loc_00883C21: Exit Sub
|
||||
loc_00883C22: 'Referenced from: 00883C0D
|
||||
End Sub
|
||||
|
||||
Private Sub txtLevel_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '8849A0
|
||||
loc_008849E3: var_eax = challengeOptions.VTable_00000700
|
||||
End Sub
|
||||
|
||||
Private Sub display_Click() '87BAF0
|
||||
Dim Me As Me
|
||||
loc_0087BB30: var_eax = Proc_9_20_8476B0(edi, Me, ebx)
|
||||
End Sub
|
||||
|
||||
Private Sub display_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '87BB70
|
||||
loc_0087BBB3: var_eax = challengeOptions.VTable_00000700
|
||||
End Sub
|
||||
Binary file not shown.
File diff suppressed because it is too large.
Load diff
Binary file not shown.
+369
@@ -0,0 +1,369 @@
|
||||
VERSION 5.00
|
||||
Begin VB.Form frmMain
|
||||
BackColor = &H0&
|
||||
WindowState = 2
|
||||
MousePointer = 99 'Custom
|
||||
ScaleMode = 3
|
||||
AutoRedraw = True
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
LinkTopic = "Form1"
|
||||
MaxButton = 0 'False
|
||||
MinButton = 0 'False
|
||||
ControlBox = 0 'False
|
||||
Tag = "main"
|
||||
KeyPreview = -1 'True
|
||||
ClientLeft = 5595
|
||||
ClientTop = 2790
|
||||
ClientWidth = 7560
|
||||
ClientHeight = 6690
|
||||
MouseIcon = "frmMain.frx":0
|
||||
ShowInTaskbar = 0 'False
|
||||
Moveable = 0 'False
|
||||
Begin Timer tmrActivate
|
||||
Interval = 1
|
||||
Left = 4080
|
||||
Top = 1140
|
||||
End
|
||||
Begin Label devLabel
|
||||
Caption = "Main"
|
||||
BackColor = &H0&
|
||||
ForeColor = &HFFFFFF&
|
||||
Left = 1200
|
||||
Top = 780
|
||||
Width = 1290
|
||||
Height = 690
|
||||
Visible = 0 'False
|
||||
TabIndex = 0
|
||||
AutoSize = -1 'True
|
||||
BackStyle = 0 'Transparent
|
||||
BeginProperty Font
|
||||
Name = "MS Sans Serif"
|
||||
Size = 30
|
||||
Charset = 0
|
||||
Weight = 400
|
||||
Underline = 0 'False
|
||||
Italic = 0 'False
|
||||
Strikethrough = 0 'False
|
||||
EndProperty
|
||||
End
|
||||
End
|
||||
|
||||
Attribute VB_Name = "frmMain"
|
||||
|
||||
|
||||
Private Sub Form_Load() '824760
|
||||
Dim Me As Me
|
||||
loc_008247C7: var_eax = Proc_12_43_86D100(var_28, var_18, var_18)
|
||||
loc_00824849: Me.Move edi, , var_34, 0
|
||||
loc_00824867: var_eax = Proc_12_20_865570(var_2C, 2, var_44)
|
||||
loc_0082487C: GoTo loc_00824891
|
||||
loc_00824890: Exit Sub
|
||||
loc_00824891: 'Referenced from: 0082487C
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Unload(Cancel As Integer) '824A60
|
||||
loc_00824AC7: var_eax = Proc_12_44_86D1C0(var_28, var_18, var_18)
|
||||
loc_00824ADE: global_886128 = FFFFFFh
|
||||
loc_00824AEF: GoTo loc_00824B04
|
||||
loc_00824B03: Exit Sub
|
||||
loc_00824B04: 'Referenced from: 00824AEF
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Deactivate() '823D20
|
||||
loc_00823DAA: var_eax = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_00823DC6: var_1C = frmMain.hWnd
|
||||
loc_00823DF3: frmMain.MouseIcon = var_1C
|
||||
loc_00823E30: GoTo loc_00823E4A
|
||||
loc_00823E49: Exit Sub
|
||||
loc_00823E4A: 'Referenced from: 00823E30
|
||||
End Sub
|
||||
|
||||
Private Sub Form_DblClick() '823C50
|
||||
loc_00823CB1: var_24 = global_008860EC
|
||||
loc_00823CCD: var_20 = global_008860EA
|
||||
loc_00823CD7: var_eax = frmMain.Form_MouseDown(var_18, var_1C, var_20, var_24)
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '8245F0
|
||||
loc_00824637: If global_8860E0 Then
|
||||
loc_00824644: If Shift = 4 Then
|
||||
loc_00824650: If KeyCode = 82 Then GoTo loc_0082472B
|
||||
loc_0082465A: If KeyCode <> 88 Then GoTo loc_00824730
|
||||
loc_00824660: var_eax = Proc_867740(edi, esi, ebx)
|
||||
loc_00824665: GoTo loc_00824730
|
||||
loc_0082466A: End If
|
||||
loc_00824674: If KeyCode = 83 Then
|
||||
loc_00824676: global_8860EE = FFFFFFh
|
||||
loc_0082467F: GoTo loc_00824730
|
||||
loc_00824684: End If
|
||||
loc_00824688: If KeyCode = 112 Then
|
||||
loc_00824692: If global_8861A2 = 0 Then GoTo loc_00824730
|
||||
loc_008246A1: global_88611A = Not (0088611Ah)
|
||||
loc_008246A7: GoTo loc_00824730
|
||||
loc_008246AC: End If
|
||||
loc_008246B0: If Not (0088611Ah) = 0 Then
|
||||
loc_008246BC: global_886126 = Not (00886126h)
|
||||
loc_008246C3: GoTo loc_00824730
|
||||
loc_008246C5: End If
|
||||
loc_008246C9: If Not (0088611Ah) = 0 Then
|
||||
loc_008246D3: If global_886010 <> 2 Then GoTo loc_00824730
|
||||
loc_008246D5: var_eax = Proc_9_12_845740(, , fs:[00000000h])
|
||||
loc_008246DA: var_eax = Proc_12_18_864A90(, , )
|
||||
loc_008246DF: GoTo loc_00824730
|
||||
loc_008246E1: End If
|
||||
loc_008246E5: If Proc_12_18_864A90(, , ) = 0 Then
|
||||
loc_008246E7: global_8860F4 = FFFFFFh
|
||||
loc_008246F0: GoTo loc_00824730
|
||||
loc_008246F2: End If
|
||||
loc_008246F6: If Proc_12_18_864A90(, , ) = 0 Then
|
||||
loc_008246F8: global_8860F0 = FFFFFFh
|
||||
loc_00824701: GoTo loc_00824730
|
||||
loc_00824703: End If
|
||||
loc_00824707: If Proc_12_18_864A90(, , ) = 0 Then
|
||||
loc_00824709: global_8860F6 = FFFFFFh
|
||||
loc_00824712: GoTo loc_00824730
|
||||
loc_00824714: End If
|
||||
loc_00824718: If Proc_12_18_864A90(, , ) = 0 Then
|
||||
loc_0082471A: global_8860F2 = FFFFFFh
|
||||
loc_00824723: GoTo loc_00824730
|
||||
loc_00824725: End If
|
||||
loc_00824729: If Proc_12_18_864A90(, , ) = 0 Then
|
||||
loc_0082472B: var_eax = Proc_8676E0()
|
||||
loc_00824730: End If
|
||||
loc_00824730: End If
|
||||
loc_00824730:
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyPress(KeyAscii As Integer) '823E70
|
||||
loc_00823EC1: If global_8860E0 Then
|
||||
loc_00823EED: var_20 = LCase$(Chr$(KeyAscii))
|
||||
loc_00823F0B: If (var_20 = global_0040EBD8) = 0 Then
|
||||
loc_00823F0D: call Proc_854AB0(0, @(%StkVar2 = %x1), ebx)
|
||||
loc_00823F12: GoTo loc_00823FA2
|
||||
loc_00823F17: End If
|
||||
loc_00823F24: If (var_20 = global_0040EA74) = 0 Then
|
||||
loc_00823F31: GoTo loc_00823F9D
|
||||
loc_00823F33: End If
|
||||
loc_00823F40: If (var_20 = global_0040EA7C) = 0 Then
|
||||
loc_00823F49: GoTo loc_00823F99
|
||||
loc_00823F4B: End If
|
||||
loc_00823F58: If (var_20 = global_0040EA84) = 0 Then
|
||||
loc_00823F65: GoTo loc_00823F9D
|
||||
loc_00823F67: End If
|
||||
loc_00823F74: If (var_20 = global_0040EA8C) = 0 Then
|
||||
loc_00823F81: GoTo loc_00823F9D
|
||||
loc_00823F83: End If
|
||||
loc_00823F90: If (var_20 <> global_0040E8E0) <> 0 Then GoTo loc_00823FA2
|
||||
loc_00823F99: 'Referenced from: 00823F49
|
||||
loc_00823F9D: 'Referenced from: 00823F31
|
||||
loc_00823F9D: var_eax = Proc_12_22_866FA0(var_1C, var_1C, var_1C)
|
||||
loc_00823FA2: End If
|
||||
loc_00823FAA: GoTo loc_00823FB6
|
||||
loc_00823FB5: Exit Sub
|
||||
loc_00823FB6: 'Referenced from: 00823FAA
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) '823FE0
|
||||
loc_00824029: If KeyCode = 83 Then
|
||||
loc_0082402B: global_8860EE = 0
|
||||
loc_00824034: GoTo loc_00824078
|
||||
loc_00824036: End If
|
||||
loc_0082403A: If KeyCode = 37 Then
|
||||
loc_0082403C: global_8860F4 = 0
|
||||
loc_00824045: GoTo loc_00824078
|
||||
loc_00824047: End If
|
||||
loc_0082404B: If KeyCode = 38 Then
|
||||
loc_0082404D: global_8860F0 = 0
|
||||
loc_00824056: GoTo loc_00824078
|
||||
loc_00824058: End If
|
||||
loc_0082405C: If KeyCode = 39 Then
|
||||
loc_0082405E: global_8860F6 = 0
|
||||
loc_00824067: GoTo loc_00824078
|
||||
loc_00824069: End If
|
||||
loc_0082406D: If KeyCode = 40 Then
|
||||
loc_0082406F: global_8860F2 = 0
|
||||
loc_00824078: End If
|
||||
loc_00824078:
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) '8240A0
|
||||
Dim var_20 As Screen
|
||||
loc_008240FE: If global_8860E0 Then
|
||||
loc_00824118: var_58 = Button
|
||||
loc_0082411B: If Button = var_886102 Then
|
||||
loc_00824131: 00886070h = 00886070h + 00886074h
|
||||
loc_0082413D: If 008860EAh < 0 Then
|
||||
loc_00824142: If 008860EAh > var_886074 Then
|
||||
loc_00824151: If 008860ECh > var_886076 Then
|
||||
loc_00824155: GoTo loc_0082415C
|
||||
loc_00824157: End If
|
||||
loc_00824157: End If
|
||||
loc_00824157: End If
|
||||
loc_0082415C: 'Referenced from: 00824155
|
||||
loc_00824165: 00886072h = 00886072h + 00886076h
|
||||
loc_0082417B: If global_8860EC >= 0 Then ebx = 1
|
||||
loc_00824180: If ebx Or 1 = 0 Then
|
||||
loc_0082418B: global_8860F8 = FFFFFFh
|
||||
loc_008241B5: var_20 = Global.Screen
|
||||
loc_008241F1: var_eax = Unknown_VTable_Call[edx+00000310h]
|
||||
loc_0082420D: var_1C = Global.FontCount
|
||||
loc_0082423A: Global.MouseIcon = var_24
|
||||
loc_00824289: global_8860FA = global_008860EA
|
||||
loc_00824290: global_8860FC = global_008860EC
|
||||
loc_0082429F: global_8860FE = CInt(global_886064)
|
||||
loc_008242A7: global_886100 = CInt(global_886068)
|
||||
loc_008242AF: GoTo loc_0082443F
|
||||
loc_008242B4: End If
|
||||
loc_008242BA: GoTo loc_008242C1
|
||||
loc_008242BC: End If
|
||||
loc_008242C1: 'Referenced from: 008242BA
|
||||
loc_008242C8: If global_8860A0 = 0 Then
|
||||
loc_008242D5: If global_8860A2 = 0 Then
|
||||
loc_008242E2: If var_58 = var_886106 Then
|
||||
loc_008242EB: If global_886108 = 0 Then
|
||||
loc_008242FB: If 008860EAh > var_886074 Then
|
||||
loc_008242FF: GoTo loc_00824306
|
||||
loc_00824301: End If
|
||||
loc_00824301: End If
|
||||
loc_00824301: End If
|
||||
loc_00824306: 'Referenced from: 008242FF
|
||||
loc_0082431F: If global_8860EA >= 0 Then ebx = 1
|
||||
loc_00824324: If ebx Or 1 = 0 Then
|
||||
loc_00824334: If 008860ECh > var_886076 Then
|
||||
loc_00824338: GoTo loc_0082433F
|
||||
loc_0082433A: End If
|
||||
loc_0082433A: End If
|
||||
loc_0082433F: 'Referenced from: 00824338
|
||||
loc_00824342: 00886072h = 00886072h + 00886076h
|
||||
loc_00824358: If global_8860EC >= 0 Then ebx = 1
|
||||
loc_0082435D: If ebx Or 1 = 0 Then
|
||||
loc_0082437E: var_eax = Screen.1800
|
||||
loc_008243B7: var_eax = Screen.1800
|
||||
loc_008243D3: GoTo loc_0082443F
|
||||
loc_008243EF: If 008860EAh < 0 Then
|
||||
loc_008243F4: If 008860EAh > var_886074 Then
|
||||
loc_00824404: If 008860ECh > var_886076 Then
|
||||
loc_0082440A: GoTo loc_00824413
|
||||
loc_0082440C: End If
|
||||
loc_0082440C: End If
|
||||
loc_0082440C: End If
|
||||
loc_00824413: 'Referenced from: 0082440A
|
||||
loc_00824413: Screen.1800 = Screen.1800 + 00886076h
|
||||
loc_00824425: If global_8860EC >= 0 Then edx = 1
|
||||
loc_0082442A: If edx Or 1 = 0 Then
|
||||
loc_0082442C: var_eax = Proc_11_3_854DB0(@CInt(), global_00886104, var_28)
|
||||
loc_00824431: GoTo loc_0082443F
|
||||
loc_00824433: End If
|
||||
loc_0082443A: var_eax = Proc_12_22_866FA0(var_28, var_2C, var_30)
|
||||
loc_0082443F: End If
|
||||
loc_0082443F: End If
|
||||
loc_0082443F: End If
|
||||
loc_0082443F: End If
|
||||
loc_00824448: GoTo loc_00824466
|
||||
loc_00824465: Exit Sub
|
||||
loc_00824466: 'Referenced from: 00824448
|
||||
loc_00824466: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '824490
|
||||
loc_008244D7: If global_8860E0 Then
|
||||
loc_008244ED: global_8860EA = CInt(6.37066138261923E-314)
|
||||
loc_008244FF: global_8860EC = CInt(6.37066138261923E-314)
|
||||
loc_00824505: If global_8860F8 Then
|
||||
loc_0082450E: 008860FAh = 008860FAh - 008860EAh
|
||||
loc_0082451B: 008860FAh = 008860FAh + 008860FEh
|
||||
loc_00824538: 008860FCh = 008860FCh - CInt(6.37066138261923E-314)
|
||||
loc_00824541: 008860FCh = 008860FCh + 00886100h
|
||||
loc_00824548: global_886064 = 0
|
||||
loc_0082455D: global_886068 = 0
|
||||
loc_00824563: var_eax = Proc_853780(Y, @CInt(), ebx)
|
||||
loc_00824568: End If
|
||||
loc_00824575: If Err.Number Then
|
||||
loc_0082457C: GoTo loc_00824580
|
||||
loc_0082457E: End If
|
||||
loc_00824580: 'Referenced from: 0082457C
|
||||
loc_0082458D: var_2C = global_00886076
|
||||
loc_008245A1: GoTo loc_008245A5
|
||||
loc_008245A3: End If
|
||||
loc_008245A5: 'Referenced from: 008245A1
|
||||
loc_008245A7: If eax Then
|
||||
loc_008245B1: If global_8861B4 = 0 Then GoTo loc_008245B8
|
||||
loc_008245B3: End If
|
||||
loc_008245B3: var_eax = Proc_866B90(, , )
|
||||
loc_008245B8: End If
|
||||
loc_008245B8:
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) '8248C0
|
||||
Dim var_20 As Screen
|
||||
loc_00824914: If global_8860E0 Then
|
||||
loc_00824927: If Button = var_886102 Then
|
||||
loc_0082495A: var_20 = Global.Screen
|
||||
loc_00824996: var_eax = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_008249B2: var_1C = Global.FontCount
|
||||
loc_008249DF: Global.MouseIcon = var_1C
|
||||
loc_00824A16: End If
|
||||
loc_00824A16: End If
|
||||
loc_00824A1E: GoTo loc_00824A3C
|
||||
loc_00824A3B: Exit Sub
|
||||
loc_00824A3C: 'Referenced from: 00824A1E
|
||||
End Sub
|
||||
|
||||
Private Sub tmrActivate_Timer() '824B30
|
||||
Dim Me As Me
|
||||
Dim var_18 As Variant
|
||||
Dim global_00887AE8 As Global
|
||||
Dim var_20 As Screen
|
||||
Dim global_008868BC As Me
|
||||
loc_00824B9E: tmrActivate.Enabled = ebx
|
||||
loc_00824BDC: var_eax = Proc_10_11_84A820(var_18, var_18, var_18)
|
||||
loc_00824BE6: var_eax = Proc_854A60(Me, global_0040C7EC, var_18)
|
||||
loc_00824BEB: global_88601A = FFFFFFh
|
||||
loc_00824BF4: var_eax = Proc_12_23_867A20(Me, Me, Me)
|
||||
loc_00824BF9: var_eax = Proc_11_2_8545D0(%fobj, ebx, )
|
||||
loc_00824BFE: var_eax = Proc_86B860(, , )
|
||||
loc_00824C03: var_eax = Proc_11_1_853AD0()
|
||||
loc_00824C0F: If global_88612A = 0 Then
|
||||
loc_00824C1C: If global_886128 = 0 Then
|
||||
loc_00824C35: global_8860A8 = global_008860B4
|
||||
loc_00824C3B: global_8860AC = global_008860B8
|
||||
loc_00824C60: var_20 = Global.Screen
|
||||
loc_00824C9C: var_eax = Unknown_VTable_Call[edx+0000030Ch]
|
||||
loc_00824CB6: var_1C = Global.FontCount
|
||||
loc_00824CE3: Global.MouseIcon = var_24
|
||||
loc_00824D18: var_eax = Proc_12_19_865110(var_24, var_1C, var_18)
|
||||
loc_00824D1D: var_eax = Proc_9_12_845740(Unknown_VTable_Call[edx+0000030Ch], global_00886638)
|
||||
loc_00824D25: global_88613C = FFFFFFh
|
||||
loc_00824D2E: End If
|
||||
loc_00824D2E: End If
|
||||
loc_00824D2E: var_eax = Proc_12_35_86B900
|
||||
loc_00824D3A: If global_886128 = 0 Then GoTo loc_00824BF9
|
||||
loc_00824D47: var_eax = Proc_9_12_845740
|
||||
loc_00824D4C: var_eax = Proc_9_11_845460
|
||||
loc_00824D76: var_6C = global_00887AE8
|
||||
loc_00824D79: Set var_18 = Me
|
||||
loc_00824D84: var_eax = Global.Unload var_18
|
||||
loc_00824DAD: If global_886010 = 1 Then
|
||||
loc_00824DB7: If global_88601C = var_FFFFFF Then
|
||||
loc_00824DB9: var_eax = Proc_884A40
|
||||
loc_00824DBE: GoTo loc_00824ED6
|
||||
loc_00824DC3: End If
|
||||
loc_00824DC3: End If
|
||||
loc_00824DC3: var_eax = Proc_86F0B0
|
||||
loc_00824DD2: If 00886018h = 1 Then
|
||||
loc_00824E33: var_eax = classicOptions.Show var_34, var_30
|
||||
loc_00824E3F: If classicOptions.Show var_34, var_30 < 0 Then
|
||||
loc_00824E4F: GoTo loc_00824ECE
|
||||
loc_00824E51: End If
|
||||
loc_00824E55: If classicOptions.Show var_34, var_30 <> 0 Then GoTo loc_00824ED6
|
||||
loc_00824EB6: var_eax = challengeOptions.Show var_34, var_30
|
||||
loc_00824EC2: If challengeOptions.Show var_34, var_30 < 0 Then
|
||||
loc_00824ECE: 'Referenced from: 00824E4F
|
||||
loc_00824ED0: challengeOptions.Show var_34, var_30 = CheckObj(global_008868BC, global_0040EDA0, 688)
|
||||
loc_00824ED6: End If
|
||||
loc_00824ED6: End If
|
||||
loc_00824EDE: GoTo loc_00824EFC
|
||||
loc_00824EFB: Exit Sub
|
||||
loc_00824EFC: 'Referenced from: 00824EDE
|
||||
End Sub
|
||||
Binary file not shown.
+2053
File diff suppressed because it is too large.
Load diff
Binary file not shown.
@@ -0,0 +1,256 @@
|
||||
|
||||
Public Sub Proc_8_0_842840
|
||||
loc_00842875: global_00886BF4 = CInt(0)
|
||||
loc_0084287B: var_40 = global_00886BF4
|
||||
loc_00842886: global_886C08 = 1
|
||||
loc_0084288C: If 0001h <= global_00886BF4 Then
|
||||
loc_00842897: global_00886BE4 = CInt(0)
|
||||
loc_0084289D: var_48 = global_00886BE4
|
||||
loc_008428A8: global_886C06 = 1
|
||||
loc_008428AE: If 0001h <= global_00886BE4 Then
|
||||
loc_008428F5: If Err.Number Then
|
||||
loc_008428FC: GoTo loc_00842900
|
||||
loc_008428FE: End If
|
||||
loc_00842900: 'Referenced from: 008428FC
|
||||
loc_00842918: If eax And 8940558 Then
|
||||
loc_00842926: If var_886C14 Then
|
||||
loc_0084292C: If 00886C14h = 2 Then
|
||||
loc_0084293B: 00886C06h = 00886C06h - 0.%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_0084293F: If 00886C06h >= 0 Then
|
||||
loc_00842941: var_eax = Err.Raise
|
||||
loc_0084294D: End If
|
||||
loc_0084295A: 00886C08h = 00886C08h - 0.%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_0084295E: If 00886C08h >= 0 Then
|
||||
loc_00842960: var_eax = Err.Raise
|
||||
loc_0084296C: End If
|
||||
loc_0084297C: 0.%x1 = Invoke 'Ignore this = 0.%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842984: GoTo loc_00842B28
|
||||
loc_00842989: End If
|
||||
loc_00842989: End If
|
||||
loc_00842989: var_eax = Err.Raise
|
||||
loc_008429A3: GoTo loc_00842B28
|
||||
loc_008429A8: End If
|
||||
loc_008429B8: var_20 = global_00886C06
|
||||
loc_008429BB: If global_886C0E Then
|
||||
loc_008429C3: If var_886C14 Then
|
||||
loc_008429C9: If 00886C14h = 2 Then
|
||||
loc_008429D8: 00886C06h = 00886C06h - 0.%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_008429DC: If 00886C06h >= 0 Then
|
||||
loc_008429DE: var_eax = Err.Raise
|
||||
loc_008429E9: End If
|
||||
loc_008429F6: 00886C08h = 00886C08h - 0.%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_008429FA: If 00886C08h >= 0 Then
|
||||
loc_008429FC: var_eax = Err.Raise
|
||||
loc_00842A07: End If
|
||||
loc_00842A0D: 0.%x1 = Invoke 'Ignore this = 0.%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842A11: GoTo loc_00842A1B
|
||||
loc_00842A13: End If
|
||||
loc_00842A13: End If
|
||||
loc_00842A13: var_eax = Err.Raise
|
||||
loc_00842A1B: 'Referenced from: 00842A11
|
||||
loc_00842A2C: 00886C04h = 00886C04h - 0001h
|
||||
loc_00842A3F: var_54 = global_00886C04
|
||||
loc_00842A78: GoTo loc_00842B1F
|
||||
loc_00842A7D: End If
|
||||
loc_00842A7F: If CInt((Int((Rnd(var_20) * var_54)) + global_401850)) Then
|
||||
loc_00842A85: If CInt((Int((Rnd(var_20) * var_54)) + global_401850)) = 0 Then
|
||||
loc_00842A94: 00886C06h = 00886C06h - 0.%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_00842A98: If 00886C06h >= 0 Then
|
||||
loc_00842A9A: var_eax = Err.Raise
|
||||
loc_00842AA5: End If
|
||||
loc_00842AB2: 00886C08h = 00886C08h - 0.%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842AB6: If 00886C08h >= 0 Then
|
||||
loc_00842AB8: var_eax = Err.Raise
|
||||
loc_00842AC3: End If
|
||||
loc_00842AC9: 0.%x1 = Invoke 'Ignore this = 0.%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842ACD: GoTo loc_00842AD7
|
||||
loc_00842ACF: End If
|
||||
loc_00842ACF: End If
|
||||
loc_00842ACF: var_eax = Err.Raise
|
||||
loc_00842AD7: 'Referenced from: 00842ACD
|
||||
loc_00842AEE: var_5C = global_00886C04
|
||||
loc_00842B1F: 'Referenced from: 00842A78
|
||||
loc_00842B28: 'Referenced from: 00842984
|
||||
loc_00842B33: 00886C06h = 00886C06h + 00000001h
|
||||
loc_00842B38: GoTo loc_008428A4
|
||||
loc_00842B3D: End If
|
||||
loc_00842B48: 00886C08h = 00886C08h + 00000001h
|
||||
loc_00842B4D: GoTo loc_00842882
|
||||
loc_00842B52: End If
|
||||
loc_00842B58: GoTo loc_00842B64
|
||||
loc_00842B63: Exit Sub
|
||||
loc_00842B64: 'Referenced from: 00842B58
|
||||
loc_00842B64: Exit Sub
|
||||
loc_00842B75: Exit Sub
|
||||
loc_00842B76: End If
|
||||
loc_00842B76: End If
|
||||
loc_00842B76: End If
|
||||
loc_00842B76: End If
|
||||
loc_00842B76: GoTo loc___vbaFPException
|
||||
End Sub
|
||||
|
||||
Public Sub Proc_8_1_842B90
|
||||
loc_00842BE5: global_00886BE4 = Me
|
||||
loc_00842C00: global_00886BF4 = arg_C
|
||||
loc_00842C17: global_886C04 = arg_10
|
||||
loc_00842C2D: global_886C0E = arg_14
|
||||
loc_00842C34: ReDim global_00886C14(global_FFFFFFFE To 99, global_FFFFFFFE To 99)
|
||||
loc_00842C44: 00886178h = 00886178h - ebx
|
||||
loc_00842C46: If var_886178 Then
|
||||
loc_00842C48: eax = 00886178h - 1
|
||||
loc_00842C49: If 00886178h - 1 Then
|
||||
loc_00842C4B: eax = 00886178h - 1 - 1
|
||||
loc_00842C4C: If 00886178h - 1 - 1 <> 0 Then GoTo loc_00842CBA
|
||||
loc_00842C65: var_18 = global_00886014 & "challengeHard.flx"
|
||||
loc_00842C71: GoTo loc_00842CBA
|
||||
loc_00842C73: End If
|
||||
loc_00842C89: var_18 = global_00886014 & "challengeEasy.flx"
|
||||
loc_00842C95: GoTo loc_00842CBA
|
||||
loc_00842C97: End If
|
||||
loc_00842CAE: var_18 = global_00886014 & "challengeSW.flx"
|
||||
loc_00842CBA: 'Referenced from: 00842C71
|
||||
loc_00842CD3: Get #1, global_0088617C, var_1C
|
||||
loc_00842CDC: fchs
|
||||
loc_00842CDE: var_28 = var_1C
|
||||
loc_00842D12: If global_886C0E Then
|
||||
loc_00842D1B: global_886C10 = global_00886C04
|
||||
loc_00842D22: GoTo loc_00842D2D
|
||||
loc_00842D24: End If
|
||||
loc_00842D24: global_886C10 = &H63
|
||||
loc_00842D2D: 'Referenced from: 00842D22
|
||||
loc_00842D2D: call Proc_8_0_842840(0, var_30 = %S_edx_S, ebx)
|
||||
loc_00842D37: global_00886BF4 = CInt()
|
||||
loc_00842D3D: var_5C = global_00886BF4
|
||||
loc_00842D48: global_886C08 = 1
|
||||
loc_00842D4E: If 0001h <= global_00886BF4 Then
|
||||
loc_00842D59: global_00886BE4 = CInt()
|
||||
loc_00842D5F: var_64 = global_00886BE4
|
||||
loc_00842D6A: global_886C06 = 1
|
||||
loc_00842D71: If 0001h <= global_00886BE4 Then
|
||||
loc_00842D7F: If var_886020 Then
|
||||
loc_00842D85: If 00886020h = 2 Then
|
||||
loc_00842D93: 0001h = 0001h - ecx+0000001Ch
|
||||
loc_00842D98: If 0001h >= 0 Then
|
||||
loc_00842D9A: var_eax = Err.Raise
|
||||
loc_00842DA2: End If
|
||||
loc_00842DAF: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842DB3: If 00886C08h >= 0 Then
|
||||
loc_00842DB5: var_eax = Err.Raise
|
||||
loc_00842DBD: End If
|
||||
loc_00842DC3: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 0001h
|
||||
loc_00842DCB: GoTo loc_00842DDF
|
||||
loc_00842DCD: End If
|
||||
loc_00842DCD: End If
|
||||
loc_00842DCD: var_eax = Err.Raise
|
||||
loc_00842DDF: 'Referenced from: 00842DCB
|
||||
loc_00842DF1: If var_886C14 Then
|
||||
loc_00842DF7: If 00886C14h = 2 Then
|
||||
loc_00842E06: 00886C06h = 00886C06h - .%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_00842E0A: If 00886C06h >= 0 Then
|
||||
loc_00842E0C: var_eax = Err.Raise
|
||||
loc_00842E18: End If
|
||||
loc_00842E25: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842E29: If 00886C08h >= 0 Then
|
||||
loc_00842E2B: var_eax = Err.Raise
|
||||
loc_00842E37: End If
|
||||
loc_00842E3D: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842E47: GoTo loc_00842E53
|
||||
loc_00842E49: End If
|
||||
loc_00842E49: End If
|
||||
loc_00842E49: var_eax = Err.Raise
|
||||
loc_00842E53: 'Referenced from: 00842E47
|
||||
loc_00842E5B: If var_886020 Then
|
||||
loc_00842E61: If 00886020h = 2 Then
|
||||
loc_00842E70: 00886C06h = 00886C06h - .%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_00842E74: If 00886C06h >= 0 Then
|
||||
loc_00842E76: var_eax = Err.Raise
|
||||
loc_00842E88: End If
|
||||
loc_00842E92: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842E99: If 00886C08h >= 0 Then
|
||||
loc_00842E9B: var_eax = Err.Raise
|
||||
loc_00842EAD: End If
|
||||
loc_00842EB3: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842EC1: GoTo loc_00842ED1
|
||||
loc_00842EC3: End If
|
||||
loc_00842EC3: End If
|
||||
loc_00842EC3: var_eax = Err.Raise
|
||||
loc_00842ED1: 'Referenced from: 00842EC1
|
||||
loc_00842EE7: If var_886020 Then
|
||||
loc_00842EED: If 00886020h = 2 Then
|
||||
loc_00842EFC: 00886C06h = 00886C06h - .%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_00842F00: If 00886C06h >= 0 Then
|
||||
loc_00842F02: var_eax = Err.Raise
|
||||
loc_00842F0A: End If
|
||||
loc_00842F17: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842F1B: If 00886C08h >= 0 Then
|
||||
loc_00842F1D: var_eax = Err.Raise
|
||||
loc_00842F25: End If
|
||||
loc_00842F2B: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842F33: GoTo loc_00842F3D
|
||||
loc_00842F35: End If
|
||||
loc_00842F35: End If
|
||||
loc_00842F35: var_eax = Err.Raise
|
||||
loc_00842F3D: 'Referenced from: 00842F33
|
||||
loc_00842F4F: If var_886020 Then
|
||||
loc_00842F55: If 00886020h = 2 Then
|
||||
loc_00842F64: 00886C06h = 00886C06h - .%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_00842F68: If 00886C06h >= 0 Then
|
||||
loc_00842F6A: var_eax = Err.Raise
|
||||
loc_00842F72: End If
|
||||
loc_00842F7F: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842F83: If 00886C08h >= 0 Then
|
||||
loc_00842F85: var_eax = Err.Raise
|
||||
loc_00842F8D: End If
|
||||
loc_00842F93: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00842F9B: GoTo loc_00842FA5
|
||||
loc_00842F9D: End If
|
||||
loc_00842F9D: End If
|
||||
loc_00842F9D: var_eax = Err.Raise
|
||||
loc_00842FA5: 'Referenced from: 00842F9B
|
||||
loc_00842FB7: If var_886C14 Then
|
||||
loc_00842FBD: If 00886C14h = 2 Then
|
||||
loc_00842FCF: 00886C06h = 00886C06h - .%x3 = PropBag.ReadProperty(%StkVar1, %StkVar2)
|
||||
loc_00842FD3: If 00886C06h >= 0 Then
|
||||
loc_00842FD5: var_eax = Err.Raise
|
||||
loc_00842FE4: End If
|
||||
loc_00842FEE: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00842FF5: If 00886C08h >= 0 Then
|
||||
loc_00842FF7: var_eax = Err.Raise
|
||||
loc_00843006: End If
|
||||
loc_0084300C: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00843010: GoTo loc_00843021
|
||||
loc_00843012: End If
|
||||
loc_00843012: End If
|
||||
loc_00843012: var_eax = Err.Raise
|
||||
loc_00843021: 'Referenced from: 00843010
|
||||
loc_0084302F: If ecx+eax = var_886C10 Then
|
||||
loc_00843039: If global_886C0E Then
|
||||
loc_00843043: If var_886020 Then
|
||||
loc_00843049: If 00886020h = 2 Then
|
||||
loc_00843051: 00886C06h = 00886C06h - ecx+0000001Ch
|
||||
loc_00843056: If 00886C06h >= 0 Then
|
||||
loc_00843058: var_eax = Err.Raise
|
||||
loc_00843060: End If
|
||||
loc_0084306D: 00886C08h = 00886C08h - .%x1 = GetIDsOfNames(%StkVar2) 'Ignore this
|
||||
loc_00843071: If 00886C08h >= 0 Then
|
||||
loc_00843073: var_eax = Err.Raise
|
||||
loc_0084307B: End If
|
||||
loc_00843081: .%x1 = Invoke 'Ignore this = .%x1 = Invoke 'Ignore this + 00886C06h
|
||||
loc_00843089: GoTo loc_00843093
|
||||
loc_0084308B: End If
|
||||
loc_0084308B: End If
|
||||
loc_0084308B: var_eax = Err.Raise
|
||||
loc_00843093: 'Referenced from: 00843089
|
||||
loc_008430A4: End If
|
||||
loc_008430A4: End If
|
||||
loc_008430A9: 00886C06h = 00886C06h + 00000001h
|
||||
loc_008430AE: GoTo loc_00842D66
|
||||
loc_008430B3: End If
|
||||
loc_008430BE: 00886C08h = 00886C08h + 00000001h
|
||||
loc_008430C3: GoTo loc_00842D44
|
||||
loc_008430C8: End If
|
||||
loc_008430CE: GoTo loc_008430DA
|
||||
loc_008430D9: Exit Sub
|
||||
loc_008430DA: 'Referenced from: 008430CE
|
||||
loc_008430E3: Exit Sub
|
||||
End Sub
|
||||
+1313
File diff suppressed because it is too large.
Load diff
Binary file not shown.
+2003
File diff suppressed because it is too large.
Load diff
Binary file not shown.
+1727
File diff suppressed because it is too large.
Load diff
Binary file not shown.
@@ -0,0 +1,688 @@
|
||||
VERSION 5.00
|
||||
Begin VB.Form titleScreen
|
||||
BackColor = &H0&
|
||||
WindowState = 2
|
||||
ScaleMode = 3
|
||||
AutoRedraw = True
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
'Icon = n/a
|
||||
LinkTopic = "Form1"
|
||||
MaxButton = 0 'False
|
||||
MinButton = 0 'False
|
||||
ControlBox = 0 'False
|
||||
Tag = "titlescreen"
|
||||
KeyPreview = -1 'True
|
||||
ClientLeft = 4725
|
||||
ClientTop = 1410
|
||||
ClientWidth = 11970
|
||||
ClientHeight = 10125
|
||||
ShowInTaskbar = 0 'False
|
||||
Moveable = 0 'False
|
||||
Begin PictureBox rotateDisplay
|
||||
BackColor = &H8080FF&
|
||||
ForeColor = &H80000008&
|
||||
Left = 6750
|
||||
Top = 480
|
||||
Width = 1230
|
||||
Height = 1230
|
||||
Visible = 0 'False
|
||||
TabIndex = 11
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin PictureBox animDisplay
|
||||
BackColor = &H8080FF&
|
||||
ForeColor = &H80000008&
|
||||
Left = 465
|
||||
Top = 1035
|
||||
Width = 4950
|
||||
Height = 945
|
||||
Visible = 0 'False
|
||||
TabIndex = 10
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
Begin Timer tmrMainLoop
|
||||
Interval = 1
|
||||
Left = 6990
|
||||
Top = 2310
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 6
|
||||
ForeColor = &H80000008&
|
||||
Left = 7950
|
||||
Top = 6690
|
||||
Width = 1530
|
||||
Height = 450
|
||||
TabIndex = 8
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 4
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 9
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "quit"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 5
|
||||
ForeColor = &H80000008&
|
||||
Left = 5520
|
||||
Top = 6690
|
||||
Width = 1530
|
||||
Height = 450
|
||||
TabIndex = 6
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 3
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 7
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "about"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 4
|
||||
ForeColor = &H80000008&
|
||||
Left = 3090
|
||||
Top = 6690
|
||||
Width = 1530
|
||||
Height = 450
|
||||
TabIndex = 4
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 2
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 5
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "scores"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &H404040&
|
||||
Index = 3
|
||||
ForeColor = &H80000008&
|
||||
Left = 585
|
||||
Top = 6690
|
||||
Width = 1530
|
||||
Height = 450
|
||||
TabIndex = 2
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Appearance = 0 'Flat
|
||||
Begin PictureBox picAnim
|
||||
BackColor = &H450A1A&
|
||||
Index = 1
|
||||
ForeColor = &H80000008&
|
||||
Left = 60
|
||||
Top = 45
|
||||
Width = 375
|
||||
Height = 360
|
||||
TabIndex = 3
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
BorderStyle = 0 'None
|
||||
Tag = "options"
|
||||
Appearance = 0 'Flat
|
||||
End
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &HFF&
|
||||
Index = 1
|
||||
Left = 1080
|
||||
Top = 2745
|
||||
Width = 4770
|
||||
Height = 1380
|
||||
TabIndex = 1
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
End
|
||||
Begin PictureBox btnButton
|
||||
BackColor = &HFF&
|
||||
Index = 2
|
||||
Left = 1080
|
||||
Top = 4440
|
||||
Width = 4770
|
||||
Height = 1380
|
||||
TabIndex = 0
|
||||
ScaleMode = 3
|
||||
AutoRedraw = False
|
||||
FontTransparent = True
|
||||
AutoSize = -1 'True
|
||||
BorderStyle = 0 'None
|
||||
End
|
||||
End
|
||||
|
||||
Attribute VB_Name = "titleScreen"
|
||||
|
||||
|
||||
Private Sub picAnim_Click() '840610
|
||||
loc_0084065D: arg_C = arg_C + 0002h
|
||||
loc_00840668: var_18 = arg_C+0002h
|
||||
loc_0084066B: var_eax = titleScreen.btnButton_Click
|
||||
End Sub
|
||||
|
||||
Private Sub picAnim_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '8406B0
|
||||
Dim var_24 As PictureBox
|
||||
loc_00840725: Button = picAnim._Default
|
||||
loc_00840749: var_1C = picAnim.Tag
|
||||
loc_00840778: var_20 = Right$(var_1C, 1)
|
||||
loc_00840797: esi = (var_20 = global_0040F164) + 1
|
||||
loc_008407B9: If (var_20 = global_0040F164) + 1 = 0 Then
|
||||
loc_008407DC:
|
||||
loc_008407E6: If Err.Number Then
|
||||
loc_008407FB: var_58 = Button
|
||||
loc_00840808: If Err.Number Then
|
||||
loc_00840837: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_0084085B: var_1C = picAnim.Tag
|
||||
loc_00840891: esi = (var_1C = "quit") + 1
|
||||
loc_008408B0: If (var_1C = "quit") + 1 Then
|
||||
loc_008408D4: var_60 = var_24
|
||||
loc_008408E2: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840907: picAnim.Tag = "quita"
|
||||
loc_00840942: End If
|
||||
loc_00840960: var_64 = var_24
|
||||
loc_0084096E: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840992: var_1C = picAnim.Tag
|
||||
loc_008409C8: esi = (var_1C = "about") + 1
|
||||
loc_008409E7: If (var_1C = "about") + 1 Then
|
||||
loc_00840A16: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840A3B: picAnim.Tag = "abouta"
|
||||
loc_00840A73: End If
|
||||
loc_00840A9C: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840AC0: var_1C = picAnim.Tag
|
||||
loc_00840AF6: esi = (var_1C = "options") + 1
|
||||
loc_00840B15: If (var_1C = "options") + 1 Then
|
||||
loc_00840B44: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840B69: picAnim.Tag = "optionsa"
|
||||
loc_00840BA1: End If
|
||||
loc_00840BCA: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840BEE: var_1C = picAnim.Tag
|
||||
loc_00840C24: esi = (var_1C = "scores") + 1
|
||||
loc_00840C43: If (var_1C = "scores") + 1 Then
|
||||
loc_00840C72: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840C97: picAnim.Tag = "scoresa"
|
||||
loc_00840CCF: End If
|
||||
loc_00840CD2:
|
||||
loc_00840CE3: GoTo loc_008407DC
|
||||
loc_00840D03: var_68 = Err.Number
|
||||
loc_00840D11: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840D35: var_1C = picAnim.Tag
|
||||
loc_00840D66: var_18 = var_1C
|
||||
loc_00840D8C: var_1C = Right$(var_18, 1)
|
||||
loc_00840DA3: esi = (var_1C = global_0040F164) + 1
|
||||
loc_00840DAF: If (var_1C = global_0040F164) + 1 = 0 Then GoTo loc_00840CCF
|
||||
loc_00840DDE: CInt(6.37066138261923E-314) = picAnim._Default
|
||||
loc_00840E08: Len(var_18) = Len(var_18) - 00000001h
|
||||
loc_00840E1E: var_1C = Left$(var_18, Len(var_18))
|
||||
loc_00840E26: picAnim.Tag = var_1C
|
||||
loc_00840E6F: var_eax = titleScreen.drawDefaultPic(CInt(6.37066138261923E-314))
|
||||
loc_00840E8F: GoTo loc_00840CD2
|
||||
loc_00840E96: End If
|
||||
loc_00840E9F: GoTo loc_00840EC5
|
||||
loc_00840EC4: Exit Sub
|
||||
loc_00840EC5: 'Referenced from: 00840E9F
|
||||
loc_00840ECE: Exit Sub
|
||||
End Sub
|
||||
|
||||
Private Sub btnButton_Click() '83F810
|
||||
Dim Me As Me
|
||||
loc_0083F850: var_eax = Proc_9_20_8476B0(edi, Me, ebx)
|
||||
loc_0083F85B: eax = arg_C - 1
|
||||
loc_0083F85F: If arg_C - 1 <= 0 Then
|
||||
loc_0083F861: GoTo loc_[eax*4+0083F8E0h]
|
||||
loc_0083F874: GoTo loc_0083F8BA
|
||||
loc_0083F882: GoTo loc_0083F8BA
|
||||
loc_0083F890: GoTo loc_0083F8BA
|
||||
loc_0083F89E: GoTo loc_0083F8BA
|
||||
loc_0083F8AC: GoTo loc_0083F8BA
|
||||
loc_0083F8BA: End If
|
||||
loc_0083F8BA:
|
||||
End Sub
|
||||
|
||||
Private Sub btnButton_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '83F900
|
||||
Dim var_20 As Variant
|
||||
Dim var_60 As Me
|
||||
loc_0083F98A: Button = btnButton._Default
|
||||
loc_0083F9AE: var_18 = btnButton.Tag
|
||||
loc_0083F9E4: edi = (var_18 = global_0040FBA8) + 1
|
||||
loc_0083FA03: If (var_18 = global_0040FBA8) + 1 = 0 Then
|
||||
loc_0083FA13: If Button <= 2 Then
|
||||
loc_0083FA1C: var_eax = titleScreen.resetHighLights
|
||||
loc_0083FA62: Button = btnButton._Default
|
||||
loc_0083FA7D: var_60 = var_2C
|
||||
loc_0083FAA1: var_eax = Unknown_VTable_Call[ecx+00000300h]
|
||||
loc_0083FAE6: var_24 = buttons.BackColor
|
||||
loc_0083FB1B: buttons.BackColor = var_30
|
||||
loc_0083FB80: Button = btnButton._Default
|
||||
loc_0083FBA1: btnButton.Tag = global_0040FBA8
|
||||
loc_0083FBCE: GoTo loc_0083FC1C
|
||||
loc_0083FBD0: End If
|
||||
loc_0083FBD0: var_20 = var_20 - 0002h
|
||||
loc_0083FBDC: var_34 = CheckObj(var_20, global_0040E7E4, 444)
|
||||
loc_0083FC00: var_eax = PictureBox.1844
|
||||
loc_0083FC1C:
|
||||
loc_0083FC1C: End If
|
||||
loc_0083FC25: GoTo loc_0083FC54
|
||||
loc_0083FC53: Exit Sub
|
||||
loc_0083FC54: 'Referenced from: 0083FC25
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Load() '83FDA0
|
||||
Dim var_18 As Screen
|
||||
Dim var_1C As Screen
|
||||
Dim var_20 As PictureBox
|
||||
loc_0083FE1C: var_eax = Proc_12_43_86D100(var_34, var_18, var_18)
|
||||
loc_0083FE58: var_18 = Global.Screen
|
||||
loc_0083FE86: var_7C = Global.Width
|
||||
loc_0083FEC6: var_1C = Global.Screen
|
||||
loc_0083FEE6: var_80 = Global.Height
|
||||
loc_0083FF59: var_eax = Unknown_VTable_Call[edi+000002A4h]
|
||||
loc_0083FFAF: var_eax = Proc_12_45_86D280(var_18, var_18, Unknown_VTable_Call[edi+000002A4h])
|
||||
loc_0083FFC0: var_eax = titleScreen.positionControls
|
||||
loc_0083FFDB: var_eax = titleScreen.resetHighLights
|
||||
loc_00840026: var_8C = global_00886880
|
||||
loc_00840071: var_2C = global_00886014 & "graphics\misc\titlescreen.jpg"
|
||||
loc_00840102: var_eax = Global.LoadPicture global_00886014 & "graphics\misc\titlescreen.jpg", var_30, global_00886014 & "graphics\misc\titlescreen.jpg", var_28, 10
|
||||
loc_00840143: var_eax = Unknown_VTable_Call[edi+00000154h]
|
||||
loc_00840177: If global_8861C2 = 0 Then
|
||||
loc_00840179: global_8861C2 = FFFFFFh
|
||||
loc_00840182: GoTo loc_008401F3
|
||||
loc_00840184: End If
|
||||
loc_008401C2: var_eax = Proc_12_47_86E570(var_18, var_18, CreateObject(global_00404DC0, global_00886880))
|
||||
loc_008401EE: var_eax = Proc_12_25_868460(4, global_00886880, Proc_12_47_86E570(var_18, var_18, CreateObject(global_00404DC0, global_00886880)))
|
||||
loc_008401F3: 'Referenced from: 00840182
|
||||
loc_00840219: var_18 = Global.Screen
|
||||
loc_00840237: Global.MousePointer = CInt(99)
|
||||
loc_0084027A: var_20 = Global.Screen
|
||||
loc_008402CC: var_1C = titleScreen.picAnim.Index
|
||||
loc_008402F9: titleScreen.picAnim.Enabled = var_1C
|
||||
loc_00840337: GoTo loc_0084035E
|
||||
loc_0084035D: Exit Sub
|
||||
loc_0084035E: 'Referenced from: 00840337
|
||||
End Sub
|
||||
|
||||
Private Sub Form_Unload(Cancel As Integer) '840550
|
||||
loc_008405B7: var_eax = Proc_12_44_86D1C0(var_28, var_18, var_18)
|
||||
loc_008405D6: GoTo loc_008405EB
|
||||
loc_008405EA: Exit Sub
|
||||
loc_008405EB: 'Referenced from: 008405D6
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '83FC80
|
||||
loc_0083FCC6: If KeyCode = 123 Then
|
||||
loc_0083FCC8: var_eax = Proc_12_18_864A90(edi, esi, ebx)
|
||||
loc_0083FCCD: End If
|
||||
End Sub
|
||||
|
||||
Private Sub Form_KeyPress(KeyAscii As Integer) '83FD00
|
||||
loc_0083FD4C: If KeyAscii = 13 Then
|
||||
loc_0083FD5C: var_eax = titleScreen.btnButton_Click
|
||||
loc_0083FD78: End If
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) '840380
|
||||
loc_008403C3: var_eax = titleScreen.highLightCheck
|
||||
End Sub
|
||||
|
||||
Private Sub tmrMainLoop_Timer() '840F00
|
||||
Dim Me As Variant
|
||||
loc_00840F5A: var_eax = titleScreen.drawDefaultPics
|
||||
loc_00840F93: var_eax = Proc_10_11_84A820(var_28, var_28, titleScreen.drawDefaultPics)
|
||||
loc_00840FA4: var_eax = titleScreen.resetHighLights
|
||||
loc_00840FC0: var_eax = Proc_86B860(Me, global_0040C7EC, 0)
|
||||
loc_00840FDC: tmrMainLoop.Enabled = False
|
||||
loc_00841003:
|
||||
loc_00841007: var_eax = QueryPerformanceCounter(var_24)
|
||||
loc_00841025: var_eax = Proc_12_46_86D7E0(var_28, var_28, GetLastError)
|
||||
loc_00841046: var_eax = Proc_10_11_84A820(var_28, var_28, Proc_12_46_86D7E0(var_28, var_28, GetLastError))
|
||||
loc_00841059: If esi+0000003Ah Then
|
||||
loc_0084105E: var_eax = titleScreen.drawAnimations
|
||||
loc_0084107A: End If
|
||||
loc_0084107E: var_eax = QueryPerformanceCounter(var_1C)
|
||||
loc_00841099: call __vbaCySub(var_1C, var_18, var_24, var_20, Me, global_0040C7EC, Me, global_0040C7EC, var_28, Me, Me, Me, __vbaCastObj(%StkVar1, %StkVar2) 'Ignore this)
|
||||
loc_008410A1: call __vbaR8Cy(__vbaCySub(var_1C, var_18, var_24, var_20, Me, global_0040C7EC, Me, global_0040C7EC, var_28, Me, Me, Me, __vbaCastObj(%StkVar1, %StkVar2), var_24)
|
||||
loc_008410B7: call __vbaR8Cy(global_008860D8, global_008860DC)
|
||||
loc_008410C4: If global_886000 = 0 Then
|
||||
loc_008410C6: fdivr st0, var_64
|
||||
loc_008410C9: GoTo loc_008410D6
|
||||
loc_008410CB: End If
|
||||
loc_008410D6: 'Referenced from: 008410C9
|
||||
loc_008410D6: global_8860D4 = __vbaR8Cy(global_008860D8, global_008860DC)
|
||||
loc_008410FD: If Err.Number Then
|
||||
loc_008410FF: global_8860D4 = 3DCCCCCDh
|
||||
loc_00841109: End If
|
||||
loc_0084110E: If esi+00000034h = 0 Then GoTo loc_00841003
|
||||
loc_00841114: var_eax = Proc_845A50(var_64, var_60)
|
||||
loc_00841121: If Me(14) <> 6 Then
|
||||
loc_0084112A: eax = Me(14) - 1
|
||||
loc_0084112E: If Me(14) - 1 > 0 Then GoTo loc_0084169C
|
||||
loc_00841134: GoTo loc_[eax*4+008416D8h]
|
||||
loc_00841186: Set var_28 = global_00886880
|
||||
loc_0084120B: var_eax = gameOptions.Show var_38, var_34
|
||||
loc_0084127C: Set var_28 = global_00886880
|
||||
loc_00841301: var_eax = topScores.Show var_38, var_34
|
||||
loc_00841372: Set var_28 = global_00886880
|
||||
loc_008413F7: var_eax = about.Show var_38, var_34
|
||||
loc_00841471: Set var_28 = global_00886880
|
||||
loc_008414A3:
|
||||
loc_008414AF:
|
||||
loc_008414F6: var_eax = login.Show var_38, var_34
|
||||
loc_00841570: Set var_28 = global_00886880
|
||||
loc_008415A0: If var_8868D0 <> 0 Then GoTo loc_008414AF
|
||||
loc_008415A6: GoTo loc_008414A3
|
||||
loc_008415AB: End If
|
||||
loc_008415F5: Set var_28 = global_00886880
|
||||
loc_00841628: global_88601C = 0
|
||||
loc_00841631: If global_886010 = 1 Then
|
||||
loc_00841633: var_eax = Proc_884A40(var_28, var_28, -2147352572)
|
||||
loc_00841638: GoTo loc_0084169C
|
||||
loc_0084163A: End If
|
||||
loc_00841677: Set var_28 = global_00886638
|
||||
loc_0084167F: var_eax = Global.Unload var_28
|
||||
loc_0084169C: End If
|
||||
loc_0084169C: End If
|
||||
loc_0084169C: End If
|
||||
loc_0084169C: End If
|
||||
loc_0084169C:
|
||||
loc_008416A9: GoTo loc_008416B5
|
||||
loc_008416B4: Exit Sub
|
||||
loc_008416B5: 'Referenced from: 008416A9
|
||||
loc_008416B5: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub positionControls() '83ED80
|
||||
Dim var_2C As PictureBox
|
||||
Dim var_28 As PictureBox
|
||||
loc_0083EE00: 1 = btnButton._Default
|
||||
loc_0083EE30: btnButton.Left = global_42900000
|
||||
loc_0083EE79: 1 = btnButton._Default
|
||||
loc_0083EE9A: btnButton.Top = global_43370000
|
||||
loc_0083EEE0: 1 = btnButton._Default
|
||||
loc_0083EF01: btnButton.Width = global_43A50000
|
||||
loc_0083EF4D: 1 = btnButton._Default
|
||||
loc_0083EF6E: btnButton.Height = global_427C0000
|
||||
loc_0083EFBA: 2 = btnButton._Default
|
||||
loc_0083EFDB: btnButton.Left = global_42900000
|
||||
loc_0083F021: 2 = btnButton._Default
|
||||
loc_0083F042: btnButton.Top = global_43940000
|
||||
loc_0083F088: 2 = btnButton._Default
|
||||
loc_0083F0A9: btnButton.Width = global_43A50000
|
||||
loc_0083F0F5: 2 = btnButton._Default
|
||||
loc_0083F116: btnButton.Height = global_427C0000
|
||||
loc_0083F162: 3 = btnButton._Default
|
||||
loc_0083F183: btnButton.Left = global_421C0000
|
||||
loc_0083F1C9: 4 = btnButton._Default
|
||||
loc_0083F1EA: btnButton.Left = global_434E0000
|
||||
loc_0083F230: 5 = btnButton._Default
|
||||
loc_0083F251: btnButton.Left = global_43B80000
|
||||
loc_0083F297: 6 = btnButton._Default
|
||||
loc_0083F2B8: btnButton.Left = global_44048000
|
||||
loc_0083F31C: For var_24 = 3 To 6 Step 1
|
||||
loc_0083F322:
|
||||
loc_0083F324: If var_7C Then
|
||||
loc_0083F34B: var_24 = CInt(var_2C)
|
||||
loc_0083F351: var_C0 = var_28
|
||||
loc_0083F362: var_24 = btnButton._Default
|
||||
loc_0083F383: btnButton.Top = global_43DF0000
|
||||
loc_0083F3CB: var_24 = CInt(var_2C)
|
||||
loc_0083F3D8: var_24 = btnButton._Default
|
||||
loc_0083F3F9: btnButton.Width = global_42CC0000
|
||||
loc_0083F447: var_24 = CInt(var_2C)
|
||||
loc_0083F454: var_24 = btnButton._Default
|
||||
loc_0083F475: btnButton.Height = global_41F00000
|
||||
loc_0083F4B1: Next var_24
|
||||
loc_0083F4BC: GoTo loc_0083F322
|
||||
loc_0083F4C1: End If
|
||||
loc_0083F4FA: For var_24 = 1 To 4 Step 1
|
||||
loc_0083F500:
|
||||
loc_0083F502: If var_24 Then
|
||||
loc_0083F529: var_24 = CInt(var_2C)
|
||||
loc_0083F536: var_24 = picAnim._Default
|
||||
loc_0083F557: picAnim.Left = global_40800000
|
||||
loc_0083F59F: var_24 = CInt(var_2C)
|
||||
loc_0083F5AC: var_24 = picAnim._Default
|
||||
loc_0083F5CD: picAnim.Top = global_40400000
|
||||
loc_0083F615: var_24 = CInt(var_2C)
|
||||
loc_0083F622: var_24 = picAnim._Default
|
||||
loc_0083F643: picAnim.Width = global_41C80000
|
||||
loc_0083F691: var_24 = CInt(var_2C)
|
||||
loc_0083F69E: var_24 = picAnim._Default
|
||||
loc_0083F6BF: picAnim.Height = global_41C00000
|
||||
loc_0083F6FE: Next var_24
|
||||
loc_0083F704: GoTo loc_0083F500
|
||||
loc_0083F709: End If
|
||||
loc_0083F70F: GoTo loc_0083F725
|
||||
loc_0083F724: Exit Sub
|
||||
loc_0083F725: 'Referenced from: 0083F70F
|
||||
End Sub
|
||||
|
||||
Public Sub highLightCheck() '83F780
|
||||
Dim Me As Me
|
||||
loc_0083F7BE: If Me.GetPalette 'Ignore this = 0 Then
|
||||
loc_0083F7C5: If esi+0000003Ah = 0 Then GoTo loc_0083F7E6
|
||||
loc_0083F7C7: End If
|
||||
loc_0083F7CA: var_eax = titleScreen.resetHighLights
|
||||
loc_0083F7E6:
|
||||
End Sub
|
||||
|
||||
Public Sub resetHighLights() '840410
|
||||
Dim Me As Me
|
||||
Dim var_20 As PictureBox
|
||||
loc_0084045A: If 00000001h <= 3 Then
|
||||
loc_0084047E: 1 = btnButton._Default
|
||||
loc_008404A3: btnButton.Tag = global_0040EEC8
|
||||
loc_008404D9: 00000001h = 00000001h + 00000001h
|
||||
loc_008404E2: var_eax = Unknown_87(var_20, var_1C, 00000003h, Me)
|
||||
loc_008404E7: End If
|
||||
loc_008404F2: var_eax = titleScreen.drawDefaultPics
|
||||
loc_00840513: GoTo loc_00840529
|
||||
loc_00840528: Exit Sub
|
||||
loc_00840529: 'Referenced from: 00840513
|
||||
loc_00840529: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub drawDefaultPics() '841700
|
||||
Dim Me As Variant
|
||||
Dim var_2C As Variant
|
||||
Dim var_58 As Me
|
||||
Dim var_28 As Variant
|
||||
Dim var_50 As Me
|
||||
Dim var_30 As PictureBox
|
||||
Dim var_34 As PictureBox
|
||||
Dim var_3C As PictureBox
|
||||
loc_00841774: 1 = btnButton._Default
|
||||
loc_008417A0: var_58 = var_38
|
||||
loc_008417BD: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_008417F9: var_30 = buttons.BackColor
|
||||
loc_0084182E: buttons.BackColor = var_3C
|
||||
loc_00841880: 2 = btnButton._Default
|
||||
loc_0084189E: var_58 = var_38
|
||||
loc_008418BB: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_008418F7: var_30 = buttons.BackColor
|
||||
loc_0084192C: buttons.BackColor = var_3C
|
||||
loc_0084197E: 3 = btnButton._Default
|
||||
loc_0084199C: var_50 = var_34
|
||||
loc_008419B9: var_eax = Unknown_VTable_Call[ecx+00000358h]
|
||||
loc_008419D3: var_2C = buttons.hWnd
|
||||
loc_00841A08: buttons.BackColor = var_38
|
||||
loc_00841A56: 4 = btnButton._Default
|
||||
loc_00841A74: var_50 = var_34
|
||||
loc_00841A91: var_eax = Unknown_VTable_Call[edx+0000035Ch]
|
||||
loc_00841AAB: var_2C = buttons.hWnd
|
||||
loc_00841AD9: var_A4 = var_50
|
||||
loc_00841AEA: buttons.BackColor = 0
|
||||
loc_00841B38: 5 = btnButton._Default
|
||||
loc_00841B4F: var_50 = var_34
|
||||
loc_00841B73: var_eax = Unknown_VTable_Call[ecx+00000340h]
|
||||
loc_00841B8D: var_2C = buttons.hWnd
|
||||
loc_00841BC2: buttons.BackColor = var_38
|
||||
loc_00841C10: 6 = btnButton._Default
|
||||
loc_00841C2E: var_50 = var_34
|
||||
loc_00841C4B: var_eax = Unknown_VTable_Call[edx+00000364h]
|
||||
loc_00841C65: var_2C = buttons.hWnd
|
||||
loc_00841C93: var_AC = var_50
|
||||
loc_00841CA4: buttons.BackColor = var_2C
|
||||
loc_00841CE6: If 00000001h <= 4 Then
|
||||
loc_00841CF0: var_eax = titleScreen.drawDefaultPic(1)
|
||||
loc_00841D29: var_18 = picAnim._Default
|
||||
loc_00841D49: var_1C = picAnim.Tag
|
||||
loc_00841D93: esi = (Right$(var_1C, 1) = global_0040F164) + 1
|
||||
loc_00841DB5: var_eax = Unknown_E845896D(var_2C, var_28, Me, Me, var_38)
|
||||
loc_00841DDC: var_18 = picAnim._Default
|
||||
loc_00841DFC: var_1C = picAnim.Tag
|
||||
loc_00841E37: var_18 = picAnim._Default
|
||||
loc_00841E72: var_18 = picAnim._Default
|
||||
loc_00841E92: var_20 = picAnim.Tag
|
||||
loc_00841EBB: Len(var_20) = Len(var_20) - 00000001h
|
||||
loc_00841ED1: var_24 = Left$(var_1C, Len(var_20))
|
||||
loc_00841ED9: picAnim.Tag = var_24
|
||||
loc_00841F32: 00000001h = 00000001h + var_18
|
||||
loc_00841F38: var_18 = 00000001h+var_18
|
||||
loc_00841F3B: GoTo loc_00841CE2
|
||||
loc_00841F40: End If
|
||||
loc_00841F4B: GoTo loc_00841F85
|
||||
loc_00841F84: Exit Sub
|
||||
loc_00841F85: 'Referenced from: 00841F4B
|
||||
loc_00841F85: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub drawDefaultPic(X) '841FB0
|
||||
loc_00842014: X = picAnim._Default
|
||||
loc_0084204F: var_eax = titleScreen.drawFrame(var_20, var_24)
|
||||
loc_00842083: GoTo loc_0084209D
|
||||
loc_0084209C: Exit Sub
|
||||
loc_0084209D: 'Referenced from: 00842083
|
||||
End Sub
|
||||
|
||||
Public Sub drawFrame(pic, frame) '8420C0
|
||||
Dim Me As Me
|
||||
loc_0084211B: var_18 = Me.Visible
|
||||
loc_00842142: var_3C = var_18
|
||||
loc_0084215B: If (var_3C = "quit") Then
|
||||
loc_0084216E: If (var_3C = "quita") Then
|
||||
loc_00842181: If (var_3C = "about") Then
|
||||
loc_00842194: If (var_3C = "abouta") Then
|
||||
loc_008421A7: If (var_3C = "options") Then
|
||||
loc_008421BA: If (var_3C = "optionsa") Then
|
||||
loc_008421CD: If (var_3C = "scores") Then
|
||||
loc_008421DC: If (var_3C <> "scoresa") <> 0 Then GoTo loc_00842551
|
||||
loc_008421E2: End If
|
||||
loc_00842203: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_00842269: frame = frame - 0001h
|
||||
loc_00842275: frame = frame * 0019h
|
||||
loc_0084228E: var_eax = Proc_9_0_843110(var_20, var_24, 0)
|
||||
loc_008422B2: GoTo loc_00842546
|
||||
loc_008422B7: End If
|
||||
loc_008422B7: End If
|
||||
loc_008422D8: var_eax = Unknown_VTable_Call[ecx+00000328h]
|
||||
loc_0084233E: frame = frame - 0001h
|
||||
loc_0084234A: frame = frame * 0019h
|
||||
loc_00842363: var_eax = Proc_9_0_843110(var_20, var_24, 0)
|
||||
loc_00842387: GoTo loc_00842546
|
||||
loc_0084238C: End If
|
||||
loc_0084238C: End If
|
||||
loc_008423AD: var_eax = Unknown_VTable_Call[ecx+0000032Ch]
|
||||
loc_00842413: frame = frame - 0001h
|
||||
loc_0084241F: frame = frame * 0019h
|
||||
loc_00842438: var_eax = Proc_9_0_843110(var_20, var_24, 0)
|
||||
loc_0084245C: GoTo loc_00842546
|
||||
loc_00842461: End If
|
||||
loc_00842461: End If
|
||||
loc_00842482: var_eax = Unknown_VTable_Call[ecx+00000334h]
|
||||
loc_008424FD: frame = frame - 0001h
|
||||
loc_00842509: frame = frame * 0019h
|
||||
loc_00842522: var_eax = Proc_9_0_843110(var_24, var_28, 0)
|
||||
loc_00842546: 'Referenced from: 008422B2
|
||||
loc_00842551:
|
||||
loc_00842556: GoTo loc_0084257D
|
||||
loc_0084257C: Exit Sub
|
||||
loc_0084257D: 'Referenced from: 00842556
|
||||
loc_00842586: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub drawAnimations() '8425B0
|
||||
Dim Me As Variant
|
||||
Dim var_28 As PictureBox
|
||||
loc_00842629: If global_886000 = 0 Then
|
||||
loc_0084262E: GoTo loc_00842638
|
||||
loc_00842630: End If
|
||||
loc_00842633: call _adj_fdiv_m32(esi, ebx)
|
||||
loc_00842638: 'Referenced from: 0084262E
|
||||
loc_00842652: var_5C = var_58
|
||||
loc_00842687: If var_18 <= 4 Then
|
||||
loc_008426AE: var_18 = picAnim._Default
|
||||
loc_008426CE: var_1C = picAnim.Tag
|
||||
loc_00842718: esi = (Right$(var_1C, 1) = global_0040F164) + 1
|
||||
loc_0084273A: var_eax = Unknown_E845896A(var_28, var_24)
|
||||
loc_00842761: var_18 = picAnim._Default
|
||||
loc_00842795: var_eax = titleScreen.drawFrame(var_2C, Me(16))
|
||||
loc_008427C5: 00000001h = 00000001h + var_18
|
||||
loc_008427CB: var_18 = 00000001h+var_18
|
||||
loc_008427CE: var_eax = Unknown_1468F(var_2C, var_28, var_28, var_24)
|
||||
loc_008427D3: End If
|
||||
loc_008427D3: End If
|
||||
loc_008427D8: If edi+0000003Ch > 39 Then
|
||||
loc_008427E0: End If
|
||||
loc_008427E6: GoTo loc_00842810
|
||||
loc_0084280F: Exit Sub
|
||||
loc_00842810: 'Referenced from: 008427E6
|
||||
loc_00842810: Exit Sub
|
||||
End Sub
|
||||
+1019
File diff suppressed because it is too large.
Load diff
Binary file not shown.
@@ -0,0 +1,224 @@
|
||||
|
||||
Public Sub Proc_22_0_87A130
|
||||
Dim Me As Me
|
||||
Dim var_1C As Me
|
||||
Dim var_20 As Me
|
||||
loc_0087A170: var_eax = Unknown_VTable_Call[ecx+00000310h]
|
||||
loc_0087A18B: Me.Left = global_43730000
|
||||
loc_0087A1BB: var_eax = Unknown_VTable_Call[ecx+00000310h]
|
||||
loc_0087A1D4: var_24 = Unknown_VTable_Call[ecx+00000310h]
|
||||
loc_0087A1D7: Me.Top = global_433C0000
|
||||
loc_0087A1F6: var_eax = Unknown_VTable_Call[eax+00000310h]
|
||||
loc_0087A20F: var_24 = Unknown_VTable_Call[eax+00000310h]
|
||||
loc_0087A212: Me.Width = global_43BD8000
|
||||
loc_0087A237: var_eax = Unknown_VTable_Call[edx+00000310h]
|
||||
loc_0087A253: Me.Height = global_43410000
|
||||
loc_0087A278: var_eax = Unknown_VTable_Call[eax+00000300h]
|
||||
loc_0087A291: var_24 = Unknown_VTable_Call[eax+00000300h]
|
||||
loc_0087A294: Me.ForeColor = global_428C0000
|
||||
loc_0087A2B3: var_eax = Unknown_VTable_Call[edx+00000300h]
|
||||
loc_0087A2CF: Me.Left = global_43810000
|
||||
loc_0087A2EE: var_eax = Unknown_VTable_Call[eax+00000300h]
|
||||
loc_0087A307: var_24 = Unknown_VTable_Call[eax+00000300h]
|
||||
loc_0087A30A: Me.Top = global_424C0000
|
||||
loc_0087A329: var_eax = Unknown_VTable_Call[edx+00000300h]
|
||||
loc_0087A345: Me.Width = global_41900000
|
||||
loc_0087A36A: var_eax = Unknown_VTable_Call[eax+00000320h]
|
||||
loc_0087A383: var_24 = Unknown_VTable_Call[eax+00000320h]
|
||||
loc_0087A386: Me.Left = global_42900000
|
||||
loc_0087A3A5: var_eax = Unknown_VTable_Call[edx+00000320h]
|
||||
loc_0087A3C1: Me.Top = global_43500000
|
||||
loc_0087A3E0: var_eax = Unknown_VTable_Call[eax+00000320h]
|
||||
loc_0087A3F9: var_24 = Unknown_VTable_Call[eax+00000320h]
|
||||
loc_0087A3FC: Me.Width = global_42300000
|
||||
loc_0087A421: var_eax = Unknown_VTable_Call[edx+00000320h]
|
||||
loc_0087A43D: Me.Height = global_41400000
|
||||
loc_0087A462: var_eax = Unknown_VTable_Call[eax+0000031Ch]
|
||||
loc_0087A47B: var_24 = Unknown_VTable_Call[eax+0000031Ch]
|
||||
loc_0087A47E: Me.Left = global_43020000
|
||||
loc_0087A49D: var_eax = Unknown_VTable_Call[edx+0000031Ch]
|
||||
loc_0087A4B9: Me.Top = global_43820000
|
||||
loc_0087A4D8: var_eax = Unknown_VTable_Call[eax+0000031Ch]
|
||||
loc_0087A4F1: var_24 = Unknown_VTable_Call[eax+0000031Ch]
|
||||
loc_0087A4F4: Me.Width = global_42340000
|
||||
loc_0087A519: var_eax = Unknown_VTable_Call[edx+0000031Ch]
|
||||
loc_0087A535: Me.Height = global_41400000
|
||||
loc_0087A55A: var_eax = Unknown_VTable_Call[eax+0000032Ch]
|
||||
loc_0087A573: var_24 = Unknown_VTable_Call[eax+0000032Ch]
|
||||
loc_0087A576: Me.Left = global_42900000
|
||||
loc_0087A595: var_eax = Unknown_VTable_Call[edx+0000032Ch]
|
||||
loc_0087A5B1: Me.Top = global_439B8000
|
||||
loc_0087A5D0: var_eax = Unknown_VTable_Call[eax+0000032Ch]
|
||||
loc_0087A5E9: var_24 = Unknown_VTable_Call[eax+0000032Ch]
|
||||
loc_0087A5EC: Me.Width = global_42300000
|
||||
loc_0087A611: var_eax = Unknown_VTable_Call[edx+0000032Ch]
|
||||
loc_0087A62D: Me.Height = global_41400000
|
||||
loc_0087A652: var_eax = Unknown_VTable_Call[eax+00000328h]
|
||||
loc_0087A66B: var_24 = Unknown_VTable_Call[eax+00000328h]
|
||||
loc_0087A66E: Me.Left = global_42900000
|
||||
loc_0087A68D: var_eax = Unknown_VTable_Call[edx+00000328h]
|
||||
loc_0087A6A9: Me.Top = global_43B58000
|
||||
loc_0087A6C8: var_eax = Unknown_VTable_Call[eax+00000328h]
|
||||
loc_0087A6E1: var_24 = Unknown_VTable_Call[eax+00000328h]
|
||||
loc_0087A6E4: Me.Width = global_42300000
|
||||
loc_0087A709: var_eax = Unknown_VTable_Call[edx+00000328h]
|
||||
loc_0087A725: Me.Height = global_41400000
|
||||
loc_0087A75D: If var_18 <= 2 Then
|
||||
loc_0087A766: var_eax = Unknown_VTable_Call[eax+0000030Ch]
|
||||
loc_0087A77E: var_24 = Unknown_VTable_Call[eax+0000030Ch]
|
||||
loc_0087A7A6: Me.Width = global_42A00000
|
||||
loc_0087A7D9: var_eax = Unknown_VTable_Call[edx+0000030Ch]
|
||||
loc_0087A819: Me.Height = global_41F00000
|
||||
loc_0087A84C: var_eax = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_0087A864: var_24 = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_0087A88C: Me.Top = global_43DE8000
|
||||
loc_0087A8BB: 00000001h = 00000001h + var_18
|
||||
loc_0087A8C5: var_18 = 00000001h+var_18
|
||||
loc_0087A8C8: var_eax = Unknown_16A8F(var_18, var_20, var_1C, Unknown_VTable_Call[ecx+0000030Ch], Me, var_18)
|
||||
loc_0087A8CD: End If
|
||||
loc_0087A8D0: var_eax = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_0087A8E6: var_24 = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_0087A90E: Me.Left = global_43E80000
|
||||
loc_0087A93B: var_eax = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_0087A951: var_24 = Unknown_VTable_Call[ecx+0000030Ch]
|
||||
loc_0087A979: Me.Left = global_440A0000
|
||||
loc_0087A9AA:
|
||||
loc_0087A9B6: If var_18 <= 8 Then
|
||||
loc_0087A9BC: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087A9D4: var_24 = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087A9FC: Me.Left = global_425C0000
|
||||
loc_0087AA29: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087AA41: var_24 = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087AA69: Me.Top = global_41A00000
|
||||
loc_0087AA96: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AAD1: Me.Width = global_41200000
|
||||
loc_0087AB01: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AB40: Me.Height = global_41600000
|
||||
loc_0087AB78: 00000001h = 00000001h + var_18
|
||||
loc_0087AB82: var_18 = 00000001h+var_18
|
||||
loc_0087AB85: GoTo loc_0087A9AA
|
||||
loc_0087AB8A: End If
|
||||
loc_0087AB8A: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087ABA0: var_24 = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087ABC8: Me.Width = global_41C80000
|
||||
loc_0087ABFB: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AC11: var_24 = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AC39: Me.Width = global_41C80000
|
||||
loc_0087AC77:
|
||||
loc_0087AC7F: If var_18 <= 10 Then
|
||||
loc_0087AC88: var_eax = Unknown_VTable_Call[edx+00000304h]
|
||||
loc_0087ACC3: Me.Left = global_40800000
|
||||
loc_0087ACED: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AD2C: Me.Top = global_40400000
|
||||
loc_0087AD5E: 00000001h = 00000001h + var_18
|
||||
loc_0087AD68: var_18 = 00000001h+var_18
|
||||
loc_0087AD6B: GoTo loc_0087AC77
|
||||
loc_0087AD70: End If
|
||||
loc_0087AD78:
|
||||
loc_0087AD80: If 00000001h <= 8 Then
|
||||
loc_0087AD89: eax = 00000001h - 1
|
||||
loc_0087AD8D: If 00000001h - 1 <= 0 Then
|
||||
loc_0087AD93: GoTo loc_[eax*4+0087B38Ch]
|
||||
loc_0087AD9D: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087ADD8: Me.BackColor = global_41B00000
|
||||
loc_0087AE02: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AE41: Me.Left = global_42580000
|
||||
loc_0087AE48: If Me.Left < 0 Then
|
||||
loc_0087AE4E: GoTo loc_0087AF03
|
||||
loc_0087AE53: End If
|
||||
loc_0087AE56: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087AE61: call var_20(var_1C, Unknown_VTable_Call[ecx+00000324h], Me, var_18, var_20, var_1C, Unknown_VTable_Call[ecx+00000304h], Me, var_18, var_20, var_1C, Unknown_VTable_Call[ecx+00000324h], Me, var_18, var_20)
|
||||
loc_0087AE91: Me.BackColor = global_434B0000
|
||||
loc_0087AEBB: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AEFA: Me.Left = global_435B0000
|
||||
loc_0087AF01: If Me.Left < 0 Then
|
||||
loc_0087AF03: 'Referenced from: 0087AE4E
|
||||
loc_0087AF0C: Me.Left = CheckObj(var_20, global_0040E7E4, 116)
|
||||
loc_0087AF0E: End If
|
||||
loc_0087AF0E: End If
|
||||
loc_0087AF2C: 00000001h = 00000001h + var_18
|
||||
loc_0087AF36: var_18 = 00000001h+var_18
|
||||
loc_0087AF39: GoTo loc_0087AD78
|
||||
loc_0087AF3E: End If
|
||||
loc_0087AF4E: If var_18 <= 2 Then
|
||||
loc_0087AF57: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087AF92: Me.ForeColor = global_434E0000
|
||||
loc_0087AFBC: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087AFFB: Me.Top = global_43500000
|
||||
loc_0087B02D: 00000001h = 00000001h + var_18
|
||||
loc_0087B037: var_18 = 00000001h+var_18
|
||||
loc_0087B03A: var_eax = Unknown_EB8F(var_18, var_20, var_1C, Unknown_VTable_Call[ecx+00000304h], Me, var_18)
|
||||
loc_0087B03F: End If
|
||||
loc_0087B04F: If var_18 <= 4 Then
|
||||
loc_0087B058: var_eax = Unknown_VTable_Call[ecx+00000324h]
|
||||
loc_0087B093: Me.ForeColor = global_43810000
|
||||
loc_0087B0BD: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087B0FC: Me.Top = global_43820000
|
||||
loc_0087B12E: 00000001h = 00000001h + var_18
|
||||
loc_0087B138: var_18 = 00000001h+var_18
|
||||
loc_0087B13B: var_eax = Unknown_EB8F(var_18, var_20, var_1C, Unknown_VTable_Call[ecx+00000304h], Me, var_18)
|
||||
loc_0087B140: End If
|
||||
loc_0087B14E:
|
||||
loc_0087B156: If var_18 <= 6 Then
|
||||
loc_0087B15F: var_eax = Unknown_VTable_Call[edx+00000324h]
|
||||
loc_0087B19A: Me.ForeColor = global_439A8000
|
||||
loc_0087B1C4: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087B203: Me.Top = global_439B8000
|
||||
loc_0087B235: 00000001h = 00000001h + var_18
|
||||
loc_0087B23F: var_18 = 00000001h+var_18
|
||||
loc_0087B242: GoTo loc_0087B14E
|
||||
loc_0087B247: End If
|
||||
loc_0087B25C:
|
||||
loc_0087B264: If var_18 <= 8 Then
|
||||
loc_0087B26D: var_eax = Unknown_VTable_Call[edx+00000324h]
|
||||
loc_0087B2A8: Me.ForeColor = global_43B48000
|
||||
loc_0087B2D2: var_eax = Unknown_VTable_Call[ecx+00000304h]
|
||||
loc_0087B311: Me.Top = global_43B58000
|
||||
loc_0087B342: var_70 = var_70 + var_18
|
||||
loc_0087B348: var_18 = var_70+var_18
|
||||
loc_0087B34B: GoTo loc_0087B25C
|
||||
loc_0087B350: End If
|
||||
loc_0087B356: GoTo loc_0087B36C
|
||||
loc_0087B36B: Exit Sub
|
||||
loc_0087B36C: 'Referenced from: 0087B356
|
||||
loc_0087B36C: Exit Sub
|
||||
End Sub
|
||||
|
||||
Public Sub Proc_22_1_87B3B0
|
||||
Dim global_00887AE8 As Global
|
||||
Dim global_00886880 As Me
|
||||
loc_0087B3EE: If arg_C = 1 Then
|
||||
loc_0087B3FC: var_eax = Proc_10_23_84E330(global_00886598, var_38, edi)
|
||||
loc_0087B401: GoTo loc_0087B408
|
||||
loc_0087B403: End If
|
||||
loc_0087B403: var_eax = Proc_9_20_8476B0(arg_C, ebx, )
|
||||
loc_0087B408: 'Referenced from: 0087B401
|
||||
loc_0087B413: If global_886010 = 1 Then
|
||||
loc_0087B419: End If
|
||||
loc_0087B41E: global_886178 = .GetPalette 'Ignore this
|
||||
loc_0087B427: var_eax = versionDeclare.VTable_00000740
|
||||
loc_0087B443: var_eax = Proc_12_35_86B900(Me, , )
|
||||
loc_0087B44B: eax = arg_C - 1
|
||||
loc_0087B44C: If arg_C - 1 Then
|
||||
loc_0087B452: eax = arg_C - 1 - 1
|
||||
loc_0087B453: If arg_C - 1 - 1 <> 0 Then GoTo loc_0087B628
|
||||
loc_0087B459: var_eax = Proc_845A50(, , )
|
||||
loc_0087B483: var_4C = global_00887AE8
|
||||
loc_0087B486: Set var_14 = Me
|
||||
loc_0087B491: var_eax = Global.Unload var_14
|
||||
loc_0087B511: var_eax = titleScreen.Show var_24, var_20
|
||||
loc_0087B538: GoTo loc_0087B639
|
||||
loc_0087B53D: global_8861C0 = stk@FFBC
|
||||
loc_0087B544: global_8860E2 = FFFFFFh
|
||||
loc_0087B54D: var_eax = Proc_868420(global_0087B63A, -2147352572, var_18)
|
||||
loc_0087B552: var_eax = Proc_86F0F0(10, var_30, -2147352572)
|
||||
loc_0087B57C: var_50 = global_00887AE8
|
||||
loc_0087B57F: Set var_14 = global_00886880
|
||||
loc_0087B58A: var_eax = Global.Unload var_14
|
||||
loc_0087B60A: var_eax = frmMain.Show var_24, var_20
|
||||
loc_0087B628:
|
||||
loc_0087B628: End If
|
||||
loc_0087B62D: GoTo loc_0087B639
|
||||
loc_0087B638: Exit Sub
|
||||
loc_0087B639: 'Referenced from: 0087B538
|
||||
End Sub
|
||||
Reference in new issue
Block a user