MYXDATA EQU 000H
	COUNT EQU 5
	IDATA EQU 40H
		ORG	0
		MOV	A,0C4h		
		SETB	ACC.0			
		MOV 	0C4H,A		
		MOV	DPTR,#MYXDATA	
		MOV	R2,#COUNT		
		MOV	R0,#IDATA		
AGAIN:	MOV	A,@R0			
		MOVX	A,@DPTR		
		INC	R0			
		INC	DPTR			
		DJNZ	R2,AGAIN		
		END