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

[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

7
SHELL/SHELL.ASM
View File

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

17
SHELL/SHELL_EXEC.ASM
View File

@ -154,7 +154,9 @@ A839D: ld bc,0*256 + Dss.Exec ;
;R10 ;R10
CALL Restore_Screen CALL Restore_Screen
;R10 ;R10
ret nc ; Ok ;[x] 25/10/23
JP NC,Ret_New_Line ; Ok
;
ld hl,(D8374) ld hl,(D8374)
cp DSS_Error.sys.FILE_NOT_FOUND cp DSS_Error.sys.FILE_NOT_FOUND
jr nz,A83DD jr nz,A83DD
@ -198,8 +200,19 @@ A83D7: ld bc,0*256 + Dss.Exec ;
;R10 ;R10
CALL Restore_Screen CALL Restore_Screen
;R10 ;R10
ret nc ;
;[x] 25/10/23
JP NC,Ret_New_Line ; Ok
;
A83DD: cp DSS_Error.sys.INVALID_HANDLE ; ª®¤ ®è¨¡ª¨ "­¥â ¤¥áªà¨¯â®à " A83DD: cp DSS_Error.sys.INVALID_HANDLE ; ª®¤ ®è¨¡ª¨ "­¥â ¤¥áªà¨¯â®à "
jp nc,print_err_message ; ¢ë¢®¤ á®®¡é¥­¨ï jp nc,print_err_message ; ¢ë¢®¤ á®®¡é¥­¨ï
xor a ; ¨­¤¥ªá "Bad command or file name" xor a ; ¨­¤¥ªá "Bad command or file name"
jp print_err_message 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