COPY:	MOV	R2,#28H		;
	MOV	R3,#00H
	MOV	R4,#41H
	LCALL	PR1
	MOV	COM,#43H	;
	LCALL	PR1
	MOV	COUNT,#10H	;
	MOV	R2,#01H		;
	MOV	R3,#00H		;
	MOV	R4,#24H
	LCALL	PR1
	MOV	R3,#21H
	MOV	R4,#0C4H
	LCALL	PR11
	MOV	R3,#22H		;
	MOV	R4,#0C4H
	LCALL	PR11
	MOV	O_X,#00H	;
	MOV	O_Y,#08H	;
COPY1:	MOV	R2,O_X
	MOV	R3,O_Y
	MOV	R4,#24H
	LCALL	PR1
	MOV	R4,#0E8H
	LCALL	PR12
	LCALL	PR06		;
	MOV	A,O_X		;
	ADD	A,#28H		;
	MOV	O_X,A
	CLR	A
	ADDC	A,O_Y
	MOV	O_Y,A
	DJNZ	COUNT,COPY1	;
	MOV	COM,#98H	;
	LCALL	PR12
	SJMP	$