Merge pull request #58 from peterferrie/master

swap in ProDOS before creating RAM file
2024-09-30 21:54:50 +00:00 · 2018-08-09 15:34:40 -04:00 · 2018-08-09 15:34:40 -04:00 · fe8d073c99
commit fe8d073c99
parent fd62b7fbaf e3d4194e47
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