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

[x] 25/10/23

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2023-10-25 02:50:02 +10:00
parent 1aa15566bf
commit 8077291336
5 changed files with 25 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
DSS/build.txt
View File

@ -1 +1 @@
499
503

13
SHELL/SHELL.ASM
View File

@ -334,13 +334,12 @@ restore_path:
; ­  ­®¢ãî áâபã ;!FIXIT ᤥ« âì ç¥à¥§ .PChars
newline:ld a,_cc.cr
ld c,Dss.PutChar
RST ToDSS
ld a,_cc.lf
ld c,Dss.PutChar
RST ToDSS
ret
newline: ld a,_cc.cr
ld c,Dss.PutChar
rst ToDSS
ld a,_cc.lf
ld c,Dss.PutChar
jp ToDSS
; ‘à ¢­¥­¨¥ áâப

19
SHELL/SHELL_EXEC.ASM
View File

@ -154,7 +154,9 @@ A839D: ld bc,0*256 + Dss.Exec ;
;R10
CALL Restore_Screen
;R10
ret nc ; Ok
;[x] 25/10/23
JP NC,Ret_New_Line ; Ok
;
ld hl,(D8374)
cp DSS_Error.sys.FILE_NOT_FOUND
jr nz,A83DD
@ -196,10 +198,21 @@ A83B7: ld e,b
A83D7: ld bc,0*256 + Dss.Exec ; § £à㧨âì ¯à®£à ¬¬ã, ¢ë¯®«­¨âì ä ©«
RST ToDSS
;R10
CALL Restore_Screen
CALL Restore_Screen
;R10
ret nc
;
;[x] 25/10/23
JP NC,Ret_New_Line ; Ok
;
A83DD: cp DSS_Error.sys.INVALID_HANDLE ; ª®¤ ®è¨¡ª¨ "­¥â ¤¥áªà¨¯â®à "
jp nc,print_err_message ; ¢ë¢®¤ á®®¡é¥­¨ï
xor a ; ¨­¤¥ªá "Bad command or file name"
jp print_err_message
Ret_New_Line:
LD C,Dss.Cursor
RST ToDSS
XOR A
OR E
RET Z
jp newline

2
SHELL/build.txt
View File

@ -1 +1 @@
85
88

2
Shared_Includes

@ -1 +1 @@
Subproject commit 9319bb78d96af2573dd54d8d2f422f2f134b5653
Subproject commit 374477690571809e7318bd4279bc7da120b6c492