diff --git a/applecorn.po b/applecorn.po index 64767b5..410eb37 100644 Binary files a/applecorn.po and b/applecorn.po differ diff --git a/auxmem.hostfs.s b/auxmem.hostfs.s index bc08ce8..f3967c5 100644 --- a/auxmem.hostfs.s +++ b/auxmem.hostfs.s @@ -336,7 +336,6 @@ OSFILEM2 ASC ')' * On exit, A=preserved if unimplemented * A=modified if implemented * X,Y=any return values -* FSCHND CMP #$00 BEQ FSOPT ; A=0 - *OPT CMP #$01 @@ -354,6 +353,13 @@ FSCHND CMP #$00 CMP #$0C BEQ FSCREN ; A=12 - *RENAME + PHA + LDA #OSFSCM + JSR PRSTR + PLA + RTS + FSCRUN STX OSFILECB ; Pointer to filename STY OSFILECB+1 LDA #$FF ; OSFILE load flag @@ -367,9 +373,6 @@ FSCRUN STX OSFILECB ; Pointer to filename :CALL JMP (OSFILECB+6) ; Jump to EXEC addr RTS FSCREN - LDA #OSFSCM - JSR PRSTR RTS OSFSCM ASC 'OSFSC.' DB $00