-bug: Опять Савелий нашел. Опять баг с меткой тома))

-fix: Теперь поиск можно осуществлять для файла с атрибутом 0
This commit is contained in:
Tolik 2025-05-05 05:39:34 +10:00
parent cd4271f994
commit 1fcfce3619
4 changed files with 14 additions and 6 deletions

View File

@ -242,11 +242,11 @@ FAT_STRING: DB 'FAT12'
; DE - ¡ãä¥à
GET_LABEL: PUSH DE
LD HL,.LABEL_MASK ; "\*.*" ¨¬ï ¬¥âª¨
LD A,FAT_ATTR.VOLUME_ID ;  âਡãâ ¬¥âª¨ ⮬ 
LD A,FAT_ATTR.ItIsVolID ;  âਡãâ ¬¥âª¨ ⮬ 
LD B,high Dss.F_First.FATname
CALL F_FIRST
POP DE
LD HL,CORE_BUFFERS.FS_Buffer.BPB_LABEL
.from_BPB: LD HL,CORE_BUFFERS.FS_Buffer.BPB_LABEL
RET C
; [ ] 07/03/2025 ª®áâë«ì ¤«ï  âਡãâ  0. <20> áâ®ï« ‘ ¢¥«¨©))
LD HL,BUFFER_FIND.REC_Attr
@ -254,7 +254,7 @@ GET_LABEL: PUSH DE
LD A,(HL)
OR A
SCF
RET Z
JR Z,.from_BPB
;
LD HL,BUFFER_FIND.REC_Name
ADD HL,DE

View File

@ -165,10 +165,18 @@ SEARCH:
CP #E5 ;!HARDCODE #E5 - § ¯¨áì ¢ ¤¨à¥ªâ®à¨¨ ᢮¡®¤­ , â ª ª ª ä ©«/¤¨à¥ªâ®à¨ï ¡ë«¨ 㤠«¥­ë
JR Z,.next_record
LD A,(IX+FAT_DIRECTORY_RECORD.ATTRIBUT)
LD D,A
AND C
JR NZ,.next_record
;
.not_zero_attr: LD HL,MASKARE
LD A,C
INC A
JR NZ,.found_attr
; A=0
OR D
JR NZ,.next_record
;
.found_attr: LD HL,MASKARE
LD D,XH
LD E,XL
LD B,11

View File

@ -1 +1 @@
44
46

@ -1 +1 @@
Subproject commit 68e156a69e848e7b01656cdf67122022999d75ee
Subproject commit 89efc04ac63ae8b6a3b79c4a0e521fc967636a64