исправлен баг беготнёй по русским папкам

DSS/API/Find.asm

@@ -17,9 +17,9 @@ F_FIRST_FN:	CALL	F_FIRST.INIT_VARS
 		PUSH	HL
 		;!TEST Current Dir ;[x] 15/10/23
 		 CALL	DIR_PATH_CHECK
+		 POP	HL
 		 RET	C
 		;
-		POP	HL
 		JR	F_FIRST.begin
 		;
 F_FIRST:	CALL	.INIT_VARS

DSS/FS/FAT.asm

@@ -443,8 +443,8 @@ FINDDIR:
 	RET	Z
 	LD	(HL),A
 	INC	HL
-	LD	(HL),0
-	;INC	HL
+	XOR	A	; á¡à®á CF § ®¤­®
+	LD	(HL),A
 	RET
 ;----------------------------------------------------------------------;
 

DSS/Procedures.asm

@@ -209,24 +209,25 @@ CalcDayOfWeek:	LD	A,D
 UPPER:		CP	'a'
 		RET	C
 		CP	'z' + 1
-	JR	NC,.MDUPPER
-	SUB	#20
-.NOUPPER:
+		JR	NC,.CheckRUS
+.Dec:		SUB	#20
 		RET
-.MDUPPER:
-	CP	' '		; àãááª ï ¡ãª¢   , ª®¤ #A0
-	JR	C,.NOUPPER
+		;
+.CheckRUS:	CP	' '		; àãááª ï ¡ãª¢   , ª®¤ #A0
+		RET	C
 		CP	'¯'		; àãááª ï ¡ãª¢  ¯, ª®¤ #B0
-	JR	NC,.BGUPPER
-	SUB	#20
-	RET 
-.BGUPPER:
-	CP	'à'		; àãááª ï ¡ãª¢  à, ª®¤ #E0
-	JR	C,.NOUPPER
+		JR	C,.Dec
+		; JR	NC,.BGUPPER
+		; SUB	#20
+		; RET
+		;
+.BGUPPER:	CP	'à'		; àãááª ï ¡ãª¢  à, ª®¤ #E0
+		RET	C
 		CP	'ð'		; àãááª ï ¡ãª¢  ð, ª®¤ #F0
 		JR	NC,.HGUPPER
 		SUB	#50
 		RET
+		;
 .HGUPPER:	CP	'ñ'	; àãááª ï ¡ãª¢  ñ, ª®¤ #F1
 		RET	NZ
 		DEC	A

DSS/build.txt

@@ -1 +1 @@
-49
+51