From e216ba12e966fd2105b7f993957d3365b7095030 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Thu, 27 Jul 2017 14:56:02 -0700
Subject: [PATCH 1/2] zero track number before writing from RAM

---
 src/mli.a      | 3 +--
 src/passport.a | 3 +--
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/mli.a b/src/mli.a
index 82956dc..e6c4f47 100755
--- a/src/mli.a
+++ b/src/mli.a
@@ -67,8 +67,6 @@ WriteTrackMLI
                           ; page 6-19
          sta   mliparam+1
          lda   SLOT
-         sec
-         sbc   #$30
          asl
          asl
          asl
@@ -685,6 +683,7 @@ WriteRAMToDisk
          sta   mliparam+2
          sta   mliparam+3
          sta   mliparam+4
+         sta   gTrack
          jsr   SwapProDOS
          lda   gRAMDiskRef
          jsr   SetMark
diff --git a/src/passport.a b/src/passport.a
index d138b92..69b1bd8 100755
--- a/src/passport.a
+++ b/src/passport.a
@@ -458,8 +458,7 @@ nextsector
          bne   .passprint ; always branches
 .passcrack
          lda   gUsingRAMDisk
-         cmp   #FALSE
-         beq   .skipram
+         bne   .skipram
          lda   #s_writing
          jsr   PrintByID
          jsr   WriteRAMToDisk

From 469cb2c380c22314e2c4ba46d656a74c0bf8ff95 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Mon, 7 Aug 2017 16:16:33 -0700
Subject: [PATCH 2/2] support RAM disk on GS

---
 src/slots.a      | 31 +++++++++++++++----------------
 src/strings/en.a |  2 +-
 2 files changed, 16 insertions(+), 17 deletions(-)

diff --git a/src/slots.a b/src/slots.a
index 20a6a5e..ec2bc90 100755
--- a/src/slots.a
+++ b/src/slots.a
@@ -93,7 +93,6 @@ ScanForRAMDisk
          lsr
          lsr
          lsr
-         sta   .driverbase+1
          lsr
          tay
          pla
@@ -112,23 +111,21 @@ ScanForRAMDisk
          cmp   #$0F
          bne   -
 
-.driverbase
-         ldx   #$d1
-         lda   $BF11,x
-         sta   .drivercode+2
-         and   #$f0
-         cmp   #$c0
-         bne   +
-
-         ;RAMFactor detection
-         ;looks like a SmartPort device
-
-.drivercode
-         lda   $d100
-         cmp   #$c9
-         bne   -
+         ;check for RAM[x] by name
 
+         ldy   OnlineReturn
+         cpy   #4
+         beq   +
+         cpy   #6
+         bcs   -
+         dey
 +
+--       lda   SlashRAM-1,y
+         cmp   VolumeName-1,y
+         bne   -
+         dey
+         bne   --
+
          ;check free space
          ;need at least $118 blocks
 
@@ -147,4 +144,6 @@ ScanForRAMDisk
          sta   gUsingRAMDisk
 .done
          rts
+
+SlashRAM !byte $2F, $52, $41, $4D
 }
diff --git a/src/strings/en.a b/src/strings/en.a
index 1e3f21b..396360d 100755
--- a/src/strings/en.a
+++ b/src/strings/en.a
@@ -222,7 +222,7 @@ StringTable
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2017-08-03",$00
+         !text "Passport by 4am               2017-08-07",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "