Tolik-Trek/Estex-DSS
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/Estex-DSS.git synced 2026-06-15 17:31:47 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Tolik 2025-05-26 00:46:35 +10:00
parent e01ebd75bd
commit 7befdcafc1
4 changed files with 29 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
DSS/API/Find.asm
View File

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

4
DSS/FS/FAT.asm
View File

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

25
DSS/Procedures.asm
View File

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

2
DSS/build.txt
View File

@ -1 +1 @@
49 51