Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2024-12-22 04:29:59 +00:00
Code Issues Projects Releases Wiki Activity

let RDOS exit on seek failure

Browse Source
This commit is contained in:
Peter Ferrie 2018-10-10 21:15:51 -07:00
parent 64a06d71ba
commit 31bde9b039
2 changed files with 16 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/id/trace32.a
View File

@ -197,6 +197,11 @@ TraceDOS32LO
lda #>.RDOS13Hook
sta jCallRWTS+2
lda #<.RDOS13Seek
sta $BAC7
lda #>.RDOS13Seek
sta $BAC8
lda $BC76
cmp #$D5
beq .patchmap
@ -347,4 +352,14 @@ FFer
dex
stx $B719 ;count of sectors (high part)
jmp $BA00
.RDOS13Seek
jsr $BC65 ;read address
lda $2E
cmp $BAF5
bne +
jmp $BAC9
+ sec ;fail on the tracks that don't exist
rts
}

2
src/strings/en.a
View File

@ -147,7 +147,7 @@ StringTable
; can be set directly before calling PrintByID.
;
.header
!text "Passport by 4am 2018-10-09",$00
!text "Passport by 4am 2018-10-10",$00
.mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " "