Быстро переместить 384b

[Aprisobal]

Подскажите быструю процедуру "смещения вниз" куска памяти в 384b на несколько байт(от 2 до 40), например из #8000 в #8010. Ничего кроме след. кода на ум не пришло:

	;HL - ист., DE - приёмник
	LD BC,$19FF
.ldd:	DB $ED,$A8,$ED,$A8,$ED,$A8,$ED,$A8 ;LDD
	DB $ED,$A8,$ED,$A8,$ED,$A8,$ED,$A8 ;LDD
	DB $ED,$A8,$ED,$A8,$ED,$A8,$ED,$A8 ;LDD
	DB $ED,$A8,$ED,$A8,$ED,$A8,$ED,$A8 ;LDD
	DJNZ .ldd

Спасибо.

[Advertiser]