SLA2	START	BEGIN
BEGIN	LD	GR1,X
	SLA	GR1,2
    ST	GR1,Y
	RET
X	DC	3
Y	DS	1
	END