diff --git a/applecorn.po b/applecorn.po index aa71f0e..c8b9fc1 100644 Binary files a/applecorn.po and b/applecorn.po differ diff --git a/auxmem.hostfs.s b/auxmem.hostfs.s index 82647e1..5f77c50 100644 --- a/auxmem.hostfs.s +++ b/auxmem.hostfs.s @@ -758,20 +758,24 @@ FREERET >>> ENTAUX * Disk size is two-byte 512-byte block count * Maximum disk size is $FFFF blocks = 1FFFF00 bytes = 33554176 bytes = 32M-512 :NOERR SEC - LDA AUXBLK+2 ; LSB of total blocks - SBC AUXBLK+0 ; LSB of blocks used + >>> RDMAIN + LDA BLKBUF+2 ; LSB of total blocks + SBC BLKBUF+0 ; LSB of blocks used TAX ; X=b0-b7 of blocks free - LDA AUXBLK+3 ; MSB of total blocks - SBC AUXBLK+1 ; MSB of blocks used + LDA BLKBUF+3 ; MSB of total blocks + SBC BLKBUF+1 ; MSB of blocks used TAY ; Y=b8-b15 of blocks free + >>> RDAUX LDA #$00 ; A=b16-b23 of blocks free JSR :FREEDEC ; Print 'AAYYXX blocks aaayyyxxx bytes ' LDX #<:FREE LDY #>:FREE JSR OUTSTR ; Print 'free' - LDX AUXBLK+0 ; X=b0-b7 of blocks used - LDY AUXBLK+1 ; Y=b8-b15 of blocks used + >>> RDMAIN + LDX BLKBUF+0 ; X=b0-b7 of blocks used + LDY BLKBUF+1 ; Y=b8-b15 of blocks used + >>> RDAUX LDA #$00 ; A=b16-b23 of blocks used JSR :FREEDEC ; Print 'AAYYXX blocks aaayyyxxx bytes ' LDX #<:USED diff --git a/auxmem.misc.s b/auxmem.misc.s index 1ca2788..799693b 100644 --- a/auxmem.misc.s +++ b/auxmem.misc.s @@ -535,8 +535,5 @@ MOSEND DW IRQBRKHDLR ; FFFE IRQVEC MOSVEND -* Buffer for one 512 byte disk block in aux mem -AUXBLK -; ASC '**ENDOFCODE**' -; DS $200-13 +* ASC '**ENDOFCODE**' diff --git a/mainmem.svc.s b/mainmem.svc.s index 213a3b7..fc6e7ed 100644 --- a/mainmem.svc.s +++ b/mainmem.svc.s @@ -1114,17 +1114,14 @@ DRVINFO >>> ENTMAIN LDA GINFOPL+7 CMP #$0F BNE :EXIT1 ; Not a drive, exit with 'Bad drive' - - >>> ALTZP ; Alt ZP & Alt LC on LDA GINFOPL+8 ; Blocks used LSB - STA AUXBLK+0 + STA BLKBUF+0 LDA GINFOPL+9 ; Blocks used MSB - STA AUXBLK+1 + STA BLKBUF+1 LDA GINFOPL+5 ; Total blocks LSB - STA AUXBLK+2 + STA BLKBUF+2 LDA GINFOPL+6 ; Total blocks MSB - STA AUXBLK+3 - >>> MAINZP ; ALt ZP off, ROM back in + STA BLKBUF+3 LDA #$00 ; $00=Ok :EXIT CMP #$46