人狗畜禽COMPANY LIMITED|全是肉的高H文〈男男〉|全篇肉高H秘书被C办公室四爱|全黄H全肉共妻|全黄H全肉短篇禁乱NP慕浅浅|全黄H全肉短篇N男男

技術熱線: 4007-888-234

技術支持

PIC16F877單片機完成i2c通訊程序

更新時間: 2019-03-23

十年專注單片機方案開發(fā)的方案公司英銳恩,分享PIC16F877單片機完成i2c通訊程序。英銳恩現(xiàn)提供服務產(chǎn)品涉及主控芯片:8位單片機、16位單片機、32位單片機及各類運算放大器等。

用PIC16F877完成的I2C通訊
W_TEMP      EQU     72H                            ;W的臨時寄存器
STATUS_TEMP EQU     73H
DATA_W      EQU     74H                            ;數(shù)據(jù)寫入寄存器
DATA_R      EQU     75H                            ;數(shù)據(jù)讀出寄存器
SCL         EQU     3                              ;時鐘的位地址
SDA         EQU     4
WP          EQU     2                              ;寫保護線
ADDRESS     EQU     26H                            ;定義地址常數(shù)
VALUE       EQU     55H                            ;計劃寫入的值

 

;----------------------------------------
ORG      0000H
         NOP
         CLRF       PCLATH                           ;確保頁選位為0
         CALL       INIT_I2C                            ;I2C的初始化程序
         CLRF       DATA_R                           ;清數(shù)據(jù)讀取寄存器
         MOVLW      VALUE
         MOVWF      DATA_W

CALL       WRITE                              ;調用寫子程序
         CALL       DELAY10MS                     ;延時
         CALL       READ                               ;調用讀子程序
         GOTO       $
;-------------------------------------------------------------------------
WRITE
WETSTART
         CALL        I2C_IDLE                      ;I2C的初始化程序
         BANKSEL     SSPCON2
         BSF         SSPCON2,0                     ;SEN   建立啟動時序
         BANKSEL     PIR1
         BTFSS       PIR1,3                        ;SSPIF   啟動時序是否完成
         GOTO        $-1

SENDWRTCOMM
         MOVLW       B'10100000'                   ;     7位地址+1位寫控制位
         BANKSEL     SSPBUF
         MOVWF       SSPBUF
         CALL        WRTACKTEST                    ;檢測應答信號
SENDADDRESS
         BANKSEL     SSPSTAT
         BTFSC       SSPSTAT,0                     ;BF       檢測寄存器滿標志位

GOTO        $-1
         MOVLW       ADDRESS                       ;寫一個單元地址字節(jié)
         BANKSEL     SSPBUF
         MOVWF       SSPBUF                        ;開始一次字節(jié)寫操作
         CALL        WRTACKTEST                    ;檢測應答信號
SENDDATA                                           ;發(fā)送數(shù)據(jù)字節(jié)
         BANKSEL     SSPSTAT
         BTFSC       SSPSTAT,0                     ;BF      檢測寄存器滿標志位
         GOTO        $-1                          
         MOVF        DATA_W,0                      ;寫一個數(shù)據(jù)字節(jié)
         BANKSEL     SSPBUF

 MOVWF       SSPBUF                        ;開始一個字節(jié)寫操作
         CALL        WRTACKTEST                    ;檢測應答信號
         BANKSEL     PIR1
         BCF         PIR1,3                       ;SSPIF   清除MSSP的中斷標志位 
WRTSTOP
         BANKSEL     SSPCON2
         BSF         SSPCON2,0                    ;SEN       停止
         BANKSEL     PIR1
         BCF         PIR1,3                      

    RETURN
;-----------------------------------------------------------------------
READ
READSTART
         CALL        I2C_IDLE
  BANKSEL     PIR1
  BCF         PIR1,3             

 

  BANKSEL     SSPCON2
         BSF         SSPCON2,0            

 

         BSF         SSPCON2,RSEN
         BANKSEL     PIR1
         BTFSS       PIR1,3        

 

    GOTO        $-1
