more work towards loading from internal drive

src/dos_m65/filesystem_cbm/fs_cbm_read_file.s

@@ -6,7 +6,7 @@
 
 fs_cbm_read_file_open:
 
-	; Get the first sector of the directory
+	; Get the first sector of the directory  XXX deduplicate code, create a separate open directory routine
 
 	lda #40
 	sta PAR_TRACK
@@ -15,6 +15,24 @@ fs_cbm_read_file_open:
 
 	jsr lowlevel_readsector         ; XXX handle read errors
 
+	; Set variables to point to the 1st directory entry in the 2nd sector of the buffer
+
+	lda #$08
+	sta FD_DIRENT
+
+	; Make sure the 1st sector in buffer points to 2nd one
+
+	lda #40
+	sta SHARED_BUF_1+0
+	lda #03
+	sta SHARED_BUF_1+1
+
+	; XXX deduplicate code above with fs_cbm_read_dir_open
+
+	; Try to find the file
+
+	jsr fs_cbm_nextdirentry
+	+bcs dos_EXIT