新聞中心

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

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

        ;*
        ;*******************************************************
        ;
        ; Send Command for BYTE WRITE :
        ; Start+ 0xA0 + EE_Address + Write_Data + Stop
        ;
        EE_Byte_Write
        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
        ;
        movf I2C_Data,W ; Send out the Data
        call Send_Byte
        ;
        call StopI2C ; Initial STOP Condition
        return
        ;
        ;**********************************************************************
        ;
        ; As following subroutines perform commonly used I2C functions.
        ; You can use these subroutines for your I2C access
        ;
        ;**********************************************************************
        ;
        ;*** Initial I2Cmodule fot 7-bit I2C Master Mode with 100Kcps @4MHz
        ;
        Init_I2C_Master
        BANKSEL TRISC ; Initial PortC,bit 3 4 as Input
        bsf SCL ; RC3 = SCL , RC4 = SDA
        bsf SDA
        ;
        BANKSEL PORTC
        bsf SCL ; SCL = Hi
        bsf SDA ; SDA = Hi
        ;
        movlw b'00101000' ; I2C Master Mode, Clock Rate: FOSC/(4*SSPADD+1)
        movwf SSPCON ;
        ;
        banksel SSPADD
        movlw .9 ; This gives 100KHz I2C clock @ 4MHz
        movwf SSPADD ; (4MHz/4) / (9+1)= 100KHz
        ;
        movlw b'10000000' ; Disable slew rate control,
        movwf SSPSTAT ; and clear status bits
        ;
        movlw b'00000000' ; Set SCL,SDA into Ready status
        movwf SSPCON2
        ;
        return
        ;
        ;****** Send START condition to bus *******
        ;
        StartI2C ; Initiate the I2C START condition.
        banksel SSPCON2
        bsf SSPCON2,SEN
        goto I2C_Done
        ;
        ;****** Send STOP condition to bus *******
        ;
        StopI2C
        banksel SSPCON2
        bsf SSPCON2,PEN
        goto I2C_Done
        ;
        ;****** Send RESTART condition to bus *******
        ;
        RstartI2C
        banksel SSPCON2
        bsf SSPCON2,RSEN
        goto I2C_Done
        ;
        ;****** Send a Non-Acknowledge status to bus (ACK=1) *******
        ;
        Non_Ack
        banksel SSPCON2
        bsf SSPCON2,ACKDT ; Set the ACK bit
        bsf SSPCON2,ACKEN ; Initiate the NACK sequence.
        goto I2C_Done
        ;
        ;****** Send an Acknowledge status to bus (ACK=0) *******
        ;
        An_Ack
        banksel SSPCON2
        bcf SSPCON2,ACKDT ; Clear the ACK bit
        bsf SSPCON2,ACKEN ; Initiate the NACK sequence.
        goto I2C_Done
        ;
        ;****** Send data to I2C bus from Wreg. *******
        ;
        Send_Byte
        banksel SSPBUF
        movwf SSPBUF
        goto I2C_Done
        ;
        ;****** Enable I2C Receive for Master Mode *******
        ;
        RecI2C
        banksel SSPCON2
        bsf SSPCON2,RCEN ; Set the receive enable bit.
        goto I2C_Done
        ;
        ;****** Check the I2C stage is completed ********
        ;
        I2C_Done
        banksel PIR1
        btfss PIR1,SSPIF ; Poll for SSPIF
        goto $-1
        bcf PIR1,SSPIF
        return
        ;
        Delay_mS
        banksel D_Count
        movlw .124 ; Load .5mS Dealy Value
        movwf D_Count
        _D_mS nop
        decfsz D_Count,F
        goto _D_mS
        return
        ;
        ; *********** End Of Program !!!!!
        ;
        end

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

        上一頁(yè) 1 2 3 下一頁(yè)


        評(píng)論


        相關(guān)推薦

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

        關(guān)閉
        主站蜘蛛池模板: 临城县| 双鸭山市| 阿尔山市| 宣城市| 诏安县| 建昌县| 牟定县| 建宁县| 宜良县| 武邑县| 龙泉市| 兴国县| 保山市| 扶风县| 绥德县| 稻城县| 建始县| 蕉岭县| 舞阳县| 河南省| 遂昌县| 涞水县| 息烽县| 宜昌市| 廊坊市| 西安市| 连江县| 潞城市| 岑溪市| 新建县| 晴隆县| 临颍县| 尖扎县| 宁南县| 孝义市| 柳江县| 云林县| 海伦市| 蓬安县| 彰化县| 白城市|