COPY: Preserve file modification time

Fixes #4
2024-01-01 19:35:14 -08:00 · 2024-01-01 19:35:14 -08:00 · 3360d44dd7
parent 4bdb0808a2
commit 3360d44dd7
1 changed files with 12 additions and 0 deletions
--- a/copy.cmd.s
+++ b/copy.cmd.s
@ -197,6 +197,18 @@ read:   lda     FN1REF


 finish: jsr     CloseFiles
+
+        ;; Apply FN1 info to FN2 to preserve modification date
+        ldx     #$D - 3
+:       lda     FN1INFO+3,x
+        sta     SSGINFO+3,x
+        dex
+        bpl     :-
+        lda     #$7
+        sta     SSGINFO
+        lda     #SET_FILE_INFO
+        jsr     GOSYSTEM
+
        clc
        rts