rutina de programación de la eprom
PROGRAM:
	SETB	P3.4	;P2.7	ENABLE\
	MOV	A,R0
	MOV	DPTR,	#PA55
	MOVX	@DPTR,A
	MOV	A,R1
	MOV	DPTR,#PB55
	MOV	A,R1
	MOV	DPTR,#PB55
	MOVX	@DPTR,A
	MOV	P1, P2
	SETB	P3.5
	MOV	TH0,#0AFH
	MOV	TL0,TH0
	LCALL	TIEMPO
	SETB	TR0
	CLR	P3.2;	;PROG\
	RET
;final rutina de programación de la eprom