;-------------------------------
; 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
+
}