COUNT  EQU 0x25		  
	  MOVLW  d'10' 	  
	  MOVWF  COUNT	  
	  MOVLW  0		  
AGAIN	  ADDLW  3		  
	  DECFSZ COUNT,F	  
	  GOTO   AGAIN	  
	  MOVWF  PORTB