Subversion Repositories pentevo

Rev

Rev 975 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 975 Rev 1186
Line 1... Line 1...
1
 
1
 
2
; LAST UPDATE: 06.11.2021 savelij
2
; LAST UPDATE: 11.02.2025 savelij
3
 
3
 
-
 
4
;FATVAR
4
 SETVAR ERORDRV,                WORD    ;EQU BUF_TEKVOL                 ;2 ВОЗВРАТ С ОШИБКОЙ В A
5
; _INIT_VAR BUF_TEKVOL
5
 SETVAR FATType,                BYTE    ; ⨯ FAT: 0-12/1-16/2-32
6
 _SETVAR .FATType,              BYTE    ; ⨯ FAT: 0-12/1-16/2-32
6
 SETVAR NumFATs,                BYTE    ; количество FAT таблиц
7
 _SETVAR .NumFATs,              BYTE    ; количество FAT таблиц
7
 SETVAR SecPerClus,             BYTE    ; количество секторов в кластере
8
 _SETVAR .SecPerClus,           BYTE    ; количество секторов в кластере
8
 SETVAR RootDIRCluster,         DWORD   ; номер кластера корневой DIR
9
 _SETVAR .RootDIRCluster,       DWORD   ; номер кластера корневой DIR
9
 SETVAR NumSecRootDir,          DWORD   ; номер сектора корневой директории
10
 _SETVAR .NumSecRootDir,        DWORD   ; номер сектора корневой директории
10
 SETVAR ROOTZAP,                WORD    ;EQU ROOTCLS+4                  ;2 КОЛ-ВО ЗАПИСЕЙ В ROOT ДИРЕКТОРИИ
11
 _SETVAR .ROOTZAP,              WORD    ;EQU ROOTCLS+4                  ;2 КОЛ-ВО ЗАПИСЕЙ В ROOT ДИРЕКТОРИИ
11
 SETVAR FATSize,                DWORD   ; размер FAT таблицы в секторах
12
 _SETVAR .FATSize,              DWORD   ; размер FAT таблицы в секторах
12
 SETVAR StartSecVol,            DWORD   ; номер стартового сектора раздела
13
 _SETVAR .StartSecVol,          DWORD   ; номер стартового сектора раздела
13
 SETVAR FirstSecData,           DWORD   ; номер сектора начала области данных
14
 _SETVAR .FirstSecData,         DWORD   ; номер сектора начала области данных
14
 SETVAR NumsSectorsVol,         DWORD   ; количество секторов на разделе
15
 _SETVAR .NumsSectorsVol,       DWORD   ; количество секторов на разделе
15
 SETVAR NumsClustersVol,        DWORD   ; количество кластеров на разделе
16
 _SETVAR .NumsClustersVol,      DWORD   ; количество кластеров на разделе
16
 SETVAR NumSecFAT1,             DWORD   ; номер сектора первой FAT таблицы
17
 _SETVAR .NumSecFAT1,           DWORD   ; номер сектора первой FAT таблицы
17
 SETVAR NumSecFAT2,             DWORD   ; номер сектора второй FAT таблицы
18
 _SETVAR .NumSecFAT2,           DWORD   ; номер сектора второй FAT таблицы
18
 SETVAR NumSec2Buf,             DWORD   ; номер сектора загруженного в буфер
19
 _SETVAR .NumSec2Buf,           DWORD   ; номер сектора загруженного в буфер
19
 SETVAR CurrentDIRCluster,      DWORD   ; номер кластера текущей DIR
20
 _SETVAR .CurrentDIRCluster,    DWORD   ; номер кластера текущей DIR
20
 SETVAR TEK_ZAP,                WORD    ;EQU TEK_DIR+4                  ;2 ТЕКУЩАЯ ЗАПИСЬ В DIR
21
 _SETVAR .TEK_ZAP,              WORD    ;EQU TEK_DIR+4                  ;2 ТЕКУЩАЯ ЗАПИСЬ В DIR
21
 SETVAR SAVEZAP,                WORD    ;EQU TEK_ZAP+2                  ;2 СОХРАНЕННАЯ ТЕКУЩАЯ ПОЗИЦИЯ
22
 _SETVAR .SAVEZAP,              WORD    ;EQU TEK_ZAP+2                  ;2 СОХРАНЕННАЯ ТЕКУЩАЯ ПОЗИЦИЯ
22
 SETVAR TEK_LVL,                BYTE    ;EQU SAVEZAP+2                  ;1 ТЕКУЩИЙ УРОВЕНЬ КАТАЛОГА
-
 
23
 SETVAR TEK_LEV,                BYTE    ;EQU TEK_LVL+1                  ;1 ГЛУБИНА НАХОЖДЕНИЯ В ДИРЕКТОРИЯХ
23
 _SETVAR .CurrentNumLevDIR,     BYTE    ; глубина нахождения в директориях
24
 SETVAR KOLFIND,                WORD    ;EQU FREECLS+8                  ;2 КОЛИЧЕСТВО НАЙДЕННЫХ ПО МАСКЕ ФАЙЛОВ
24
 _SETVAR .KOLFIND,              WORD    ;EQU FREECLS+8                  ;2 КОЛИЧЕСТВО НАЙДЕННЫХ ПО МАСКЕ ФАЙЛОВ
25
 SETVAR AFILCLS,                DWORD   ;EQU KOLFIND+2                  ;4 НОМЕР ТЕКУЩЕГО КЛАСТЕРА
25
 _SETVAR .AFILCLS,              DWORD   ;EQU KOLFIND+2                  ;4 НОМЕР ТЕКУЩЕГО КЛАСТЕРА
26
 
26
 
27
 SETVAR NUM_FILE_SRC,           WORD    ;EQU AFILCLS+4                  ;2 НОМЕР ОПИСАТЕЛЯ ФАЙЛА (ОТКУДА)
27
 _SETVAR .NUM_FILE_SRC,         WORD    ;EQU AFILCLS+4                  ;2 НОМЕР ОПИСАТЕЛЯ ФАЙЛА (ОТКУДА)
28
 SETVAR FILE_SRC,               0x20    ;EQU NUM_FILE_SRC+2             ;20 ОПИСАТЕЛЬ ОТКРЫТОГО ФАЙЛА (ОТКУДА)
28
 _SETVAR .FILE_SRC,             0x20    ;EQU NUM_FILE_SRC+2             ;20 ОПИСАТЕЛЬ ОТКРЫТОГО ФАЙЛА (ОТКУДА)
29
 
-
 
30
CRC_VOL                 EQU ERORDRV+0XFE                ;2 CRC ПЕРЕМЕННЫХ РАЗДЕЛА
-
 
31
 
-
 
32
TEK_LEV_DIR             EQU CRC_VOL-0X50                ;50 БУФЕР ХРАНЕНИЯ ПОЗИЦИИ ПРИ ХОЖДЕНИИ ПО ДИРАМ
-