mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 21:41:27 +00:00
31 lines
832 B
Plaintext
31 lines
832 B
Plaintext
;-------------------------------
|
|
; IDMicrograms
|
|
; identify Micrograms bootloader
|
|
;
|
|
; in: track buffer contains T00,S00
|
|
; A = 0
|
|
; X = 0
|
|
; out: C clear if Micrograms bootloader was found
|
|
; C set if not found
|
|
; A = 0
|
|
; X = 0
|
|
; all other registers & flags clobbered
|
|
;-------------------------------
|
|
!macro IDMicrograms {
|
|
ldy #$0B
|
|
jsr compare
|
|
!byte $01
|
|
!byte $A5,$27
|
|
!byte $C9,$09
|
|
!byte $D0,$12
|
|
!byte $A9,$C6
|
|
!byte $85,$3F
|
|
bcs @notMicrograms ; passport-test-suite/Shapes and Patterns.woz [C=0] matches
|
|
ldx #$42
|
|
jsr compare2
|
|
!byte $4C,$00
|
|
; passport-test-suite/Shapes and Patterns.woz [C=0] matches
|
|
tax
|
|
@notMicrograms
|
|
}
|