.title
eocopyarea
.definition
	dx dy => -
.nl .spaces 8
	copy area to dx, dy