diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 3b871b62..f4e6d8ee 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/ProDOS.FX/ProDOS.S.LDR.txt b/ProDOS.FX/ProDOS.S.LDR.txt index 8f86c573..b639d461 100644 --- a/ProDOS.FX/ProDOS.S.LDR.txt +++ b/ProDOS.FX/ProDOS.S.LDR.txt @@ -872,8 +872,7 @@ LDR.ScrInit80 sta CLRC3ROM lda /LOGO.PAKED sta ZPInBufPtr+1 - lda #$00 - sta ZPOutBufPtr + stz ZPOutBufPtr lda #$A0 sta ZPOutBufPtr+1 @@ -890,8 +889,7 @@ LDR.ScrInit80 sta CLRC3ROM .10 sta CLRTEXT - lda #$00 - sta ZPPtr1 + stz ZPPtr1 lda #$A0 sta ZPPtr1+1 diff --git a/ProDOS.FX/ProDOS.S.XDOS.C.txt b/ProDOS.FX/ProDOS.S.XDOS.C.txt index f5bf06d4..6adf77eb 100644 --- a/ProDOS.FX/ProDOS.S.XDOS.C.txt +++ b/ProDOS.FX/ProDOS.S.XDOS.C.txt @@ -891,7 +891,7 @@ L4101 sta bloknml+1 of file and current usage count. sta bloknml and this is the low one. ldy fcbptr lda cntent this was set up by 'tstopen'. - sta FCBs,y claim fcb for this file. + sta FCBs,y claim fcb for this file. jsr alcbuffr go allocate buffer in memory tables. bcs L4147 if errors. @@ -901,6 +901,7 @@ L4101 sta bloknml+1 of file and current usage count. lda FCBs+FCB.STYPE,y file must be positioned at beginning. cmp #$04 is it a tree file ? bcs L415E no, assume a directory. + lda #$FF fool the position routine into giving sta FCBs+FCB.MARK+2,y a valid position with preloaded data, diff --git a/ProDOS.FX/ProDOS.S.XDOS.E.txt b/ProDOS.FX/ProDOS.S.XDOS.E.txt index 31221a68..6c374f6b 100644 --- a/ProDOS.FX/ProDOS.S.XDOS.E.txt +++ b/ProDOS.FX/ProDOS.S.XDOS.E.txt @@ -44,7 +44,7 @@ close2 ldy fcbptr jsr relbuffr bcs L46B6 - lda #$00 +* lda #$00 ldx fcbptr stz FCBs,x free fcb too