Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2025-02-07 04:32:14 +00:00
Code Issues Projects Releases Wiki Activity

support seek(0)

Browse Source
This commit is contained in:
Peter Ferrie 2021-10-19 15:01:45 -07:00
parent 7322565cda
commit 857a7b960e
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/constants.a
View File

@ -150,7 +150,7 @@ iCurBlockLo = $D401 ; constant
iCurBlockHi = $D403 ; constant iCurBlockHi = $D403 ; constant
launchpatch = $D655 ; glue.launch.a launchpatch = $D655 ; glue.launch.a
iAddToPath = $FE6C ; Roger Rabbit, avoid, use Infiltrator 2 style instead iAddToPath = $FE6C ; Roger Rabbit, avoid, use Infiltrator 2 style instead
itraverse = $D94A ; Roger Rabbit, avoid, use Infiltrator 2 style instead itraverse = $D94E ; Roger Rabbit, avoid, use Infiltrator 2 style instead
ldrhi = $56 ; constant ldrhi = $56 ; constant
namlo = $57 ; constant namlo = $57 ; constant
namhi = $58 ; constant namhi = $58 ; constant

3
src/prodos.impl.lc2.a
View File

@ -223,6 +223,8 @@ resetval=$f0
stx blkofflo stx blkofflo
stx blkoffhi stx blkoffhi
stx reqcmd stx reqcmd
ldy sizelo
beq @testzero
@seekloop @seekloop
jsr @reset jsr @reset
ldy sizelo ldy sizelo
@ -265,6 +267,7 @@ resetval=$f0
pla pla
sbc ldrhi sbc ldrhi
sta ldrhi sta ldrhi
@testzero
tya tya
sbc #0 sbc #0
sta sizelo sta sizelo