passport/src/id/jsr8b3.a
2021-06-20 00:18:55 -04:00

31 lines
853 B
Plaintext
Executable File

;-------------------------------
; ID8b3
; identify a bootloader that JSRs to $08B3
; to alter the nibble translate table used
; by the drive firmware at $C600
;
; in: track buffer contains T00,S00
; A = 0
; out: C clear if this bootloader was found
; C set otherwise
; A = 0
; X = 0
; all other registers & flags clobbered
;-------------------------------
!macro ID8b3 {
ldx #$B3
ldy #$14
jsr compare
!byte $A9,$3F,$8D,$6C,$03
!byte $A9,$1C,$8D,$CC,$03
!byte $A9,$00,$8D,$D5,$03
!byte $A9,$37,$8D,$A3,$03
tax
bcs +
ldy #$08
jsr compare
!byte $01,$20,$B3,$08,$D0,$19,$EA,$A5
; passport-test-suite/Ardy The Aardvark.woz [C=0] matches
+
}