fix 13-sector infinite loop

This commit is contained in:
Peter Ferrie 2021-07-08 20:57:25 -07:00
parent 101c5ba5d7
commit eab36f7bfc

View File

@ -52,11 +52,8 @@ VerifyInfocom18
cmp #$AA cmp #$AA
bne -- bne --
jsr ReadNib jsr ReadNib
ldx gTrack
bne .no13 ; skip if not boot phase
cmp #$B5 ; 13-sector only cmp #$B5 ; 13-sector only
beq .build13 beq .build13
.no13
cmp #$AD cmp #$AD
bne -- bne --
@ -122,20 +119,22 @@ VerifyInfocom18
.RW18 .RW18
jsr .rw18pro jsr .rw18pro
bne .jmpbadsect bne .badsect
ldx gIsRW18 ldx gIsRW18
beq .verifyrw18 beq .verifyrw18
sta gIsRW18 sta gIsRW18
bne .checkmode ; always taken bne .checkmode ; always taken
.jmpbadsect
jmp .badsect
;build 5-and-3 decoding table ;build 5-and-3 decoding table
;for 13-sector support ;for 13-sector support
.no13
jmp ---
.build13 .build13
ldx #$00 lda gTrack
bne .no13 ; skip if not boot phase
ldx #0
ldy #$AB ldy #$AB
- tya - tya
sta tmp sta tmp