fix Boulder Dash

This commit is contained in:
Peter Ferrie 2017-03-03 20:15:02 -08:00
parent 51323ea92b
commit 22c8342ee3

View File

@ -256,7 +256,7 @@ _ea
!byte $05,$CC,$DC ;JSRA $05cf
!byte $04,$EB,$19 ;LDA $c0e8
!byte $04,$E1,$DE ;LDA $07e2
bcs .exit
bcs +
pha
txa
adc #21
@ -266,6 +266,24 @@ _ea
jsr modify
!byte $E0 ;lda from known-zero instead
+ ldy #16
jsr SearchTrack
!byte $49,$4E ;EOR #$4E
!byte $09,$2B ;ORA #$2B
!byte $48 ;PHA
!byte $A9,$04 ;LDA #$04
!byte $48 ;PHA
!byte $A5,$4F ;LDA $4F
!byte $45,$4F ;EOR $4F
!byte $18 ;CLC
!byte $E9,$00 ;SBC #$00
!byte $48 ;PHA
bcs .exit
inx
ldy #1
jsr modify
!byte $E8 ;new checksum value for eor
.dostitles
lda gIsBoot0
bne .exit