.TITLE	RCVDX
	.MCALL	RCVX$S

BUF:	.BLKW	15.		;Message buffer

START:	RCVX$S	,#BUF		;Read message and exit
	BR	START		;Loop for next message

	.END	START