shave some bytes

This commit is contained in:
Peter Ferrie 2021-09-08 13:34:37 -07:00
parent f4eaf797a0
commit 04a3179328

View File

@ -330,7 +330,7 @@
+ ldy #16
jsr SearchTrack
!byte $49,$4E ;EOR #$4E
!byte $09,$2B ;ORA #$2B
!byte $09,WILDCARD ;ORA #$xx
!byte $48 ;PHA
!byte $A9,$04 ;LDA #$04
!byte $48 ;PHA
@ -532,25 +532,6 @@
jsr modify1
!byte $7F ;lda from known-zero instead
+ ldy #16
jsr SearchTrack
!byte $49,$4E ;EOR #$4E
!byte $09,$A1 ;ORA #$A1
!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 +
jsr PrintByID
!byte s_tamper
inx
jsr modify1
!byte $E8 ;new checksum value for eor
+
.dostitles