This is a multi-part message in MIME format.

------=_NextPart_000_00B6_01C290A3.BD919960
Content-Type: text/plain;
        charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

Hello All,

I am trying without any success to read data from EEPROM in a 16F628,
attached is a fragment that I am using that
does not work.  Prehaps someone can point out the error of my ways.  Or show
me a better bit of code to use.

Sure would appreciate it,  Royce

------=_NextPart_000_00B6_01C290A3.BD919960
Content-Type: application/octet-stream;
        name="Eeprom.asm"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
        filename="Eeprom.asm"

; initialization code here
; along with equates and include file

initeeprom
           bcf    STATUS,R            ; bank 0
           clrf   EEADR               ; read first address

showloop
           bsf    STATUS,RP0          ; bank 1
           bsf    EECON1,RD           ; EE read
           bcf    STATUS,RP0          ; bank 0
           movf   EEDATA,W            ; W =3D EEDATA
           btfsc  STATUS,Z            ; check for end value
           goto   initeeprom          ; reset and go again
           movwf  PORTB               ; display data
           incf   EEADR,F             ; point to next EEDATA
; delay routine here so the data in PORTB can be read
           goto   showloop            ; loop for rest of data

; here is the data to be displayed
           org    0x2100
           de     0x01,0x03,0x07,0x0F,0x1F,0x3F,0x7F,0xFF,0x00
           end
=1A
------=_NextPart_000_00B6_01C290A3.BD919960--

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.