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