CSECT   text
	xdef	@MoveMem16
	xdef	@MoveMem
move16reg	MACRO ; move16 (a0)+,(a1)+
	dc.l	$f6209000
	endm
	cnop	0,16
@MoveMem16 EQU	* ; ptr is in A0
	lsr.w	#5,d0
	subq.l	#1,d0
	nop
ll:
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	move16reg ; move16	(a0)+,(a1)+
	
	dbra	d0,ll
	nop
	rts
	cnop	0,16
@MoveMem equ *
	lsr.w	#4,d0
	subq.l	#1,d0
lll:
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	move.l	(a0)+,(a1)+
	dbra	d0,lll
	rts
	cnop	0,16
	end