DEFINE VERB BRU
	IMAGE BRUREAD
	QUALIFIER COPY, DEFAULT
	QUALIFIER LOG
	QUALIFIER LIST, VALUE (TYPE=$FILE, DEFAULT=SYS$OUTPUT)
	QUALIFIER TOTAL, DEFAULT
	DISALLOW ANY2 (COPY,LIST)
	DISALLOW ANY2 (LOG,LIST)
	QUALIFIER SELECT, VALUE (REQUIRED, TYPE=$FILE, LIST)
	QUALIFIER EXCLUDE, VALUE (REQUIRED, TYPE=$FILE, LIST)
	QUALIFIER REWIND, DEFAULT

	PARAMETER P1, VALUE (REQUIRED,TYPE=$FILE,LIST),
		LABEL=TAPE, PROMPT="Tape"

	QUALIFIER DEBUG, SYNTAX=SDEBUG

DEFINE SYNTAX SDEBUG
	IMAGE ADRIAN:[util]BRUREAD