COUNT	EQU	0x20
	MOVLW	0x50
	MOVWF	TBLPTRL	
	MOVLW	0x04
	MOVWF	TBLPTRH
	
	MOVLW	A'H'		
	MOVWF	TABLAT	
	TBLWT*+	
	MOVLW	A'E'		
	MOVWF	TABLAT	
	TBLWT*+	
	MOVLW	A'L'		
	MOVWF	TABLAT	
	TBLWT*+	
	MOVLW	A'L'		
	MOVWF	TABLAT	
	TBLWT*+	
	MOVLW	A'O'		
	MOVWF	TABLAT	
	TBLWT*+	
	MOVLW	0x50
	MOVWF	TBLPTRL	
	MOVLW	0x04
	MOVWF	TBLPTRH  
	BSF		EECON1,EEPGD	
	BCF		EECON1,CFGS 	
	BSF		EECON1,WREN	
	BCF		INTCON,GIE	
	MOVLW	55H			
	MOVWF	EECON2		
	MOVLW	0AAH			
	MOVWF	EECON2		
	BSF		EECON1,WR		
	NOP					
	BSF		INTCON,GIE	
	BCF		EECON1,WREN	
	MOVLW	0x50
	MOVWF	TBLPTRL 
	MOVLW	0x04
	MOVWF	TBLPTRH
	CLRF		TRISB		
	MOVLW	0x05			
	MOVWF	COUNT
OVER	TBLRD*+			
	MOVFF	TABLAT,PORTB	
	CALL		DELAY	
	DECFSZ	COUNT,F
	BRA		OVER