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