Apple-2-SW/passport
1
0
Fork 0
mirror of https://github.com/a2-4am/passport.git synced 2024-11-19 03:06:34 +00:00
Code Issues Projects Releases Wiki Activity

fix the hangs

Browse Source
This commit is contained in:
Peter Ferrie 2018-12-29 15:33:25 -08:00
parent f1160b90e0
commit 1f9d89e250
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/id/inspect0.a
View File

@ -432,7 +432,7 @@ read13
.readaddr .readaddr
dec tmp dec tmp
bmi .badread bmi .badread2
clc clc
ldx #$02 ; 512 nibbles ldx #$02 ; 512 nibbles
ldy #0 ldy #0
@ -442,7 +442,7 @@ read13
--- iny --- iny
bne + bne +
dex dex
beq .badread beq .badread1
+ +
- lda $C0EC - lda $C0EC
bpl - bpl -
@ -473,7 +473,7 @@ read13
+ plp + plp
bcc .readaddr bcc .readaddr
eor #$AD eor #$AD
bne read13 bne .readaddr
-- ldy #$9A -- ldy #$9A
- ldx $C0EC - ldx $C0EC
bpl - bpl -
@ -489,8 +489,10 @@ read13
bpl - bpl -
eor $800,x eor $800,x
cmp #$01 ; set carry if non-zero cmp #$01 ; set carry if non-zero
!byte $24 !byte $2c
.badread .badread1
plp
.badread2
sec sec
lda $C0E8 lda $C0E8
rts rts