mirror of
https://github.com/a2-4am/passport.git
synced 2024-06-08 16:29:33 +00:00
fix random error when switching from 16 to 13 sectors
This commit is contained in:
parent
f5fc9ae5bb
commit
f96c63acfd
|
@ -309,6 +309,11 @@ VerifyInfocom18
|
||||||
eor #$AA
|
eor #$AA
|
||||||
+ rts
|
+ rts
|
||||||
|
|
||||||
|
seekread13
|
||||||
|
dec gCommand
|
||||||
|
jsr $BD00 ; seek
|
||||||
|
inc gCommand
|
||||||
|
|
||||||
read13
|
read13
|
||||||
lda $C0E9
|
lda $C0E9
|
||||||
lda #$1C ; retry count
|
lda #$1C ; retry count
|
||||||
|
|
|
@ -365,7 +365,7 @@ StringTableHigh ; must be kept in sync with constants in enid.a
|
||||||
.passport
|
.passport
|
||||||
!text "Passport ",$00
|
!text "Passport ",$00
|
||||||
.header
|
.header
|
||||||
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-09-04",$00
|
!text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2021-09-05",$00
|
||||||
.bar9
|
.bar9
|
||||||
!text "_________",$00
|
!text "_________",$00
|
||||||
.bar18
|
.bar18
|
||||||
|
|
|
@ -22,9 +22,11 @@ UseUniversal
|
||||||
;
|
;
|
||||||
lda gIs13Sector
|
lda gIs13Sector
|
||||||
bne @not13Sector
|
bne @not13Sector
|
||||||
lda #<read13
|
lda #0
|
||||||
|
sta $47E ; restore track number replaced by DOS
|
||||||
|
lda #<seekread13
|
||||||
sta jCallRWTS+1
|
sta jCallRWTS+1
|
||||||
lda #>read13
|
lda #>seekread13
|
||||||
sta jCallRWTS+2
|
sta jCallRWTS+2
|
||||||
bne @doneUnivPatching ; always branches
|
bne @doneUnivPatching ; always branches
|
||||||
@not13Sector
|
@not13Sector
|
||||||
|
|
Loading…
Reference in New Issue
Block a user