mirror of
https://github.com/a2-4am/passport.git
synced 2024-05-28 21:41:27 +00:00
19 lines
556 B
Plaintext
19 lines
556 B
Plaintext
;-------------------------------
|
|
; IDDinkeyDOS
|
|
; identify Dinkey-DOS by filename in ProDOS catalog
|
|
;
|
|
; in: track buffer contains T00,S0B
|
|
; out: C clear if Dinkey-DOS found
|
|
; C set otherwise
|
|
; A = #$0B
|
|
; all other registers & flags clobbered
|
|
;-------------------------------
|
|
!macro IDDinkeyDOS {
|
|
lda #$0B
|
|
ldx #$2B
|
|
tay
|
|
jsr compare ; if T00,S0B,$2B ==
|
|
!byte $29,$44,$49,$4E,$4B,$45,$59,$44,$4F,$53,$00
|
|
; passport-test-suite/Ultima V.woz [C=0] matches
|
|
}
|