mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 09:21:47 +03:00
20 lines
482 B
NASM
20 lines
482 B
NASM
;///////////////////////////////////////////////////
|
|
;
|
|
; MD, MKDIR. ‘®§¤ âì ¯ ¯ªã
|
|
;
|
|
;///////////////////////////////////////////////////
|
|
cmd_mkdir:
|
|
ld c,Dss.MkDir ; ᮧ¤ âì ¯ ¯ªã
|
|
push bc
|
|
jp cmd_rmdir.shared
|
|
|
|
; ex de,hl
|
|
; ld de,Buffers.work.buffer1;
|
|
; ld c,Dss.GSwitch ; ¢ë¤¥«¨âì ¯ à ¬¥âà ª®¬-áâப¨
|
|
; RST ToDSS
|
|
; ld hl,Buffers.work.buffer1 ; ¨¬ï ¯ ¯ª¨
|
|
; ld c,Dss.MkDir ; ᮧ¤ âì ¯ ¯ªã
|
|
; RST ToDSS
|
|
; call c,print_err_message ; ¢ë¢®¤ á®®¡é¥¨ï
|
|
; ret
|