LISTEN.MAC;777/-BF=LISTEN.VGN;1
-184,186
	BEQ	155$
	CMPB	OPSYS,#3	; IAS, MAYBE?
	BEQ	155$		; YES
-195
;;;; ADDED FOR 11D & IAS
155$:	MOV	#IO.RNE!TF.TMO,R2	; DO A TIMED READ FOR 0 SECONDS
	QIOW$S	R2,#TTYLUN,#TTYEFN,,#IOSTAT,,<R4,R3,#0>
	TST	IOSTAT+2	; ANYTHING TYPED-AHEAD ????
	BEQ	150$		; NO
	BR	180$		; YES
/