diff --git a/src/dos_m65/assets/dos_parts_dir.s b/src/dos_m65/assets/dos_parts_dir.s index a81e9e89..309d3703 100644 --- a/src/dos_m65/assets/dos_parts_dir.s +++ b/src/dos_m65/assets/dos_parts_dir.s @@ -40,6 +40,7 @@ dir_types: !pet "prg", $00 ; PRG !pet "usr", $00 ; USR !pet "rel", $00 ; REL + !pet "cbm", $00 ; CBM-style partition !pet "dir", $00 ; directory ; File types below are not mandatory diff --git a/src/dos_m65/dev_sdcard/fs_hvsr_util_nextdirentry.s b/src/dos_m65/dev_sdcard/fs_hvsr_util_nextdirentry.s index 5db911a3..4aeef26c 100644 --- a/src/dos_m65/dev_sdcard/fs_hvsr_util_nextdirentry.s +++ b/src/dos_m65/dev_sdcard/fs_hvsr_util_nextdirentry.s @@ -114,7 +114,7 @@ fs_hvsr_util_nextdirentry: ; Set the type to directory - lda #$05 + lda #$06 bra @detect_attributes @entity_file: @@ -169,7 +169,7 @@ fs_hvsr_util_nextdirentry: @lpext_found: - cpy #$10 + cpy #$14 +beq fs_hvsr_util_nextdirentry ; file extension 'DIR' does not mean this is a directory tya @@ -179,7 +179,7 @@ fs_hvsr_util_nextdirentry: ror inc - cmp #$06 ; mark some file types (not SEQ/PRG/USR/REL/DIR) as read-only + cmp #$07 ; mark some file types (not SEQ/PRG/USR/REL/CBM/DIR) as read-only bcc @detect_attributes ora #$40 diff --git a/src/dos_m65/utils/util_dir_filter.s b/src/dos_m65/utils/util_dir_filter.s index 1c0adcdd..07751dee 100644 --- a/src/dos_m65/utils/util_dir_filter.s +++ b/src/dos_m65/utils/util_dir_filter.s @@ -85,7 +85,7 @@ util_dir_filter: @require_dir: - lda #$05 + lda #$06 eor PAR_FTYPE and #%00111111