Artvasil09
4f8ae0893b
Add native assembly scenes and assets for Slots (777), Coin flip, and European Roulette; add 3D hall furniture packs and prompts; improve Russian UI strings in CP1251; update launcher hash and rebuild shipping binaries.
570 lines
14 KiB
PHP
570 lines
14 KiB
PHP
FreeNativeSlots3D PROC
|
|
invoke FreeAnimPack3D, OFFSET slotCabinetPack3D
|
|
invoke FreeAnimPack3D, OFFSET slotSymbolsPack3D
|
|
ret
|
|
FreeNativeSlots3D ENDP
|
|
|
|
InitNativeSlots3D PROC
|
|
invoke LoadAnimPack3D, OFFSET slotCabinetPack3D, OFFSET slotCabinetPath3D
|
|
test eax,eax
|
|
jz slot_init_fail
|
|
cmp slotCabinetPack3D.imageWidth,640
|
|
jne slot_init_fail
|
|
cmp slotCabinetPack3D.height,480
|
|
jne slot_init_fail
|
|
cmp slotCabinetPack3D.frames,1
|
|
jne slot_init_fail
|
|
invoke LoadAnimPack3D, OFFSET slotSymbolsPack3D, OFFSET slotSymbolsPath3D
|
|
test eax,eax
|
|
jz slot_init_fail
|
|
cmp slotSymbolsPack3D.imageWidth,64
|
|
jne slot_init_fail
|
|
cmp slotSymbolsPack3D.height,64
|
|
jne slot_init_fail
|
|
cmp slotSymbolsPack3D.frames,8
|
|
jne slot_init_fail
|
|
mov slotSpinState,SLOT_READY
|
|
mov slotSpinTimer,0
|
|
mov slotWinAmount,0
|
|
mov slotStake3D,0
|
|
mov slotLeaveAfter3D,0
|
|
mov slotPaytable3D,0
|
|
mov slotError3D,0
|
|
mov slotEffects3D,0
|
|
mov slotBetIndex3D,1
|
|
mov slotBet,50
|
|
mov cardExitActive3D,0
|
|
mov paused3D,0
|
|
call ClearKeys3D
|
|
mov eax,1
|
|
ret
|
|
slot_init_fail:
|
|
call FreeNativeSlots3D
|
|
xor eax,eax
|
|
ret
|
|
InitNativeSlots3D ENDP
|
|
|
|
; Results are sampled once at stake debit. Rendering never consumes RNG or pays.
|
|
StartNativeSlots3D PROC uses ebx esi
|
|
cmp slotSpinState,SLOT_SPIN
|
|
je slot_start_done
|
|
cmp slotPaytable3D,0
|
|
jne slot_start_done
|
|
cmp slotCabinetPack3D.pixels,0
|
|
je slot_start_done
|
|
cmp slotSymbolsPack3D.pixels,0
|
|
je slot_start_done
|
|
mov eax,slotBet
|
|
test eax,eax
|
|
jz slot_start_done
|
|
cmp eax,10000
|
|
ja slot_start_done
|
|
cmp eax,bankroll
|
|
ja slot_start_money
|
|
sub bankroll,eax
|
|
mov slotStake3D,eax
|
|
mov slotSpinState,SLOT_SPIN
|
|
mov slotSpinTimer,0
|
|
mov slotWinAmount,0
|
|
mov slotLeaveAfter3D,0
|
|
mov slotError3D,0
|
|
mov slotEffects3D,0
|
|
xor esi,esi
|
|
slot_start_reel:
|
|
mov eax,slotStops3D[esi*4]
|
|
mov slotStartStops3D[esi*4],eax
|
|
invoke RandomRange3D,20
|
|
mov slotTargets3D[esi*4],eax
|
|
mov edx,slotStrip3D[eax*4]
|
|
mov slotReel1[esi*4],edx
|
|
sub eax,slotStartStops3D[esi*4]
|
|
jns @F
|
|
add eax,20
|
|
@@:
|
|
add eax,slotCycles3D[esi*4]
|
|
shl eax,6
|
|
mov slotTravel3D[esi*4],eax
|
|
inc esi
|
|
cmp esi,3
|
|
jb slot_start_reel
|
|
call SaveProgress3D
|
|
invoke PlayCasinoSound3D, OFFSET soundSlotSpin,0,1
|
|
ret
|
|
slot_start_money:
|
|
mov slotError3D,1
|
|
slot_start_done:
|
|
ret
|
|
StartNativeSlots3D ENDP
|
|
|
|
; Gross multipliers. A cherry pair pays 2x, any other pair returns the stake.
|
|
SlotMultiplier3D PROC first:DWORD,second:DWORD,third:DWORD
|
|
mov eax,first
|
|
cmp eax,7
|
|
ja slot_multiplier_zero
|
|
cmp second,7
|
|
ja slot_multiplier_zero
|
|
cmp third,7
|
|
ja slot_multiplier_zero
|
|
cmp eax,second
|
|
jne slot_multiplier_other_pair
|
|
cmp eax,third
|
|
jne slot_multiplier_pair
|
|
mov eax,slotTriple3D[eax*4]
|
|
ret
|
|
slot_multiplier_other_pair:
|
|
cmp eax,third
|
|
je slot_multiplier_pair
|
|
mov eax,second
|
|
cmp eax,third
|
|
jne slot_multiplier_zero
|
|
slot_multiplier_pair:
|
|
cmp eax,1
|
|
jne @F
|
|
mov eax,2
|
|
ret
|
|
@@:
|
|
mov eax,1
|
|
ret
|
|
slot_multiplier_zero:
|
|
xor eax,eax
|
|
ret
|
|
SlotMultiplier3D ENDP
|
|
|
|
SettleNativeSlots3D PROC uses esi
|
|
cmp slotSpinState,SLOT_SPIN
|
|
jne slot_settle_done
|
|
invoke SlotMultiplier3D,slotReel1,slotReel2,slotReel3
|
|
mul slotStake3D
|
|
mov slotWinAmount,eax
|
|
add bankroll,eax
|
|
jc slot_settle_cap
|
|
cmp bankroll,1000000000
|
|
jbe @F
|
|
slot_settle_cap:
|
|
mov bankroll,1000000000
|
|
@@:
|
|
xor esi,esi
|
|
slot_settle_stops:
|
|
mov eax,slotTargets3D[esi*4]
|
|
mov slotStops3D[esi*4],eax
|
|
inc esi
|
|
cmp esi,3
|
|
jb slot_settle_stops
|
|
mov slotSpinTimer,3000
|
|
mov slotSpinState,SLOT_RESULT
|
|
mov slotEffects3D,0
|
|
call SaveProgress3D
|
|
cmp slotWinAmount,0
|
|
je slot_settle_loss
|
|
invoke PlayCasinoSound3D,OFFSET soundRoundWin,0,1
|
|
jmp slot_settle_exit
|
|
slot_settle_loss:
|
|
invoke PlayCasinoSound3D,OFFSET soundRoundLose,0,1
|
|
slot_settle_exit:
|
|
cmp slotLeaveAfter3D,0
|
|
je slot_settle_done
|
|
call SlotEscape3D
|
|
slot_settle_done:
|
|
ret
|
|
SettleNativeSlots3D ENDP
|
|
|
|
; Escape queues a safe exit during a paid spin; it never opens the pause menu.
|
|
SlotEscape3D PROC
|
|
mov paused3D,0
|
|
cmp slotPaytable3D,0
|
|
je @F
|
|
mov slotPaytable3D,0
|
|
call ClearKeys3D
|
|
ret
|
|
@@:
|
|
cmp slotSpinState,SLOT_SPIN
|
|
jne slot_exit_hall
|
|
mov slotLeaveAfter3D,1
|
|
call ClearKeys3D
|
|
ret
|
|
slot_exit_hall:
|
|
mov slotLeaveAfter3D,0
|
|
mov paused3D,0
|
|
mov engineMode,MODE_WALK
|
|
call ClearKeys3D
|
|
invoke PlayCasinoSound3D,0,0,0
|
|
ret
|
|
SlotEscape3D ENDP
|
|
|
|
; A monotonic quadratic ease-out maps elapsed milliseconds to strip pixels.
|
|
SlotReelPosition3D PROC uses ebx index:DWORD
|
|
mov ebx,index
|
|
cmp ebx,2
|
|
ja slot_position_zero
|
|
mov eax,slotStops3D[ebx*4]
|
|
shl eax,6
|
|
cmp slotSpinState,SLOT_SPIN
|
|
jne slot_position_done
|
|
mov eax,slotSpinTimer
|
|
cmp eax,slotDurations3D[ebx*4]
|
|
jae slot_position_end
|
|
shl eax,10
|
|
xor edx,edx
|
|
div slotDurations3D[ebx*4]
|
|
mov ecx,2048
|
|
sub ecx,eax
|
|
imul eax,ecx
|
|
mul slotTravel3D[ebx*4]
|
|
shrd eax,edx,20
|
|
mov edx,slotStartStops3D[ebx*4]
|
|
shl edx,6
|
|
add eax,edx
|
|
ret
|
|
slot_position_end:
|
|
mov eax,slotStartStops3D[ebx*4]
|
|
shl eax,6
|
|
add eax,slotTravel3D[ebx*4]
|
|
slot_position_done:
|
|
ret
|
|
slot_position_zero:
|
|
xor eax,eax
|
|
ret
|
|
SlotReelPosition3D ENDP
|
|
|
|
SlotExitMouse3D PROC
|
|
cmp mouseClick3D,0
|
|
je slot_exit_mouse_done
|
|
mov mouseClick3D,0
|
|
cmp mouseY3D,3
|
|
jb slot_exit_mouse_done
|
|
cmp mouseY3D,17
|
|
jae slot_exit_mouse_done
|
|
cmp mouseX3D,252
|
|
jb slot_exit_mouse_done
|
|
cmp mouseX3D,312
|
|
jae slot_exit_mouse_done
|
|
call SlotEscape3D
|
|
slot_exit_mouse_done:
|
|
ret
|
|
SlotExitMouse3D ENDP
|
|
|
|
HandleNativeSlots3D PROC uses ebx
|
|
cmp slotSpinState,SLOT_SPIN
|
|
jne slot_handle_idle
|
|
; Process the header before settlement so the final spin tick cannot eat it.
|
|
call SlotExitMouse3D
|
|
mov eax,deltaTime3D
|
|
cmp eax,250
|
|
jbe @F
|
|
mov eax,250
|
|
@@:
|
|
add slotSpinTimer,eax
|
|
cmp slotSpinTimer,3000
|
|
jb slot_handle_exit_mouse
|
|
call SettleNativeSlots3D
|
|
ret
|
|
slot_handle_idle:
|
|
mov eax,deltaTime3D
|
|
add slotEffects3D,eax
|
|
cmp slotEffects3D,2000
|
|
jbe @F
|
|
mov slotEffects3D,2000
|
|
@@:
|
|
cmp slotPaytable3D,0
|
|
je slot_handle_controls
|
|
invoke Pressed3D,0Dh
|
|
test eax,eax
|
|
jnz slot_close_paytable
|
|
invoke Pressed3D,20h
|
|
test eax,eax
|
|
jnz slot_close_paytable
|
|
invoke Pressed3D,50h
|
|
test eax,eax
|
|
jnz slot_close_paytable
|
|
cmp mouseClick3D,0
|
|
je slot_handle_done
|
|
mov mouseClick3D,0
|
|
cmp mouseY3D,202
|
|
jb slot_handle_done
|
|
cmp mouseY3D,220
|
|
jae slot_handle_done
|
|
cmp mouseX3D,112
|
|
jb slot_handle_done
|
|
cmp mouseX3D,208
|
|
jae slot_handle_done
|
|
slot_close_paytable:
|
|
mov slotPaytable3D,0
|
|
ret
|
|
slot_handle_controls:
|
|
cmp mouseClick3D,0
|
|
je slot_handle_keys
|
|
cmp mouseY3D,222
|
|
jb slot_handle_keys
|
|
cmp mouseY3D,238
|
|
jae slot_handle_keys
|
|
mov mouseClick3D,0
|
|
mov eax,mouseX3D
|
|
cmp eax,11
|
|
jb slot_handle_keys
|
|
cmp eax,29
|
|
jb slot_bet_down
|
|
cmp eax,35
|
|
jb slot_handle_keys
|
|
cmp eax,53
|
|
jb slot_bet_up
|
|
cmp eax,120
|
|
jb slot_handle_keys
|
|
cmp eax,190
|
|
jb slot_handle_start
|
|
cmp eax,202
|
|
jb slot_handle_keys
|
|
cmp eax,272
|
|
jae slot_handle_keys
|
|
mov slotPaytable3D,1
|
|
ret
|
|
slot_handle_keys:
|
|
invoke Pressed3D,50h
|
|
test eax,eax
|
|
jz @F
|
|
mov slotPaytable3D,1
|
|
ret
|
|
@@:
|
|
invoke Pressed3D,57h
|
|
test eax,eax
|
|
jnz slot_bet_up
|
|
invoke Pressed3D,26h
|
|
test eax,eax
|
|
jnz slot_bet_up
|
|
invoke Pressed3D,53h
|
|
test eax,eax
|
|
jnz slot_bet_down
|
|
invoke Pressed3D,28h
|
|
test eax,eax
|
|
jnz slot_bet_down
|
|
invoke Pressed3D,20h
|
|
test eax,eax
|
|
jnz slot_handle_start
|
|
invoke Pressed3D,0Dh
|
|
test eax,eax
|
|
jz slot_handle_exit_mouse
|
|
slot_handle_start:
|
|
call StartNativeSlots3D
|
|
ret
|
|
slot_bet_up:
|
|
cmp slotBetIndex3D,6
|
|
jae slot_handle_done
|
|
inc slotBetIndex3D
|
|
jmp slot_bet_changed
|
|
slot_bet_down:
|
|
cmp slotBetIndex3D,0
|
|
je slot_handle_done
|
|
dec slotBetIndex3D
|
|
slot_bet_changed:
|
|
mov ecx,slotBetIndex3D
|
|
mov eax,slotBetValues3D[ecx*4]
|
|
mov slotBet,eax
|
|
mov slotError3D,0
|
|
ret
|
|
slot_handle_exit_mouse:
|
|
call SlotExitMouse3D
|
|
slot_handle_done:
|
|
ret
|
|
HandleNativeSlots3D ENDP
|
|
|
|
; Clip the 64x64 alpha-tested symbol to its own reel window, not the cabinet.
|
|
DrawSlotSymbol3D PROC uses ebx esi edi symbol:DWORD,x:DWORD,y:DWORD
|
|
local row:DWORD,lastRow:DWORD,source:DWORD
|
|
cmp symbol,7
|
|
ja slot_symbol_done
|
|
mov eax,slotSymbolsPack3D.pixels
|
|
test eax,eax
|
|
jz slot_symbol_done
|
|
mov ecx,symbol
|
|
shl ecx,14
|
|
add eax,ecx
|
|
mov source,eax
|
|
mov eax,y
|
|
cmp eax,SLOT_TOP
|
|
jge @F
|
|
mov eax,SLOT_TOP
|
|
@@:
|
|
mov row,eax
|
|
mov eax,y
|
|
add eax,64
|
|
cmp eax,SLOT_BOTTOM
|
|
jle @F
|
|
mov eax,SLOT_BOTTOM
|
|
@@:
|
|
mov lastRow,eax
|
|
slot_symbol_row:
|
|
mov eax,row
|
|
cmp eax,lastRow
|
|
jge slot_symbol_done
|
|
mov ecx,eax
|
|
sub ecx,y
|
|
shl ecx,8
|
|
mov esi,source
|
|
add esi,ecx
|
|
imul eax,640*4
|
|
mov ecx,x
|
|
lea edi,screenBuffer[eax+ecx*4]
|
|
mov ecx,64
|
|
slot_symbol_column:
|
|
lodsd
|
|
test eax,0FF000000h
|
|
jz @F
|
|
and eax,00FFFFFFh
|
|
mov [edi],eax
|
|
@@:
|
|
add edi,4
|
|
dec ecx
|
|
jnz slot_symbol_column
|
|
inc row
|
|
jmp slot_symbol_row
|
|
slot_symbol_done:
|
|
ret
|
|
DrawSlotSymbol3D ENDP
|
|
|
|
DrawSlotReel3D PROC uses ebx esi edi index:DWORD
|
|
local offsetPx:DWORD,baseStop:DWORD,symbolY:DWORD,symbolX:DWORD
|
|
invoke SlotReelPosition3D,index
|
|
xor edx,edx
|
|
mov ecx,64
|
|
div ecx
|
|
mov offsetPx,edx
|
|
xor edx,edx
|
|
mov ecx,20
|
|
div ecx
|
|
mov baseStop,edx
|
|
mov ebx,index
|
|
mov eax,slotWindows3D[ebx*4]
|
|
add eax,12
|
|
mov symbolX,eax
|
|
mov eax,160
|
|
sub eax,offsetPx
|
|
sub eax,64
|
|
mov symbolY,eax
|
|
mov esi,baseStop
|
|
add esi,19
|
|
xor edi,edi
|
|
slot_reel_symbol:
|
|
mov eax,esi
|
|
xor edx,edx
|
|
mov ecx,20
|
|
div ecx
|
|
mov eax,slotStrip3D[edx*4]
|
|
invoke DrawSlotSymbol3D,eax,symbolX,symbolY
|
|
add symbolY,64
|
|
inc esi
|
|
inc edi
|
|
cmp edi,4
|
|
jb slot_reel_symbol
|
|
ret
|
|
DrawSlotReel3D ENDP
|
|
|
|
RenderNativeSlots3D PROC uses ebx esi edi
|
|
; The validated cabinet is opaque and already framebuffer-sized.
|
|
mov esi,slotCabinetPack3D.pixels
|
|
test esi,esi
|
|
jz slot_render_done
|
|
lea edi,screenBuffer
|
|
mov ecx,SCREEN_SIZE
|
|
rep movsd
|
|
xor esi,esi
|
|
slot_render_reels:
|
|
invoke DrawSlotReel3D,esi
|
|
inc esi
|
|
cmp esi,3
|
|
jb slot_render_reels
|
|
; The payline is fixed at the center of the three physical drums.
|
|
invoke DrawBox,86,94,4,3,00E9CE71h
|
|
invoke DrawBox,232,94,4,3,00E9CE71h
|
|
cmp slotSpinState,SLOT_RESULT
|
|
jne slot_render_header
|
|
cmp slotWinAmount,0
|
|
je slot_render_header
|
|
mov eax,slotEffects3D
|
|
xor edx,edx
|
|
mov ecx,200
|
|
div ecx
|
|
test eax,1
|
|
jnz slot_render_header
|
|
invoke DrawBox,90,94,142,1,00E9CE71h
|
|
slot_render_header:
|
|
invoke DrawBox,0,0,320,19,00151D20h
|
|
invoke DrawString8x8,8,6,OFFSET slotTitle3D,00E8D7ADh
|
|
invoke DrawString8x8,54,6,OFFSET textBank3D,00A8DDB9h
|
|
invoke FormatNumber,bankroll,OFFSET hudNumBuffer
|
|
invoke DrawString8x8,103,6,OFFSET hudNumBuffer,00F4F3E8h
|
|
invoke DrawBoxBorder,252,3,60,14,002C3637h,00687672h,1
|
|
invoke DrawString8x8,258,6,OFFSET cardExitButton3D,00E9D8B0h
|
|
mov ebx,OFFSET slotReadyText3D
|
|
cmp slotSpinState,SLOT_SPIN
|
|
jne @F
|
|
mov ebx,OFFSET slotRollingText3D
|
|
@@:
|
|
cmp slotSpinState,SLOT_RESULT
|
|
jne @F
|
|
mov ebx,OFFSET slotLoseText3D
|
|
cmp slotWinAmount,0
|
|
je @F
|
|
mov ebx,OFFSET slotWinText3D
|
|
@@:
|
|
cmp slotError3D,0
|
|
je @F
|
|
mov ebx,OFFSET slotNoMoney3D
|
|
@@:
|
|
cmp slotLeaveAfter3D,0
|
|
je @F
|
|
mov ebx,OFFSET slotExitText3D
|
|
@@:
|
|
; Keep the message on the generated inset plate, with fixed-size numerals.
|
|
invoke DrawBox,98,147,126,12,00151D20h
|
|
invoke DrawString8x8,104,149,ebx,00E8D7ADh
|
|
cmp slotSpinState,SLOT_RESULT
|
|
jne slot_render_controls
|
|
cmp slotWinAmount,0
|
|
je slot_render_controls
|
|
invoke FormatNumber,slotWinAmount,OFFSET hudNumBuffer
|
|
invoke DrawString8x8,164,149,OFFSET hudNumBuffer,00A8DDB9h
|
|
slot_render_controls:
|
|
invoke DrawBox,0,202,320,38,00151D20h
|
|
invoke DrawString8x8,11,207,OFFSET slotBetText3D,00E8D7ADh
|
|
invoke FormatNumber,slotBet,OFFSET hudNumBuffer
|
|
invoke DrawString8x8,83,207,OFFSET hudNumBuffer,00F4F3E8h
|
|
mov ebx,1
|
|
cmp slotSpinState,SLOT_SPIN
|
|
jne @F
|
|
xor ebx,ebx
|
|
@@:
|
|
mov edi,006D7470h
|
|
test ebx,ebx
|
|
jz @F
|
|
mov edi,00EEE5CDh
|
|
@@:
|
|
invoke DrawBoxBorder,11,222,18,16,0025372Ch,edi,1
|
|
invoke DrawBoxBorder,35,222,18,16,0025372Ch,edi,1
|
|
invoke DrawString8x8,16,226,OFFSET tableMinusText3D,edi
|
|
invoke DrawString8x8,40,226,OFFSET tablePlusText3D,edi
|
|
invoke DrawTableButton3D,120,OFFSET slotSpinText3D,ebx
|
|
invoke DrawTableButton3D,202,OFFSET slotPayText3D,ebx
|
|
cmp slotPaytable3D,0
|
|
je slot_render_done
|
|
invoke DrawBoxBorder,30,23,260,198,00151D20h,00D1B16Eh,1
|
|
invoke DrawString8x8,76,31,OFFSET slotPayTitle3D,00E8D7ADh
|
|
invoke DrawString8x8,66,48,OFFSET slotTripleText3D,00A8DDB9h
|
|
xor esi,esi
|
|
slot_render_pay_row:
|
|
mov edi,esi
|
|
imul edi,14
|
|
add edi,66
|
|
mov eax,slotSymbolNames3D[esi*4]
|
|
invoke DrawString8x8,62,edi,eax,00F4F3E8h
|
|
invoke FormatNumber,slotTriple3D[esi*4],OFFSET hudNumBuffer
|
|
invoke DrawString8x8,212,edi,OFFSET strMultiplier3D,00E8D7ADh
|
|
invoke DrawString8x8,220,edi,OFFSET hudNumBuffer,00E8D7ADh
|
|
inc esi
|
|
cmp esi,8
|
|
jb slot_render_pay_row
|
|
invoke DrawString8x8,62,181,OFFSET slotPairText3D,00A8DDB9h
|
|
invoke DrawString8x8,62,192,OFFSET slotCherryPair3D,00A8DDB9h
|
|
invoke DrawBoxBorder,112,204,96,15,003B6C59h,00E9D8B0h,1
|
|
invoke DrawString8x8,128,207,OFFSET slotCloseText3D,00E9D8B0h
|
|
slot_render_done:
|
|
ret
|
|
RenderNativeSlots3D ENDP
|