BCF	TRISB,3		
	BCF	INTCON,TMR0IF	
	MOVLW	0x48			
	MOVWF	T0CON			
HERE	BSF	PORTB,3		
	CALL	DELAY		
	CALL	DELAY		
	BCF	PORTB,3		
	CALL	DELAY
	BRA	HERE			
DELAY	MOVLW	-D'150'		
	MOVWF	TMR0L			
	BSF 	T0CON,TMR0ON	
AGAIN	BTFSS	INTCON,TMR0IF	
	BRA	AGAIN			
	BCF 	T0CON,TMR0ON 	
	BCF 	INTCON,TMR0IF 	
	RETURN