void long_xcpy() __naked
{
	__asm
	.globl long_xcpy
long_xcpy:
	movx	a,@r1
	movx	@r0,a
	inc	r0
	inc	r1
	djnz	r7,long_xcpy
	ret
	__endasm;
}