;///////////////////////////////////////////////////
;
; DEL, ERASE. Удалить файл
;
;///////////////////////////////////////////////////
cmd_del: ex	de,hl
	ld	de,Buffers.work.buffer1;
	ld	c,Dss.GSwitch
	RST	ToDSS
	ld	hl,Buffers.work.buffer1;
	ld	c,Dss.Delete
	RST	ToDSS
	call	c,print_err_message	; вывод сообщения
	ret
;///////////////////////////////////////////////////