;---------Interrupt Routines----------

T0_INT
	clr	ES
	clr	TF0
	mov	TH0,	#0B7h	; set for 20 ms
	mov	TL0,	#00	;
	acall	SERVO1
EXIT	setb	ES
	ret

SER_INT
	clr	ET0
	clr	RI
	mov	A,	SBUF
	mov	R1,	A
	jnb	RI,	$
	mov	A,	SBUF
	CLR	RI
	mov	R3,	A
	setb	ET0
	ret


;---------Interrupt Calls----------------

	.org	000Bh		; T0 interrupt
	acall	T0_INT
	reti


	.org	0023h		; serial interrupt
	acall	SER_INT
	reti