diff --git a/DSS/API/Find.asm b/DSS/API/Find.asm index 6b06b7e..3aeef59 100644 --- a/DSS/API/Find.asm +++ b/DSS/API/Find.asm @@ -35,14 +35,15 @@ F_FIRST: CALL .INIT_VARS RET C CALL MASK RET C - LD A,(.TMP) + LD A,(.SEARCH_ATTRIBUT) CALL SEARCH.Custom RET C LD HL,MASKARE .DTABUF+1: LD DE,0 LD BC,FAT_DIRECTORY_RECORD.ATTRIBUT ; копируем .NAME и .EXT LDIR -.TMP+1: LD A,0 +.SEARCH_ATTRIBUT+1: + LD A,0 ; DSS_FCB_MAIN.SEARCH_ATTRIBUT LD (DE),A .FIND_S: INC DE ;!TODO лучше тут использовать как в record index для перебора каталога > #4000 bytes @@ -73,7 +74,7 @@ F_FIRST: CALL .INIT_VARS CALL GetName JR .exit ; -.INIT_VARS: LD (.TMP),A +.INIT_VARS: LD (.SEARCH_ATTRIBUT),A LD (.DTABUF),DE LD A,B LD (.FNDMODE),A