專注差異化嵌入式產(chǎn)品解決方案 給智能產(chǎn)品定制注入靈魂給予生命
提供開發(fā)工具、應用測試 完善的開發(fā)代碼案例庫分享
從全面的產(chǎn)品導入到強大技術支援服務 全程貼心伴隨服務,創(chuàng)造無限潛能!
十年專注單片機方案開發(fā)的方案公司英銳恩,分享適合初學者的1BUS總線-DS18B20的小例子。英銳恩現(xiàn)提供服務產(chǎn)品涉及主控芯片:8位單片機、16位單片機、32位單片機及各類運算放大器等。
#INCLUDE P16F877A.INC DAT_D EQU PORTA DAT_T EQU TRISA TMP0 EQU 30H PDBYTE EQU TMP0+1 COUNT EQU TMP0+2 IOBYTE EQU TMP0+3 WENDUH EQU TMP0+4 WENDUL EQU TMP0+5 DQ EQU 2 ORG 00H NOP NOP SETUP: BCF STATUS,RP0 BCF STATUS,GIE CLRF PORTC CLRF PORTA BSF STATUS,RP0 MOVLW H'07' MOVWF ADCON1 CLRF TRISC MOVLW H'0FF' MOVWF TRISA BCF STATUS,RP0 GOTO START START: BTFSS PORTA,DQ GOTO START CALL OW_RESET ;初始化DS18B20 BTFSS PDBYTE,0 GOTO ERROR_1 MOVLW H'0CC' ;直訪ROM指令 CALL DSTXBYTE MOVLW H'44' ;轉換溫度指令 CALL DSTXBYTE WAIT1: CALL DELAY CALL DELAY CALL OW_RESET ;初始化DS18B20 MOVLW H'0CC' CALL DSTXBYTE ;直訪ROM指令 MOVLW H'0BE' CALL DSTXBYTE ;讀取溫度命令 CALL DSRXBYTE NOP MOVF IOBYTE,W MOVWF PORTC ;顯示溫度低字節(jié)(二進制) GOTO START ERROR_1: NOP GOTO START
;************************************************************************************ OW_HIZ MACRO ;強制DQ變?yōu)楦呓M態(tài) BSF STATUS,RP0 ;選擇數(shù)據(jù)存儲器BANK1 BSF DAT_T,DQ ;使DQ引腳變?yōu)楦咦钁B(tài) BCF STATUS,RP0 ;選擇數(shù)據(jù)存儲器的BANK0 ENDM ;-------------------------------------------------------------------- OW_LO MACRO ;強制DQ變?yōu)檫壿嫷碗娖?BCF STATUS,RP0 ;選擇數(shù)據(jù)存儲器的BANK0 BCF DAT_D,DQ ;清除DQ位 BSF STATUS,RP0 ;選擇數(shù)據(jù)存儲器的BANK1 BCF DAT_T,DQ ;把DQ引腳作為輸出 BCF STATUS,RP0 ;選擇數(shù)據(jù)存儲器的BANK0 ENDM ;-------------------------------------------------------------------- WAIT MACRO TIME ;延時TIMEUS ;時間必須是5US的整數(shù) MOVLW (TIME/5)-1 ;處理時間:1US MOVWF TMP0 ;處理時間:1US CALL WAIT5U ;處理時間:2US ENDM ;************************************************************************************ WAIT5U: ;需要5US來完成 NOP ;處理時間為1US NOP ;處理時間為1US DECFSZ TMP0,F ;如果不為零,處理時間為1US,如果為零,處理時間為2US GOTO WAIT5U ;處理時間為2US RETLW 0 ;處理時間為2US ;************************************************************************************ OW_RESET: OW_HIZ ;以口線為高電平開始 CLRF PDBYTE ;清除PD字節(jié) OW_LO ; WAIT D'500' ;驅動器輸出低電平500US OW_HIZ ; WAIT D'70' ;釋放口線,等待PD脈沖70US BTFSS DAT_D,DQ ;讀PD脈沖 INCF PDBYTE,F ;如果檢測到了PD脈沖,就把PDBYTE置位1 WAIT D'430' ;在PD脈沖后等待430US RETLW 0 ; ;-------------------------------------------------------------------- DSTXBYTE: MOVWF IOBYTE ;要發(fā)送的字節(jié)從W開始 MOVLW D'8' ;從IOBYTE開始發(fā)送 MOVWF COUNT ;置COUNT為8,表示要發(fā)送的比特數(shù) DSTXLP: OW_LO ; NOP ; NOP NOP ;口線變低電平5US NOP NOP RRF IOBYTE,F ;數(shù)據(jù)字節(jié) BTFSC STATUS,C ;檢查IOBYTE的LSB是1還是0 BSF DAT_D,DQ ;如果LSB是1,線路為高電平 WAIT D'60' ;連續(xù)驅動線路60US OW_HIZ ;為了上拉,釋放口線 NOP NOP ;2US的恢復時間 DECFSZ COUNT,F ;位計數(shù)器減1 GOTO DSTXLP ; RETLW
0 ; ;-------------------------------------------------------------------- DSRXBYTE: MOVLW D'8' ;讀入的字節(jié)保存入IOBYTE MOVWF COUNT ;把COUNT設為8,來進行位數(shù)計數(shù) DSRXLP: OW_LO ; NOP NOP NOP ;把DQ變低6US NOP NOP NOP ; OW_HIZ ;變?yōu)镠IZ,等待4US NOP NOP NOP NOP ; MOVF DAT_D,W ;讀DQ ANDLW B'00000100' ;屏蔽DQ位 ADDLW D'255' ;如果DQ=1,則C=1;如果DQ=0則C=0 RRF IOBYTE,F ;
把C移位至IOBYTE WAIT D'50' ;等50US直到時隙末 DECFSZ COUNT,F ;位計數(shù)器減1 GOTO DSRXLP ; RETLW 0 ;************************************************************************************ DELAY ;子程序名,也是子程序入口地址 movlw 0Ffh ;將外層循環(huán)參數(shù)值FFH經(jīng)過W movwf H'20' ;送入用作外循環(huán)變量的20H單元 lp0 movlw 0Ffh ;將內(nèi)層循環(huán)參數(shù)值FFH經(jīng)過W movwf 21h ;送入用作內(nèi)循環(huán)變量的21H單元 lp1 decfsz 21h,F ;變量21H內(nèi)容遞減,若為0跳躍 goto lp1 ;跳轉到LP1處 decfsz 20h,F ;變量20H內(nèi)容遞減,若為0跳躍 goto lp0 ;跳躍到LP0處 return ;返回主程序 END
(文源網(wǎng)絡,侵刪)