SLA2	START	BEGIN
BEGIN	LD	GR0,X
	SRA	GR0,2
	RET
X	DC	#7A31
	END