Artvasil09
3ad5bf4c9d
Add native Durak, poker, blackjack, roulette, Buckshot and billiards scenes with animation assets and regression tests. Improve arrival, city, hall, profiles, shops, audio and exit handling; remove the portable C game core and refresh shipping executables.
287 lines
8.3 KiB
PHP
287 lines
8.3 KiB
PHP
; Existing signed saves are imported read-only. New writes stay in runtime/profiles.
|
|
BuildNativeProfileDir3D PROC
|
|
invoke CopyCString, OFFSET saveDirPath, nativeProfilesDirPtr3D
|
|
ret
|
|
BuildNativeProfileDir3D ENDP
|
|
|
|
ValidateGraphicProfile3D PROC uses ebx esi edi path:DWORD
|
|
local io:DWORD,fileBytes:DWORD,signature:DWORD
|
|
invoke CreateFileA, path, 80000000h, 1, 0, 3, 80h, 0
|
|
cmp eax, -1
|
|
je profile_invalid
|
|
mov ebx, eax
|
|
invoke GetFileSize, ebx, 0
|
|
mov fileBytes, eax
|
|
cmp eax, 32
|
|
jb profile_close_invalid
|
|
cmp eax, SAVE_FILE_SIZE
|
|
ja profile_close_invalid
|
|
invoke ReadFile, ebx, OFFSET entrySaveData3D, SAVE_FILE_SIZE, ADDR io, 0
|
|
test eax, eax
|
|
jz profile_close_invalid
|
|
invoke CloseHandle, ebx
|
|
mov eax, fileBytes
|
|
cmp eax, io
|
|
jne profile_invalid
|
|
cmp DWORD PTR entrySaveData3D, SAVE_MAGIC
|
|
jne profile_invalid
|
|
cmp DWORD PTR entrySaveData3D[4], 1000000000
|
|
ja profile_invalid
|
|
cmp fileBytes, SAVE_FILE_SIZE
|
|
jb profile_valid
|
|
mov esi, OFFSET entrySaveData3D
|
|
mov ecx, SAVE_SIGN_SIZE/4
|
|
mov eax, SAVE_SALT
|
|
profile_signature:
|
|
rol eax, 5
|
|
xor eax, [esi]
|
|
mov edx, eax
|
|
shr edx, 16
|
|
xor eax, edx
|
|
add eax, 9E3779B9h
|
|
add esi, 4
|
|
loop profile_signature
|
|
cmp eax, DWORD PTR entrySaveData3D[SAVE_SIGN_SIZE]
|
|
jne profile_invalid
|
|
profile_valid:
|
|
mov eax, 1
|
|
ret
|
|
profile_close_invalid:
|
|
invoke CloseHandle, ebx
|
|
profile_invalid:
|
|
xor eax, eax
|
|
ret
|
|
ValidateGraphicProfile3D ENDP
|
|
|
|
ScanGraphicProfiles3D PROC uses ebx esi edi
|
|
local index:DWORD
|
|
invoke CopyCString, OFFSET entryPattern3D, OFFSET entryScanDir3D
|
|
invoke AppendCString, OFFSET entryPattern3D, OFFSET entryWildcard3D
|
|
invoke FindFirstFileA, OFFSET entryPattern3D, OFFSET entryFindData3D
|
|
cmp eax, -1
|
|
je profile_scan_done
|
|
mov ebx, eax
|
|
profile_scan_next:
|
|
cmp entryAccountCount3D, 20
|
|
jae profile_scan_close
|
|
test DWORD PTR entryFindData3D, 10h
|
|
jnz profile_scan_advance
|
|
; Restrict account stems to the same safe alphabet as account creation.
|
|
mov esi, OFFSET entryFindData3D+44
|
|
xor ecx, ecx
|
|
profile_scan_name:
|
|
mov al, [esi+ecx]
|
|
cmp al, '.'
|
|
je profile_scan_extension
|
|
cmp ecx, 50
|
|
jae profile_scan_advance
|
|
cmp al, '0'
|
|
jb profile_scan_letter
|
|
cmp al, '9'
|
|
jbe profile_scan_char_ok
|
|
profile_scan_letter:
|
|
or al, 20h
|
|
cmp al, 'a'
|
|
jb profile_scan_symbol
|
|
cmp al, 'z'
|
|
jbe profile_scan_char_ok
|
|
profile_scan_symbol:
|
|
mov al, [esi+ecx]
|
|
cmp al, '_'
|
|
je profile_scan_char_ok
|
|
cmp al, '-'
|
|
jne profile_scan_advance
|
|
profile_scan_char_ok:
|
|
inc ecx
|
|
jmp profile_scan_name
|
|
profile_scan_extension:
|
|
test ecx, ecx
|
|
jz profile_scan_advance
|
|
lea eax, [esi+ecx]
|
|
invoke lstrcmpiA, eax, OFFSET entryDat3D
|
|
test eax, eax
|
|
jnz profile_scan_advance
|
|
mov index, 0
|
|
profile_scan_duplicate:
|
|
mov eax, index
|
|
cmp eax, entryAccountCount3D
|
|
jae profile_scan_validate
|
|
shl eax, 6
|
|
add eax, OFFSET entryAccountNames3D
|
|
invoke lstrcmpiA, eax, esi
|
|
test eax, eax
|
|
jz profile_scan_advance
|
|
inc index
|
|
jmp profile_scan_duplicate
|
|
profile_scan_validate:
|
|
invoke CopyCString, OFFSET entryScanPath3D, OFFSET entryScanDir3D
|
|
invoke AppendCString, OFFSET entryScanPath3D, OFFSET pathSlashText
|
|
invoke AppendCString, OFFSET entryScanPath3D, esi
|
|
invoke ValidateGraphicProfile3D, OFFSET entryScanPath3D
|
|
test eax, eax
|
|
jz profile_scan_advance
|
|
mov eax, entryAccountCount3D
|
|
mov edx, DWORD PTR entrySaveData3D[4]
|
|
mov entryAccountBanks3D[eax*4], edx
|
|
shl eax, 6
|
|
add eax, OFFSET entryAccountNames3D
|
|
invoke CopyCString, eax, esi
|
|
mov eax, entryAccountCount3D
|
|
imul eax, 260
|
|
add eax, OFFSET entryAccountPaths3D
|
|
invoke CopyCString, eax, OFFSET entryScanPath3D
|
|
inc entryAccountCount3D
|
|
profile_scan_advance:
|
|
invoke FindNextFileA, ebx, OFFSET entryFindData3D
|
|
test eax, eax
|
|
jnz profile_scan_next
|
|
profile_scan_close:
|
|
invoke FindClose, ebx
|
|
profile_scan_done:
|
|
ret
|
|
ScanGraphicProfiles3D ENDP
|
|
|
|
CollectGraphicProfiles3D PROC
|
|
mov entryAccountCount3D, 0
|
|
invoke CopyCString, OFFSET entryScanDir3D, nativeProfilesDirPtr3D
|
|
call ScanGraphicProfiles3D
|
|
; Do not call BuildAppDataDir here: discovery must not create outside folders.
|
|
invoke GetEnvironmentVariableA, OFFSET appDataEnvName, OFFSET entryScanDir3D, 220
|
|
test eax, eax
|
|
jz profiles_workspace
|
|
cmp eax, 220
|
|
jae profiles_workspace
|
|
invoke AppendCString, OFFSET entryScanDir3D, OFFSET appDataSubDir
|
|
call ScanGraphicProfiles3D
|
|
profiles_workspace:
|
|
invoke CopyCString, OFFSET entryScanDir3D, OFFSET entryLocalRoot3D
|
|
call ScanGraphicProfiles3D
|
|
ret
|
|
CollectGraphicProfiles3D ENDP
|
|
|
|
SyncGraphicBack3D PROC
|
|
mov eax, shopBackOwned
|
|
and eax, 1FFFh
|
|
or eax, 1
|
|
mov ownedBacks3D, eax
|
|
mov ecx, shopBackStyle
|
|
cmp ecx, 12
|
|
ja graphic_back_default
|
|
bt eax, ecx
|
|
jnc graphic_back_default
|
|
mov selectedBack3D, ecx
|
|
ret
|
|
graphic_back_default:
|
|
mov selectedBack3D, 0
|
|
ret
|
|
SyncGraphicBack3D ENDP
|
|
|
|
SelectGraphicProfile3D PROC uses ebx esi index:DWORD
|
|
mov eax, index
|
|
cmp eax, entryAccountCount3D
|
|
jae graphic_select_fail
|
|
mov ebx, eax
|
|
imul eax, 260
|
|
add eax, OFFSET entryAccountPaths3D
|
|
mov esi, eax
|
|
invoke ValidateGraphicProfile3D, esi
|
|
test eax, eax
|
|
jz graphic_select_fail
|
|
shl ebx, 6
|
|
add ebx, OFFSET entryAccountNames3D
|
|
invoke CopyCString, OFFSET entryFindPath3D, nativeProfilesDirPtr3D
|
|
invoke AppendCString, OFFSET entryFindPath3D, OFFSET pathSlashText
|
|
invoke AppendCString, OFFSET entryFindPath3D, ebx
|
|
invoke lstrcmpiA, esi, OFFSET entryFindPath3D
|
|
test eax, eax
|
|
jz graphic_select_load
|
|
invoke CreateDirectoryA, OFFSET runtime3D, 0
|
|
invoke CreateDirectoryA, nativeProfilesDirPtr3D, 0
|
|
invoke CopyFileA, esi, OFFSET entryFindPath3D, 1
|
|
test eax, eax
|
|
jz graphic_select_fail
|
|
graphic_select_load:
|
|
invoke ValidateGraphicProfile3D, OFFSET entryFindPath3D
|
|
test eax, eax
|
|
jz graphic_select_fail
|
|
call ResetProfileDefaults
|
|
invoke CopyCString, OFFSET saveFileName, ebx
|
|
mov nativeProfileActive3D, 1
|
|
call LoadSave
|
|
call SyncGraphicBack3D
|
|
call ApplySoundVolume
|
|
mov eax, 1
|
|
ret
|
|
graphic_select_fail:
|
|
xor eax, eax
|
|
ret
|
|
SelectGraphicProfile3D ENDP
|
|
|
|
CreateGraphicProfile3D PROC uses ebx
|
|
local previousBank:DWORD,previousOwned:DWORD,previousBack:DWORD
|
|
cmp arrivalNameLength3D, 0
|
|
je graphic_create_fail
|
|
invoke CopyCString, OFFSET entryFindPath3D, nativeProfilesDirPtr3D
|
|
invoke AppendCString, OFFSET entryFindPath3D, OFFSET pathSlashText
|
|
invoke AppendCString, OFFSET entryFindPath3D, OFFSET arrivalName3D
|
|
invoke AppendCString, OFFSET entryFindPath3D, OFFSET entryDat3D
|
|
invoke GetFileAttributesA, OFFSET entryFindPath3D
|
|
cmp eax, -1
|
|
jne graphic_create_fail
|
|
; Also reject a name present in the imported guest list.
|
|
invoke CopyCString, OFFSET entryDisplayName3D, OFFSET arrivalName3D
|
|
invoke AppendCString, OFFSET entryDisplayName3D, OFFSET entryDat3D
|
|
xor ebx, ebx
|
|
graphic_create_duplicate:
|
|
cmp ebx, entryAccountCount3D
|
|
jae graphic_create_store
|
|
mov eax, ebx
|
|
shl eax, 6
|
|
add eax, OFFSET entryAccountNames3D
|
|
invoke lstrcmpiA, eax, OFFSET entryDisplayName3D
|
|
test eax, eax
|
|
jz graphic_create_fail
|
|
inc ebx
|
|
jmp graphic_create_duplicate
|
|
graphic_create_store:
|
|
mov eax, bankroll
|
|
mov previousBank, eax
|
|
mov eax, ownedBacks3D
|
|
mov previousOwned, eax
|
|
mov eax, selectedBack3D
|
|
mov previousBack, eax
|
|
invoke CreateDirectoryA, OFFSET runtime3D, 0
|
|
invoke CreateDirectoryA, nativeProfilesDirPtr3D, 0
|
|
call ResetProfileDefaults
|
|
invoke CopyCString, OFFSET saveFileName, OFFSET entryDisplayName3D
|
|
mov nativeProfileActive3D, 1
|
|
call SyncGraphicBack3D
|
|
call SaveGame
|
|
call ApplySoundVolume
|
|
invoke ValidateGraphicProfile3D, OFFSET entryFindPath3D
|
|
test eax, eax
|
|
jnz @F
|
|
mov nativeProfileActive3D, 0
|
|
mov eax, previousBank
|
|
mov bankroll, eax
|
|
mov eax, previousOwned
|
|
mov ownedBacks3D, eax
|
|
mov eax, previousBack
|
|
mov selectedBack3D, eax
|
|
ret
|
|
@@:
|
|
mov eax, 1
|
|
ret
|
|
graphic_create_fail:
|
|
xor eax, eax
|
|
ret
|
|
CreateGraphicProfile3D ENDP
|
|
|
|
SaveGraphicProfile3D PROC
|
|
mov eax, ownedBacks3D
|
|
mov shopBackOwned, eax
|
|
mov eax, selectedBack3D
|
|
mov shopBackStyle, eax
|
|
call SaveGame
|
|
ret
|
|
SaveGraphicProfile3D ENDP
|