WRTWRITE
         MOVLW       0A0H
        BANKSEL     SSPBUF
         MOVWF       SSPBUF
         CALL        WRTACKTEST
WRTADDRESS
         MOVLW       ADDRESS
         BANKSEL     SSPBUF
         MOVWF       SSPBUF
        CALL        WRTACKTEST
         CALL        DELAY10MS
RESTART
         CALL        I2C_IDLE
         BANKSEL     PIR1
  BCF         PIR1,3               ;SSPIF
         BANKSEL     SSPCON2
         BSF         SSPCON2,0           ;SEN
         BANKSEL     PIR1
         BTFSS       PIR1,3              ;SSPIF
         GOTO        $-1

WRTREAD
         MOVLW       0A1H
         BANKSEL     SSPBUF
         MOVWF       SSPBUF
         CALL        WRTACKTEST
         BANKSEL     PIR1
         BCF         PIR1,3                ; SSPIF
STARTREAD
         BANKSEL     SSPCON2
         BSF         SSPCON2,3             ;RCEN
READDATA
         BANKSEL     PIR1
         BCF         PIR1,3                ;SSPIF
         BTFSS       PIR1,3                ;SSPIF
         GOTO        $-1
  BANKSEL     SSPBUF
         MOVF        SSPBUF,0

 MOVWF       DATA_R
         BANKSEL     PIR1
         BCF         PIR1,3                 ;SSPIF
SENDREADNACK
         BANKSEL     SSPCON2
         BSF         SSPCON2,5                ;ACKDT
         BSF         SSPCON2,4                ;ACKEN
         BANKSEL     PIR1
         BTFSS       PIR1,3                    ;SSPIF
         GOTO        $-1

READSTOP
         BANKSEL     SSPCON2
         BSF         SSPCON2,2                 ;PEN
         BANKSEL     PIR1
         BTFSS       PIR1,3                    ; SSPIF
  GOTO        $-1
  BCF         PIR1,3                     ;SSPIF
         RETURN
;----------------------------------------------------------------------
WRTACKTEST
         BANKSEL     PIR1
         BCF         PIR1,3                    ;SSPIF
         BTFSS       PIR1,3
         GOTO        $-1
         RETURN               

 

;-----------------------------------------------------------------------------
I2C_IDLE
         BANKSEL     SSPSTAT
         BTFSC      SSPSTAT,2            ;R_W
  GOTO       $-1
         MOVF       SSPCON2,0
  ANDLW      1FH
         BTFSS      STATUS,2             ;Z
         GOTO       $-3
         RETURN

;------------------------------------------------------------------------
INIT_I2C
         BANKSEL    TRISC
         BSF        TRISC,SDA
         BSF        TRISC,SCL
  BCF        TRISE,WP
         BANKSEL    PORTE
         BCF        PORTE,WP
         BANKSEL    SSPADD

  MOVLW      9
         MOVWF      SSPADD
         BCF        SSPSTAT,6
  BSF        SSPSTAT,7
  BANKSEL    SSPCON
  MOVLW      38H
  MOVWF      SSPCON
        
         RETURN
;------------------------------------------------------------------------
DELAY10MS
MOVLW    0FFH
    MOVWF     7FH
L1      MOVLW     0FFH
MOVWF     7EH
L2 DECFSZ    7EH,1
GOTO      L2
DECFSZ    7FH,1
        GOTO      L1
        RETURN
        END

404
返回首頁 |  返回上一頁
水富县| 静海县| 巨鹿县| 文登市| 鄂托克前旗| 句容市| 长白| 洞口县| 土默特左旗| 吐鲁番市| 社会| 信宜市| 漳州市| 巴南区| 卢龙县| 荥经县| 金平| 新余市| 叶城县| 额济纳旗| 佛冈县| 同德县| 天台县| 涟源市| 迭部县| 伊金霍洛旗| 大名县| 遂溪县| 扬州市| 开远市| 聂荣县| 措勤县| 阜新| 吴桥县| 井研县| 陆河县| 临沂市| 星座| 乐东| 宁都县| 宜川县|