; [x] 11/12/23 
cmd_break:
.sp+1:	LD	SP,0
	;!TODO вложенные bat. передавать ошибку обратно в вызывающий bat
.exit:	ld	a,(goto_active)	; GOTO: label not found ?
	or	a
	jr	z,.close
	xor	a
	ld	(goto_active),a
	ld	de,MAIN_MSG.LABEL_NOT_FOUND
	call	ECHO_MESSAGE
.close:	xor	a
	ld	(gosub_sp),a		; reset GOSUB stack
	ld	a,(BAT_FM)		; дескр. bat-файла
	ld	c,Dss.Close		; закрыть файл
	RST	ToDSS
	xor	a
	ld	(BAT_FM),a
	;!TODO вложенные bat. передавать ошибку обратно в вызывающий bat
	ret