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

update to CURDISK_FN

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2023-12-13 05:11:56 +10:00
parent 76825603e1
commit a4fd704a5c
3 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
DSS/API/curDisk.asm
View File

@ -3,14 +3,20 @@
;
; ¢å®¤: ­¥â
; ¢ë室: A - ­®¬¥à ¤¨áª  (0=A,1=B,..)
; C - ­®¬¥à ¯®á«¥¤­¥£® ¤¨áª  ¢ á¨á⥬¥
;/////////////////////////////////////////////////////////////////////
CURDISK_FN:
LD A,(LDRIVE)
LD C,A
LD A,(CurrentPath)
SUB 'A'
RET NC
LD A,DSS_Error.sys.INVALID_DRIVE
RET
CURDISK: LD A,(FatBuffer.DRIVE)
CURDISK:
LD A,(LDRIVE)
LD C,A
LD A,(FatBuffer.DRIVE)
AND A
RET
;

2
DSS/build.txt
View File

@ -1 +1 @@
789
790

2
SHELL/build.txt
View File

@ -1 +1 @@
285
286