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

-bug in _TST_PROC_2 - мог залезть не в ту папку перед запуском приложения с флагом CurrentDIr = 0

Browse Source
This commit is contained in:
Tolik 2025-02-26 05:31:35 +10:00
parent dd2a134ad3
commit 1fa6c70b51
4 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
DSS/API/Execute.ASM
View File

@ -423,6 +423,7 @@ _TST_PROC_2: LD SP,(CORE_BUFFERS.EXEBUFF.SP_REG)
OR A OR A
JR NZ,.set_path JR NZ,.set_path
CALL DIR_PATH_CHANGE.FullCurrent CALL DIR_PATH_CHANGE.FullCurrent
LD HL,CORE_BUFFERS.CurrentPath
.set_path: CALL CHDIR_FN .set_path: CALL CHDIR_FN
POP IX POP IX
; ;

2
DSS/DSS-MAIN.ASM
View File

@ -514,6 +514,8 @@ CLEAR_ZONE.size EQU _sBuffers
EXPORT CORE_BUFFERS.BUFFER EXPORT CORE_BUFFERS.BUFFER
EXPORT CORE_BUFFERS.SECTOR_BUFFER EXPORT CORE_BUFFERS.SECTOR_BUFFER
EXPORT CORE_BUFFERS.MemoryTable EXPORT CORE_BUFFERS.MemoryTable
EXPORT CORE_BUFFERS.CurrentDirectory
EXPORT CORE_BUFFERS.WorkDirectory
/* /*
;R11 \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ ;R11 \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
FM_BUF _sFM=$ FM_BUF _sFM=$

2
DSS/build.txt
View File

@ -1 +1 @@
16 17

2
SHELL/build.txt
View File

@ -1 +1 @@
456 457