Third button of JoyB2+

and pause after death :)
This commit is contained in:
Pecusx
2026-03-15 13:43:07 +01:00
parent f82645ba91
commit 026cb48377
2 changed files with 19 additions and 5 deletions
+19 -5
View File
@@ -57,7 +57,8 @@
.zpvar SpeedTableAdr .word
.zpvar Difficulty .byte ; 0 - normal, 1 - easy
.zpvar LumberjackDir .byte ; 2 - on left , 1 - on right
.zpvar PaddleState .byte
.zpvar Paddle1State .byte
.zpvar Paddle2State .byte
.zpvar LowCharsetBase .byte
.zpvar displayposition .word
.zpvar LastKey .byte ; $ff if no key pressed or last key released
@@ -1467,6 +1468,10 @@ gameOver
;game over
;RMTSong song_game_over
;jsr HiScoreCheckWrite
pause 50
jsr WaitForKeyRelease
pause 50
jsr WaitForKeyRelease
RMTsong song_scores
jsr GameOverScreen
jmp GameStart
@@ -3612,8 +3617,10 @@ notpressedJoyGetKey
;fire
lda STRIG0
beq JoyButton
.IF TARGET = 800 ; Second joy button , Select and Option key only on A800
jsr Check2button
.IF TARGET = 800 ; More joy buttons , Select and Option key only on A800
jsr Check3button ; Third joy button
bcc JoyButton ; like First button
jsr Check2button ; Second joy button
bcc SecondButton
checkSelectKey
lda CONSOL
@@ -3652,8 +3659,15 @@ Check2button
lda PADDL0
and #$c0
eor #$C0
cmp PaddleState
sta PaddleState
cmp Paddle1State
sta Paddle1State
rts
Check3button
lda PADDL1
and #$c0
eor #$C0
cmp Paddle2State
sta Paddle2State
rts
.ENDIF
.endp
BIN
View File
Binary file not shown.