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

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,..) ; ¢ë室: A - ­®¬¥à ¤¨áª  (0=A,1=B,..)
; C - ­®¬¥à ¯®á«¥¤­¥£® ¤¨áª  ¢ á¨á⥬¥
;///////////////////////////////////////////////////////////////////// ;/////////////////////////////////////////////////////////////////////
CURDISK_FN: CURDISK_FN:
LD A,(LDRIVE)
LD C,A
LD A,(CurrentPath) LD A,(CurrentPath)
SUB 'A' SUB 'A'
RET NC RET NC
LD A,DSS_Error.sys.INVALID_DRIVE LD A,DSS_Error.sys.INVALID_DRIVE
RET RET
CURDISK: LD A,(FatBuffer.DRIVE) CURDISK:
LD A,(LDRIVE)
LD C,A
LD A,(FatBuffer.DRIVE)
AND A AND A
RET RET
; ;

2
DSS/build.txt
View File

@ -1 +1 @@
789 790

2
SHELL/build.txt
View File

@ -1 +1 @@
285 286