diff --git a/.Floppies/A2OSX.BOOT.po b/.Floppies/A2OSX.BOOT.po index 5484a193..58d20242 100644 Binary files a/.Floppies/A2OSX.BOOT.po and b/.Floppies/A2OSX.BOOT.po differ diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index f5236965..86d76ef5 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/BIN/PAKME.S.txt b/BIN/PAKME.S.txt index 68094d58..5bcbb1e5 100644 --- a/BIN/PAKME.S.txt +++ b/BIN/PAKME.S.txt @@ -208,10 +208,7 @@ CS.RUN.LOOP ldy #S.PS.hStdIn jmp CS.RUN.LOOP -.8 jsr CS.RUN.SeekTable - bcs .9 - - jsr CS.RUN.WriteTable Write modifid Table +.8 jsr CS.RUN.RewriteTable Write modifid Table bcs .9 lda #0 @@ -311,7 +308,11 @@ CS.RUN.GetTable >LDA.G PAKME.HEADER+8 >SBC.G PAKME.HEADER+6 sta ZPDstTableOfs+1 - jsr CS.RUN.SeekTable + >PUSHBI SEEK.SET + >PUSHWZ + >PUSHW ZPDstTableOfs + lda hSrcFile + >SYSCALL fseek bcs .9 >LDA.G PAKME.HEADER+7 @@ -411,16 +412,16 @@ CS.RUN.Pak >LDYA ZPChunkLen >STYA ZPChunkPakedLen .9 rts *-------------------------------------- -CS.RUN.SeekTable +CS.RUN.RewriteTable >PUSHBI SEEK.SET >PUSHWZ >PUSHW ZPDstTableOfs - lda hSrcFile + lda hDstFile >SYSCALL fseek - rts + bcs CS.RUN.WriteTable.RTS *-------------------------------------- CS.RUN.WriteTable - lda ZPChunkCnt + >LDA.G PAKME.HEADER+7 asl tay lda #0 @@ -428,6 +429,7 @@ CS.RUN.WriteTable >PUSHEA.G PAKME.TABLE lda hDstFile >SYSCALL fwrite +CS.RUN.WriteTable.RTS rts *-------------------------------------- CS.RUN.WritePak lda hDstFile @@ -459,7 +461,7 @@ CS.RUN.UpdateTable clc adc #PAKME.TABLE tay - + pla clc adc ZPChunkNewOfs