swap in ProDOS before creating RAM file

2024-07-28 05:28:57 +00:00 · 2018-08-09 11:12:17 -07:00 · 2018-08-09 11:12:17 -07:00 · e3d4194e47
commit e3d4194e47
parent 202ee089ca
1 changed files with 9 additions and 1 deletions
--- a/src/mli.a
+++ b/src/mli.a
@ -501,6 +501,7 @@ CreateRAMFile

         ;no, create a new one

+         jsr   SwapProDOS
         lda   OnlineReturn
         tay
         clc
@ -546,7 +547,7 @@ CreateRAMFile
         php
         jsr   SaveGlobal
         plp
-         bcc   .done
+         bcc   .restore

         lda   gRAMDiskRef
         jsr   CloseFile
@ -561,6 +562,13 @@ CreateRAMFile
         ldx   #FALSE
         stx   gUsingRAMDisk

+.restore
+         php
+         pha
+         jsr   SwapProDOS
+         pla
+         plp
+
 .done
         rts