Second joystick button added to controls.

Not just the second joystick button. Also the button on the second joystick.

It works :)
This commit is contained in:
Pecusx
2026-03-12 20:44:24 +01:00
parent 0a3db56251
commit f82645ba91
5 changed files with 8 additions and 6 deletions
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+5 -2
View File
@@ -12,7 +12,7 @@
;---------------------------------------------------
.macro build
dta d"1.04" ; number of this build (4 bytes)
dta d"1.05" ; number of this build (4 bytes)
.endm
.macro RMTSong
@@ -3615,7 +3615,6 @@ notpressedJoyGetKey
.IF TARGET = 800 ; Second joy button , Select and Option key only on A800
jsr Check2button
bcc SecondButton
bne checkSelectKey
checkSelectKey
lda CONSOL
and #%00000010 ; Select
@@ -3627,6 +3626,8 @@ checkSelectKey
and #%00000001 ; Start
beq StartPressed
.ENDIF
lda STRIG1
beq SecondButton
lda #@kbcode._none
bne getkeyend
OptionPressed
@@ -3677,6 +3678,8 @@ StillWait
bne StillWait
lda STRIG0
beq StillWait
lda STRIG1
beq StillWait
.IF TARGET = 800
lda SKSTAT
and #%00000100 ; any key
BIN
View File
Binary file not shown.
+3 -4
View File
@@ -10,7 +10,7 @@
fcnt .ds 2
fadr .ds 2
fhlp .ds 2
cloc .ds 1
cloc .ds 2
regA .ds 1
regX .ds 1
regY .ds 1
@@ -78,8 +78,7 @@ _lp lda trig0 ; FIRE #0
and #1
beq stop
lda cloc
cmp #200 ; timer - 4s.
cpw cloc #500 ; timer 10s
bcs stop
lda skctl
@@ -194,7 +193,7 @@ VBL
mva #@dmactl(standard|dma|lineX1|players|missiles) dmactl ;set new screen width
inc cloc ;little timer
inw cloc ;little timer
; Initial values