passport/src/id/encode53.a
2017-01-23 16:57:43 -08:00

23 lines
572 B
Plaintext
Executable File

;-------------------------------
; IDEncoded53
; identify bootloader that loads
; 5-3-encoded data from track 0
; (these disks are unsupported)
;
; in: track buffer contains T00,S00
; out: C clear if 5-3-encoding loader found
; C set otherwise
; all registers clobbered
; all other flags clobbered
;-------------------------------
!zone {
IDEncoded53
ldy #$10
jsr SearchTrack
!byte $BD,$8C,$C0,$10,$FB,$C9,$B5,$F0
!byte $09,$28,$90,$DF,$49,$AD,$F0,$1F
bcs .exit
.exit
rts
}