BCF 	TRISB,2		
	MOVLW	0x05			
	MOVWF	T0CON			
HERE	MOVLW	0x01			
	MOVWF	TMR0H			
	MOVLW	0x08			
	MOVWF	TMR0L			
	BCF 	INTCON,TMR0IF	
	CALL	DELAY		
	BTG	PORTB,2		
	BRA 	HERE			
DELAY	BSF 	T0CON,TMR0ON	
AGAIN	BTFSS	INTCON,TMR0IF	
	BRA	AGAIN			
	BCF 	T0CON,TMR0ON 	
	RETURN