fat32: 90%

DSS/API/Create.asm

@@ -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

DSS/API/diskINF.asm

@@ -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 ¯®¤äã­ªæ¨ï á ¤®¯.¨­ä®©

DSS/FS/FAT/FAT_X.asm

@@ -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
 ;;;;;;;;;
 

DSS/build.txt

@@ -1 +1 @@
-973
+951

SHELL/Commands/DIR.ASM

@@ -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:
 ///////////////////////////////////////////////////////////////////////////////////////
 ;----------------------------------------------------------------------;
 ;�à®æ¥¤ãà  ã¬­®¦¥­¨ï (16*8bit)
-;�  ¢å®¤: DE*C
-;�  ¢ë室:A+HL-१ã«ìâ â
+;�  ¢å®¤: DE * C
+;�  ¢ë室:A:HL = १ã«ìâ â
 Mult16X8:
 	SUB	A
 	LD	L,A
@@ -798,8 +810,8 @@ Mlt16x8:
 ;----------------------------------------------------------------------;
 ;----------------------------------------------------------------------;
 ;�à®æ¥¤ãà  ã¬­®¦¥­¨ï (32bit)
-;�  ¢å®¤: HL+DE*BC
-;�  ¢ë室:HL+DE-१ã«ìâ â
+;�  ¢å®¤: HL:DE * BC
+;�  ¢ë室:HL:DE = १ã«ìâ â
 Mult32:
 	PUSH	IX
 	LD	IX,#0000

SHELL/build.txt

@@ -1 +1 @@
-315
+316