mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 17:31:47 +03:00
fat32: 90%
This commit is contained in:
parent
6330028b93
commit
bb5748091c
@ -54,20 +54,22 @@ CREATE: ;!TEST Current Dir ;[x] 15/10/23
|
||||
;
|
||||
;
|
||||
;no_file_found
|
||||
.DO: LD HL,MASKARE
|
||||
.DO: ; _sFAT_DIRECTORY_RECORD.NAME + .EXT
|
||||
LD HL,MASKARE
|
||||
LD DE,HANDBUF
|
||||
LD BC,11
|
||||
LDIR
|
||||
EX DE,HL
|
||||
.TMP+1: LD A,0
|
||||
; _sFAT_DIRECTORY_RECORD.ATTRIBUT
|
||||
LD (HL),A
|
||||
INC HL
|
||||
LD BC,#0A00 ;!HARDCODE
|
||||
;
|
||||
; .RESERVED_NT .. .FIRST_CLUSTER_H
|
||||
.loop1: LD (HL),C
|
||||
INC HL
|
||||
DJNZ .loop1
|
||||
;AaRR
|
||||
; .TIME .. .DATE
|
||||
CALL WRITE_DATE_TIME_TO_DIRECTORY_RECORD
|
||||
;
|
||||
LD BC,#0600
|
||||
|
||||
@ -156,6 +156,8 @@ DISKINF: LD C,B
|
||||
EXX
|
||||
LD H,A
|
||||
LD L,A
|
||||
LD B,A
|
||||
LD C,A
|
||||
EXX
|
||||
LD B,A
|
||||
LD C,A
|
||||
@ -181,6 +183,12 @@ DISKINF: LD C,B
|
||||
INC BC
|
||||
EXX
|
||||
.skip: INC HL
|
||||
LD A,L
|
||||
OR H
|
||||
JR NZ,.loop_free_space
|
||||
EXX
|
||||
INC HL
|
||||
EXX
|
||||
JR .loop_free_space
|
||||
;
|
||||
; [ ] 22/11/23 ¯®¤äãªæ¨ï á ¤®¯.¨ä®©
|
||||
|
||||
@ -241,6 +241,7 @@ READ_FROM_FAT: CALL CHECK_CLUSTER_IS_SMALLER
|
||||
LD A,B
|
||||
OUT (SLOT3),A
|
||||
POP HL
|
||||
LD A,0
|
||||
RET
|
||||
|
||||
;
|
||||
@ -339,17 +340,19 @@ WRITE_TO_FAT: LD DE,(CORE_BUFFERS.FatBuffer.END_CHAIN_CLUSTER_L) ;
|
||||
CALL GET_FAT32_CELL
|
||||
EXX
|
||||
POP HL ; áâ à襥 á«®¢® ®¬¥à ª« áâ¥à ¢ ª®â®àë© § ¯¨á âì
|
||||
POP DE
|
||||
PUSH DE ; áâ à訩 ®¬¥à ª« áâ¥à ª®â®àë© ¢¯¨á âì
|
||||
EXX
|
||||
POP DE ; áâ à訩 ®¬¥à ª« áâ¥à ª®â®àë© ¢¯¨á âì
|
||||
POP BC ; ¬« ¤è¨© ®¬¥à ª« áâ¥à ª®â®àë© ¢¯¨á âì
|
||||
POP BC ; áâ à訩 ®¬¥à ª« áâ¥à ª®â®àë© ¢¯¨á âì
|
||||
POP DE ; ¬« ¤è¨© ®¬¥à ª« áâ¥à ª®â®àë© ¢¯¨á âì
|
||||
; á®åà. ¢ ª¥è¥ FAT- ®¬¥à ª« áâ¥à
|
||||
LD (HL),C
|
||||
INC HL
|
||||
LD (HL),B
|
||||
INC HL
|
||||
LD (HL),E
|
||||
INC HL
|
||||
LD (HL),D
|
||||
INC HL
|
||||
LD (HL),C
|
||||
INC HL
|
||||
LD (HL),B
|
||||
JR .exit
|
||||
;;;;;;;;;
|
||||
|
||||
|
||||
@ -1 +1 @@
|
||||
973
|
||||
951
|
||||
@ -531,15 +531,27 @@ read_disk_info:
|
||||
;PUSH DE ; ᢮¡®¤ëå ª« áâ¥à®¢
|
||||
PUSH BC ; à §¬¥à ᥪâ®à ¢ ¡ ©â å
|
||||
EX AF,AF'
|
||||
LD C,A ; A - à §¬¥à ª« áâ¥à ¢ ᥪâ®à å
|
||||
CALL Mult16X8
|
||||
; A:HL = DE*A
|
||||
; !TEST fat 32
|
||||
;LD C,A ; A - à §¬¥à ª« áâ¥à ¢ ᥪâ®à å
|
||||
;CALL Mult16X8
|
||||
; A:HL = DE*A
|
||||
LD B,0
|
||||
LD C,A
|
||||
EXX
|
||||
PUSH DE
|
||||
EXX
|
||||
POP HL
|
||||
; HL:DE * BC ᢮¡®¤ë¥_ª« áâ¥àë * à §¬¥à_ª« áâ¥à _¢_ᥪâ®à å
|
||||
CALL Mult32
|
||||
; HL:DE = ᢮¡®¤ë¥_ᥪâ®àë
|
||||
;
|
||||
EX DE,HL
|
||||
LD H,0
|
||||
LD L,A
|
||||
; EX DE,HL
|
||||
; LD H,0
|
||||
; LD L,A
|
||||
POP BC
|
||||
CALL Mult32
|
||||
; HL:DE = ᢮¡®¤®¥ ¬¥áâ® ;!FIXIT ®£à ¨ç¥® 4 £¨£ ¬¨
|
||||
;
|
||||
LD (free_space+2),HL
|
||||
EX DE,HL
|
||||
LD (free_space),HL
|
||||
@ -773,8 +785,8 @@ Size2Char:
|
||||
///////////////////////////////////////////////////////////////////////////////////////
|
||||
;----------------------------------------------------------------------;
|
||||
;<3B>à®æ¥¤ãà 㬮¦¥¨ï (16*8bit)
|
||||
;<3B> ¢å®¤: DE*C
|
||||
;<3B> ¢ë室:A+HL-१ã«ìâ â
|
||||
;<3B> ¢å®¤: DE * C
|
||||
;<3B> ¢ë室:A:HL = १ã«ìâ â
|
||||
Mult16X8:
|
||||
SUB A
|
||||
LD L,A
|
||||
@ -798,8 +810,8 @@ Mlt16x8:
|
||||
;----------------------------------------------------------------------;
|
||||
;----------------------------------------------------------------------;
|
||||
;<3B>à®æ¥¤ãà 㬮¦¥¨ï (32bit)
|
||||
;<3B> ¢å®¤: HL+DE*BC
|
||||
;<3B> ¢ë室:HL+DE-१ã«ìâ â
|
||||
;<3B> ¢å®¤: HL:DE * BC
|
||||
;<3B> ¢ë室:HL:DE = १ã«ìâ â
|
||||
Mult32:
|
||||
PUSH IX
|
||||
LD IX,#0000
|
||||
|
||||
@ -1 +1 @@
|
||||
315
|
||||
316
|
||||
@ -1 +1 @@
|
||||
Subproject commit e9bcf54a516df972207fc032925d2dfb74c39a89
|
||||
Subproject commit 17acd882094d59946a9cd430a03e736e36fea49b
|
||||
Loading…
Reference in New Issue
Block a user