mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 17:31:47 +03:00
25 lines
408 B
NASM
25 lines
408 B
NASM
////////////////////////////////////////////////////////////////////////
|
|
;
|
|
;
|
|
////////////////////////////////////////////////////////////////////////
|
|
CHNDISK_FN:
|
|
CALL CHNDISK
|
|
RET C
|
|
PUSH AF
|
|
CALL DIR_PATH_CHANGE.FullCurrent
|
|
POP AF
|
|
RET
|
|
CHNDISK:;[x] ¡®«¥¥ ª®à४â ï ᬥ ¤¨áª
|
|
CALL OPENDSK
|
|
;
|
|
;R010
|
|
RET C
|
|
LD HL,WorkDirectory
|
|
LD (HL),0
|
|
PUSH AF
|
|
CALL OPENDIR
|
|
POP BC
|
|
RET C
|
|
LD A,B
|
|
RET
|
|
; |