passport/src/id/diversidos.a
2021-06-19 19:42:56 -04:00

23 lines
735 B
Plaintext

;-------------------------------
; IDDiversi
; identify Diversi-DOS bootloader
;
; in: $0800..$08FF contains T00,S00
; first page of track buffer also contains T00,S00
; bootloader was identified as DOS 3.3-shaped (IDDOS33 returned success)
; A = 0
; out: C clear if Diversi-DOS bootloader found
; C set otherwise
; A = 0
; all other registers & flags clobbered
;-------------------------------
!macro IDDiversi {
ldx #$F1
ldy #$0B
jsr compare ; if T00,S00,$F1 ==
!byte $B3,$A3,$A0,$D2,$CF,$D2,$D2,$C5,$8D,$87,$8D
bcs + ; passport-test-suite/Moon Bingo.woz [C=0] matches
sta gIsDiversi
+
}