;18B10溫度測(cè)量+LCD1602顯示溫度

;實(shí)戰(zhàn)目的
;1、學(xué)習(xí)18B20單總線溫度傳感器的使用。
;2、學(xué)習(xí)LCD的使用。
;3、學(xué)習(xí)10進(jìn)制轉(zhuǎn)10進(jìn)制的方法。

;所有資源：
;1、TMRO定時(shí)器。產(chǎn)生溫度轉(zhuǎn)換所需要的延時(shí)時(shí)間。
;2、PORTA口。即做LCD顯示時(shí)可控制端口，RA2同時(shí)做18B20的數(shù)據(jù)接口
;3、PORTC口。做LCD顯示時(shí)的數(shù)據(jù)口。

;功能說(shuō)明
;1、通過(guò)18B20采集當(dāng)前環(huán)境
;最高溫度可顯示127.9375，最低溫度可顯示0.0625（無(wú)負(fù)溫度處理部分）
;2、將溫度在LCD上顯示（3位整數(shù)，4位小數(shù)）

;硬件連接
;1，在18B20按DEMO板上的標(biāo)識(shí)插在插座U8上
;2，撥碼開(kāi)關(guān)S13第4位置ON
;3，其他所有撥碼開(kāi)關(guān)都置OFF

;源程序如下：
LIST P=PIC16F877
TITLE="LCD DISPLAY"
ERRORLEVEl -302 ;去掉編譯時(shí)的302號(hào)提示信息
;__CONFIG B'000010010101' ;代碼保護(hù)開(kāi)啟；WRT_ENABLE;CPD_ENABLE;LVP_DISABLE;BODEN_ENABLE
;PWRTE_ENABLE;WDT_ENABLE;OSC_XT

;*****************以下是暫存器的定義*****************************
#INCLUDE
#DEFINE RS PORTA,1 ;LCD控制信號(hào)
#DEFINE RW PORTA,2 ;LCD控制信號(hào)
#DEFINE E PORTA,3 ;LCD控制信號(hào)
#DEFINE DAT PORTC ;LCD數(shù)據(jù)線
#DEFINE DQ PORTA,2 ;18B20數(shù)據(jù)口

CBLOCK 20H
DQ_DELAY1
DQ_DELAY2
TEMP
TEMP1
TEMP2 ;存放采樣到的溫度值
COUNT
COUNT1
ENDC
TMR0_VALUE EQU 0AH ;寄存器初值為6，預(yù)分頻比1：4，中斷一次時(shí)間為4*（256-6）=1000us
DQ_DELAY_VALUE1 EQU 0FAH
DQ_DELAY_VALUE2 EQU 4H

;***********************以下是宏定義****************************
READ_STATE MACRO ;讀18B20的狀態(tài)
BCF RS
BSF RW
BSF E
ENDM

WRITE_COMMAND MACRO ;寫(xiě)命令
BCF RS
BCF RW
BCF E
ENDM

WRITE_DATA MACRO ;寫(xiě)數(shù)據(jù)
BSF RS
BCF RW
BCF E
ENDM
;**********************以下是程序的開(kāi)始************************
ORG 00H
NOP
GOTO MAIN ;入口地址
ORG 04H
RETFIE ;在中斷入口出放置一條中斷返回指令，防止干擾產(chǎn)生中斷

;***************************主程序*******************************
MAIN
CLRF PORTC
CLRF PORTA
BANKSEL TRISA
CLRF TRISA ;A口所有先設(shè)置為輸出
CLRF TRISC
MOVLW 01H
MOVWF OPTION_REG ;分頻比1：4，定時(shí)器，內(nèi)部時(shí)鐘源
MOVLW 06H
MOVWF ADCON1 ;關(guān)閉所有A/D口
BCF STATUS,RP0
MOVLW 00H
MOVWF INTCON ;關(guān)閉所有中斷，且同時(shí)清零T0IF

CLRF TEMP
CLRF TEMP1
CLRF TEMP2 ;清零臨時(shí)寄存器


;****************************循環(huán)處理部分************************

;先啟動(dòng)18B20溫度轉(zhuǎn)換程序，在判斷溫度轉(zhuǎn)換是否完成（需750us）
;未完成則調(diào)用顯示子程序，直到完成溫度轉(zhuǎn)換
;完成后讀取溫度值
;送LCD顯示
LOOP
CALL RESET_18B20 ;調(diào)用復(fù)位18B20子程序
MOVLW 0CCH
MOVWF TEMP
CALL WRITE_18B20 ;SKIP ROM命令
MOVLW 44H
MOVWF TEMP
CALL WRITE_18B20 ;溫度轉(zhuǎn)換命令
CLRF STATUS
BCF INTCON,T0IF
CALL DELAY_750MS ;調(diào)用溫度轉(zhuǎn)換所需要的750MS延時(shí)
NOP
CALL RESET_18B20
MOVLW 0CCH
MOVWF TEMP
CALL WRITE_18B20 ;SKIP ROM命令
MOVLW 0BEH
MOVWF TEMP
CALL WRITE_18B20 ;讀溫度命令
CALL READ_18B20 ;調(diào)用讀溫度低字節(jié)
MOVFW TEMP
MOVWF TEMP1 ;保存到TEMP1
CALL READ_18B20 ;調(diào)用讀溫度高字節(jié)
MOVFW TEMP
MOVWF TEMP2 ;保存到TMEP2
CALL RESET_18B20
CALL TEMP_CHANGE ;調(diào)用溫度轉(zhuǎn)換程序
CALL DISPLAY ;調(diào)用LCD顯示程序
GOTO LOOP ;循環(huán)工作

;***************************LCD顯示子程序************************
DISPLAY
;LCD模塊初始化,由廠家提供的資料顯示,其初始化過(guò)程為:

;6----寫(xiě)指令38H,此條指令是將LCD顯示模塊設(shè)置為8位數(shù)據(jù)線,雙行,5X7點(diǎn)陣顯示
;7----檢測(cè)Busy信號(hào);
;8----寫(xiě)指令08H,關(guān)閉顯示
;9----檢測(cè)Busy信號(hào);
;10---寫(xiě)指令01H,顯示清屏
;以后寫(xiě)入光標(biāo)等的控制指令.
BANKSEL TRISA
CLRF TRISA ;A口為L(zhǎng)CD控制信號(hào)，全輸出
BANKSEL PORTA

NOP
MOVLW 38H
CALL COMMAND_WRITE ;顯示模式設(shè)置：16*2顯示，5*7點(diǎn)陣，8位數(shù)碼接口
MOVLW 08H
CALL COMMAND_WRITE ;顯示關(guān)閉，不顯示光標(biāo)
MOVLW 01H
CALL COMMAND_WRITE ;顯示清屏
MOVLW 06H
CALL COMMAND_WRITE ;顯示光標(biāo)移動(dòng)設(shè)置（右移），整屏顯示不移動(dòng)
MOVLW 0CH
CALL COMMAND_WRITE ;顯示開(kāi)及光標(biāo)設(shè)置，不顯示光標(biāo)
DISPLAY0
MOVLW 84H
CALL COMMAND_WRITE ;設(shè)置顯示起始位置
CALL BUSY ;判忙

MOVLW 8H ;共8個(gè)數(shù)據(jù)需要顯示
MOVWF COUNT
MOVLW 37H ;取數(shù)地址
MOVWF FSR
DISPLAY1
INCF FSR,1 ;取數(shù)地址加1
MOVFW INDF
CALL DATA_WRITE ;調(diào)用寫(xiě)數(shù)據(jù)子程序
DECFSZ COUNT,1
GOTO DISPLAY1
RETURN