support Fax (#106)

This commit is contained in:
Peter Ferrie 2021-11-12 12:27:58 -08:00 committed by GitHub
parent be3787a015
commit 5000366bc6
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 17 additions and 2 deletions

View File

@ -193,10 +193,25 @@ Do555
;so we can count calls to whole-track seek
; static boot tracer!
.skip2jsr
ldy $801,x
lda $800,y
cmp #$A9 ; LDA
beq .nohalf
bne .maybehalf
lda $806,x
cmp #$20 ; JSR $xxxx
bne .nohalf
lda $808,x
eor .patch+1
bne .nohalf
txa
adc #5 ; try the next JSR instead
tax
inc .curtrk+1
inc .curtrk+1
bne .skip2jsr ; always taken
.maybehalf
lda $801,y
tay
lda $800,y

View File

@ -365,7 +365,7 @@ StringTableHigh ; must be kept in sync with constants in enid.a
.passport
!text "Passport ",$00
.header
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-10-07",$00
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-11-11",$00
.bar9
!text "_________",$00
.bar18