mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-11-14 11:30:52 +03:00
ещё несколько процедур
This commit is contained in:
1 parent
1f66e8af24
commit
bd5919fdc4
14 files changed
+620
-799
No files matched your search
+1
-1
@@ -43,7 +43,7 @@ DEL_FN: ;!TEST
|
||||
PUSH DE ; ®¬¥à á«¥¤. ª« áâ¥à
|
||||
PUSH AF
|
||||
LD DE,#0000 ; ®¬¥à ª« áâ¥à
|
||||
CALL WRITE_TO_FAT ; § ¯¨á âì ¢ ª¥è FAT- ®¬¥à ª« áâ¥à
|
||||
CALL WRITE_TO_FAT.Custom ; § ¯¨á âì ¢ ª¥è FAT- ®¬¥à ª« áâ¥à
|
||||
POP AF
|
||||
POP DE
|
||||
JP NC,.loop
|
||||
|
||||
+1
-2
@@ -48,7 +48,6 @@ MKDIR: ;!TEST Current Dir ;[x] 15/10/23
|
||||
RET C
|
||||
PUSH HL
|
||||
; [ ] fat32
|
||||
LD DE,(FatBuffer.ENDCLUS_LOW) ; ®¬¥à ª« áâ¥à
|
||||
CALL WRITE_TO_FAT ; § ¯¨á âì ¢ ª¥è FAT- ®¬¥à ª« áâ¥à
|
||||
CALL WRITE_FAT_TABLE ; ¯®¤ª«. ¡ ªã ª¥è FAT ¨ § ¯¨á âì ¥£® ¤¨áª
|
||||
LD HL,MASKARE
|
||||
@@ -142,7 +141,7 @@ MKDIR: ;!TEST Current Dir ;[x] 15/10/23
|
||||
LDIR
|
||||
;
|
||||
POP HL
|
||||
CALL NSECTOR
|
||||
CALL CLUSTER_TO_SECTOR
|
||||
LD A,(CORE_BUFFERS.BootSector.SectorsPerCluster) ; ᥪâ®à®¢ ª« áâ¥à
|
||||
.MKD12: PUSH AF
|
||||
PUSH HL ; áâ. à §àï¤
|
||||
|
||||
+1
-1
@@ -41,7 +41,7 @@ RMDIR: ;!TEST Current Dir ;[x] 15/10/23
|
||||
LD HL,(HANDBUF+_sFAT_DIRECTORY_RECORD.FIRST_CLUSTER_L)
|
||||
PUSH IX
|
||||
.RMD17: PUSH HL
|
||||
CALL NSECTOR
|
||||
CALL CLUSTER_TO_SECTOR
|
||||
LD A,(CORE_BUFFERS.BootSector.SectorsPerCluster)
|
||||
; ç¨ ¥¬ ¢ëç¨âë¢ âì ᮤ¥à¦¨¬®¥ ª â «®£ ¯®á¥ªâ®à®
|
||||
.read_dir_loop:
|
||||
|
||||
+1
-1
@@ -18,7 +18,7 @@ WRITE.RD_ONLY:
|
||||
WRITE: ;!TEST ;!TODO 5/12/23 ; [ ] ¨§¡ëâ®çë¥ ¢ë§®¢ë WRITE_FAT_TABLE
|
||||
CALL .Start
|
||||
PUSH AF
|
||||
LD A,(FatCache.Update)
|
||||
LD A,(FatBuffer.CacheUpdated)
|
||||
OR A
|
||||
CALL NZ,WRITE_FAT_TABLE ; ¯®¤ª«. ¡ ªã ª¥è FAT ¨ § ¯¨á âì ¥£® ¤¨áª
|
||||
POP AF
|
||||
|
||||
+1
-1
@@ -120,7 +120,7 @@ DISKINF:; [ ] 22/11/23
|
||||
;.FRESP2:
|
||||
LD D,B
|
||||
LD E,C
|
||||
LD HL,(FAT_Max_Cluster_L)
|
||||
LD HL,(FatBuffer.MaxClusterLow)
|
||||
DEC HL
|
||||
LD BC,(CORE_BUFFERS.BootSector.BytesPerSector)
|
||||
LD A,(CORE_BUFFERS.BootSector.SectorsPerCluster)
|
||||
|
||||
Reference in new issue
Block a user