LightGate1:
	inc counter
	CALL Count_bcd
	setb TR0 	;start event timer
	

reti

Timer:
	mov TH0,#220		; prepare timer registers
	mov TL0, #01
	mov TMOD,#01H 		;Timer 0 mode 1
	clr TF0 		;clear timer interrupt flag
	mov timerOverFlow,#0 	;clear overflow counter
	setb EX0 		;enable external interrupt 0
	setb ET0 		;enable timer interrupt 0
	setb EX1 		;enable external interrupt 1
	setb EA 		;enable global interrupt
	jnb finished,$ 		;wait for complete event to finish
	clr finished 		;clear event bit
	sjmp Timer 		;prepare for next event




LightGate2:
	clr TR0 ;stop event timer
	setb finished ;event finished (finished is defined in 0h) 
reti

OverflowHandler:	;over flow has occurred  (every 1/100 of a second)
	CLR TR0
	inc timeroverflow ;increment overflow counter
	mov atime4, timeroverflow
	Call times_bcd
	Call get_atime5
	CALL Print_atime 
	mov TH0,#220; prepare timer registers
	mov TL0, #01
	setb tr0
	clr TF0 ;clear interrupt flag
reti