mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 17:31:47 +03:00
19 lines
437 B
NASM
19 lines
437 B
NASM
;///////////////////////////////////////////////////
|
|
;
|
|
; RD, RMDIR. “¤ «¨âì ¯ ¯ªã
|
|
;
|
|
;///////////////////////////////////////////////////
|
|
cmd_rmdir: ld c,Dss.RmDir ; á®§¤ âì ¯ ¯ªã
|
|
push bc
|
|
;
|
|
.shared: ex de,hl
|
|
ld de,Buffers.work.buffer1;
|
|
ld c,Dss.GSwitch ; ¢ë¤¥«¨âì ¯ à ¬¥âà ª®¬-áâப¨
|
|
RST ToDSS
|
|
ld hl,Buffers.work.buffer1 ; ¨¬ï ¯ ¯ª¨
|
|
POP BC
|
|
RST ToDSS
|
|
ret nc
|
|
JP print_err_message ; ¢ë¢®¤ á®®¡é¥¨ï
|
|
;
|