support seek(0)

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

View File

@ -150,7 +150,7 @@ iCurBlockLo = $D401 ; constant
iCurBlockHi = $D403 ; constant
launchpatch = $D655 ; glue.launch.a
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
namlo = $57 ; constant
namhi = $58 ; constant

View File

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