Apple-2-Tools
/
4cade
mirror of https://github.com/a2-4am/4cade.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Bandits: map shield to button 1

This commit is contained in:
Peter Ferrie 2024-03-14 13:47:17 -07:00
parent 8ec38d2c95
commit 48567554df
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/prelaunch/bandits.a
View File

@ -1,5 +1,5 @@
;license:MIT ;license:MIT
;(c) 2020 by qkumba ;(c) 2020, 2024 by qkumba
!cpu 6502 !cpu 6502
!to "build/PRELAUNCH.INDEXED/BANDITS",plain !to "build/PRELAUNCH.INDEXED/BANDITS",plain
@ -11,20 +11,20 @@
lda #$60 lda #$60
sta $87A sta $87A
jsr $800 ; decompress jsr $800 ; decompress
+GET_MACHINE_STATUS
and #CHEATS_ENABLED
beq +
lda #<callback lda #<callback
sta $481 sta $481
lda #>callback lda #>callback
sta $482 sta $482
+
+DISABLE_ACCEL +DISABLE_ACCEL
jmp $8F40 jmp $8F40
callback callback
+ENABLE_ACCEL +ENABLE_ACCEL
jsr $4C8 ; decompress jsr $4C8 ; decompress
+GET_MACHINE_STATUS
and #CHEATS_ENABLED
beq +
lda $57 lda $57
cmp #$0F cmp #$0F
bne + bne +
@ -34,6 +34,11 @@ callback
lda #$AD lda #$AD
sta $63AE ; patch - don't decrease lives sta $63AE ; patch - don't decrease lives
+ +
lda #$35 ; map shield to button 1
sta $2AF
lda #2
sta $2B4
+DISABLE_ACCEL +DISABLE_ACCEL
lda #0 lda #0
rts rts