fix seek(0) and update demos for low-cost seek

This commit is contained in:
Peter Ferrie 2021-11-15 10:23:44 -08:00
parent 67df3e36f0
commit 13d65a0b67
61 changed files with 14 additions and 5 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -11,7 +11,7 @@
; ...unused... ; ...unused...
; E000..E3FF - HGR font data ; E000..E3FF - HGR font data
; ...unused... ; ...unused...
; E8F2..FFEE - main program code ; E8CA..FFEE - main program code
; FFEF..FFF9 - API functions and global constants available for main program ; FFEF..FFF9 - API functions and global constants available for main program
; code, prelaunchers, transition effects, &c. ; code, prelaunchers, transition effects, &c.
; (LoadFileDirect, Wait/UnwaitForVBL, MockingboardStuff, MachineStatus) ; (LoadFileDirect, Wait/UnwaitForVBL, MockingboardStuff, MachineStatus)
@ -20,9 +20,9 @@
; LC RAM BANK 2 ; LC RAM BANK 2
; D000..D5FF - ProRWTS data ; D000..D5FF - ProRWTS data
; D600..D8B4 - ProRWTS code ; D600..D8B4 - ProRWTS code
; D8C5..DC86 - ProRWTS glue code ; D8C5..DC94 - ProRWTS glue code
; DC87..DC8C - backup of stack (during gameplay and self-running demos) ; DC95..DC9A - backup of stack (during gameplay and self-running demos)
; DC8D..DC92 - okvs cache (attract state saved across self-running demo) ; DC9B..DCA0 - okvs cache (attract state saved across self-running demo)
; ...unused... ; ...unused...
; DFB4..DFFF - (de)acceleration function ; DFB4..DFFF - (de)acceleration function
; ;
@ -202,7 +202,7 @@ iCurBlockLo = $D601 ; constant
iCurBlockHi = $D603 ; constant iCurBlockHi = $D603 ; constant
launchpatch = $D853 ; glue.launch.a launchpatch = $D853 ; glue.launch.a
iAddToPath = $FEA5 ; Roger Rabbit, avoid, use Infiltrator 2 style instead iAddToPath = $FEA5 ; Roger Rabbit, avoid, use Infiltrator 2 style instead
itraverse = $DB31 ; Roger Rabbit, avoid, use Infiltrator 2 style instead itraverse = $DB3F ; Roger Rabbit, avoid, use Infiltrator 2 style instead
ldrlo = $55 ; constant ldrlo = $55 ; constant
ldrhi = $56 ; constant ldrhi = $56 ; constant
namlo = $57 ; constant namlo = $57 ; constant

View File

@ -218,6 +218,15 @@ ProDOS_enter
resetval=$f0 resetval=$f0
@imp_seek @imp_seek
jsr @set_rdwrbuff jsr @set_rdwrbuff
lda sizelo
ora ldrlo
ora ldrhi
bne @not_zero
sta treeidx
sta blkidx
beq @link_jmpzp
@not_zero
lda sizelo lda sizelo
lsr lsr
pha pha