新聞中心

        EEPW首頁 > 嵌入式系統(tǒng) > 設(shè)計(jì)應(yīng)用 > 24LCxx系列的EEPROM讀寫的程序?qū)嵗?/p>

        24LCxx系列的EEPROM讀寫的程序?qū)嵗?/h1>
        作者: 時(shí)間:2012-07-18 來源:網(wǎng)絡(luò) 收藏

        本文引用地址:http://www.104case.com/article/171137.htm

        ;
        ;******************************************************
        ;* Random Read a Byte from
        ;*
        ;* Input:
        ;* - I2C_Ctrl : Control Byte of
        ;* - I2C_Addr : Location of
        ;* Output:
        ;* - I2C_Data : Read Data from EEPROM
        ;******************************************************
        ;
        ; Send Command for RANDOM READ :
        ; Start+ 0xA0 + EE_Address + ReStart + 0xA1 + Read_Data + NAck + Stop
        ;

        EE_Random_Read
        call StartI2C ; Set SSPCON2.SEN
        ;
        bcf I2C_Ctrl,0 ; set for write Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        ;
        movf I2C_Addr,W ; Send out the Rendom address of EEPROM
        call Send_Byte
        ;
        call RstartI2C ; Send a Repeat Start to I2C
        ;
        bsf I2C_Ctrl,0 ; set for Read Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        ;
        call RecI2C ; Enable I2C Receive
        ;
        BANKSEL SSPBUF
        movf SSPBUF,W ; Save to I2C_Data First !!
        movwf I2C_Data

        call Non_Ack ; Initial NACK Response !!

        call StopI2C ; Initial STOP Condition
        return
        ;
        ;***************************************************************
        ;* Sequential Read from EEPROM
        ;*
        ;* Input:
        ;* - I2C_Ctrl : Control Byte of EEPROM
        ;* - I2C_Addr : Start Location of EEPROM
        ;* - I2C_Page_Length : How many byte need to read
        ;* Output:
        ;* - I2C_SEQU_Buffer : Sequential Read Data buffer
        ;*
        ;***************************************************************
        ;
        ; Send Command for RANDOM READ :
        ; Start+ 0xA0 + EE_Address + ReStart + 0xA1 + Read_Data + NAck + Stop
        ;
        EE_SEQU_Read
        call StartI2C ; Set SSPCON2.SEN
        ;
        bcf I2C_Ctrl,0 ; set for write Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        ;
        movf I2C_Addr,W ; Send out the Rendom address of EEPROM
        call Send_Byte
        ;
        call RstartI2C ; Send a Repeat Start to I2C
        ;
        bsf I2C_Ctrl,0 ; set for Read Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        ;
        movlw I2C_SEQU_Buffer
        movwf FSR
        ;
        _Sequ_Loop call RecI2C ; Enable I2C Receive
        BANKSEL SSPBUF
        movf SSPBUF,W ; Save to I2C_Data First !!
        movwf INDF
        incf FSR,F
        decfsz I2C_Page_Length,F
        goto _Cont_Read
        goto _End_Read
        _Cont_Read call An_Ack
        goto _Sequ_Loop
        ;
        _End_Read call Non_Ack ; Initial NACK Response !!
        call StopI2C ; Initial STOP Condition
        return
        ;
        ;******************************************************
        ;* EEPROM Acknowledge Polling
        ;*
        ;* -- The routine will polling the ACK
        ;* response from EEPROM
        ;* -- ACK=0 return
        ;* -- ACK=1 send Restart loop check
        ;*
        ;******************************************************
        ;
        EE_Ack_Check
        call StartI2C ; Set SSPCON2.SEN

        bcf I2C_Ctrl,0 ; Clear for Write Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        _Ack_Polling
        BANKSEL SSPCON2
        btfss SSPCON2,ACKSTAT ; Check ACKSTAT bit , 0 = ACK , 1 = NACK
        goto ACK_Return ; Ack = 0 ; EEPROM is Ready
        _Ack_Hi ; Ack = 1 ; EEPROM is Busy for Write
        call Delay_mS ; Delay 500uS for next Ack polling
        call RstartI2C ; Send a Repeat Start to I2C
        bcf I2C_Ctrl,0 ; Clear for Write Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        goto _Ack_Polling

        ACK_Return
        call StopI2C ; Initial STOP Condition
        return
        ;
        ;**********************************************************
        ;* Page Write 1 to 8 Bytes to EEPROM
        ;*
        ;* Input:
        ;* - I2C_Ctrl : Control Byte of EEPROM
        ;* - I2C_Addr : Location of EEPROM
        ;* - I2C_Page_Buffer: RAM location of Data
        ;* - I2C_Page_Length : Data length count
        ;*
        ;**********************************************************
        ;
        ; Send Command for PAGE WRITE :
        ; Start+ 0xA0 + EE_Address + W_Data 0+ .. + W_Data N + Stop
        ;
        EE_Page_Write
        movf I2C_Page_Length,W
        btfsc STATUS,Z
        return
        ;
        call StartI2C ; Set SSPCON2.SEN
        ;
        bcf I2C_Ctrl,0 ; Clear for Write Command
        movf I2C_Ctrl,W ; Send Slave Address to I2C Bus
        call Send_Byte
        ;
        movf I2C_Addr,W ; Send out the Command
        call Send_Byte
        ;
        movlw I2C_Page_Buffer
        movwf FSR
        _W1 movf INDF,W
        call Send_Byte
        incf FSR,F
        decfsz I2C_Page_Length,F
        goto _W1
        ;
        call StopI2C ; Initial STOP Condition
        return
        ;
        ;
        ;*******************************************************
        ;* Write a Byte to EEPROM
        ;*
        ;* Input:
        ;* - I2C_Ctrl : Control Byte of EEPROM
        ;* - I2C_Addr : Location of EEPROM
        ;* - I2C_Data : Data to EEPROM



        評(píng)論


        相關(guān)推薦

        技術(shù)專區(qū)

        關(guān)閉
        主站蜘蛛池模板: 吉林省| 阿鲁科尔沁旗| 浦北县| 巴南区| 四平市| 红安县| 明溪县| 剑阁县| 芦溪县| 会昌县| 松江区| 武强县| 德庆县| 龙井市| 甘谷县| 金乡县| 湾仔区| 南陵县| 工布江达县| 贞丰县| 新平| 南丰县| 防城港市| 泽州县| 靖安县| 招远市| 和平县| 八宿县| 易门县| 油尖旺区| 山东| 澎湖县| 曲松县| 那曲县| 泸溪县| 高淳县| 游戏| 夹江县| 九江市| 军事| 建宁县|