PIC单片机的EEPROM读写程序.doc

PIC单片机的EEPROM读写程序 PIC16C74B单片机与AT24C64通讯;该程序实现的功能是：;将I2C_A,I2C_B.....I2C_K内容写入EEPROM中;同时在EEPROM中读出数据从新写入各个寄存器;=======================================????????LIST??P=16C74B????????#includep16c74.inc????????ERRORLEVEL??-302I2C_A????EQU??????0X20????I2C_B????EQU??????0X21I2C_C????EQU??????0X22I2C_D????EQU??????0X23I2C_E????EQU??????0X24I2C_F????EQU??????0X25I2C_G????EQU??????0X26????REG1?????EQU??????0X2BREG2?????EQU??????0X2CCOUNT????EQU??????0X71????????????;I2CBCOUNT???EQU??????0X72????????????;I2CTXBUF????EQU??????0X73????????????;I2CRXBUF????EQU??????0X74????????????;I2CBUSCON???EQU??????0X75????????????;I2CBUSSTA???EQU??????0X76????????????;I2CI2CBUF???EQU??????0X77????????????;I2CSLAVEADDR????????EQU????0XA0??????;I2CDATAADDRH????????EQU????0X01??????;I2CDATAADDRL????????EQU????0X00??????;I2C;---------------------------------------????;BUSCON;---------------------------------------????SLAVE_RW????????EQU???????7LAST_BYTE_RX????EQU???????6SLAVE_ACTIVE????EQU???????5TIME_OUT????????EQU???????4;---------------------------------------????;BUSSTA;---------------------------------------BUS_BUSY??????????EQU???????7TX_PROGRESS???????EQU???????6RX_PROGRESS???????EQU???????5TX_SUCCESS????????EQU???????4RX_SUCCESS????????EQU???????3FATAL_ERROR???????EQU???????2????;SLAVE?EEPROM?ABORT?????????????EQU??????1ACK_ERROR?????????EQU???????0;---------------------------------------R_NOT_W??EQU???????0???????????TRUE?????EQU???????1FALSE????EQU???????0SDA??????EQU?????0X04????????????;I2CSCL??????EQU?????0X03????????????;I2C;=======================================????????ORG?????0X00????????GOTO????START????????ORG?????0X20START???BCF?????STATUS,RP1????????BCF?????STATUS,RP0????????CLRF????RA????????CLRF????RB????????CLRF????RC????????CLRF????RD????????CLRF????RE??????????????BSF?????STATUS,RP0????????CLRF????TRISA????????CLRF????TRISB??????????????????????????????CLRF????TRISC????????CLRF????TRISD????????CLRF????T