.TITLE	VRCDX
	.MCALL	VRCX$S

BUF:	.BLKW	258.		;Message buffer

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

	.END	START