【文章內(nèi)容簡介】 個字節(jié)就是實際測量獲得的溫度。**********************************************MAIN： MOV SP, 50H 。設置堆棧 MOV P1, 0FFH 。LPTEMP: LCALL GET_TEMPER 。調(diào)用讀溫度子程序 LCALL CONVTEMP 。溫度BCD碼計算處理子程序 LCALL DISPBCD 。顯示區(qū)BCD碼溫度值刷新子程序 MOV P0,TEMPLC MOV P2,TEMPHC。************************************* LCALL DISPLAY 。調(diào)用數(shù)碼管顯示子程序。************************************* AJMP LPTEMP 。循環(huán)。*************************************。 這是DS18B20復位初始化子程序。*************************************INIT_1820：SETB TEMPDIN NOP CLR TEMPDIN 。主機發(fā)出延時537微秒的復位低脈沖 MOV R1,3TSR1： MOV R0,107 DJNZ R0,$ DJNZ R1,TSR1 SETB TEMPDIN 。然后拉高數(shù)據(jù)線 NOP NOP NOP MOV R0,25H 。延時TSR2： JNB TEMPDIN,TSR3 。等待DS18B20回應 DJNZ R0,TSR2 LJMP TSR4 。DS1820不存在TSR3： SETB FLAG1 。置標志位,表示DS1820存在 CLR 。 LJMP TSR5TSR4： CLR FLAG1 。清標志位,表示DS1820不存在 CLR LJMP TSR7TSR5： MOV R0,117TSR6： DJNZ R0,TSR6 。時序要求延時一段時間TSR7： SETB TEMPDIN 。結束 RET。****************************************。 讀出轉換后的溫度值。****************************************GET_TEMPER：SETB TEMPDIN 。 LCALL INIT_1820 。先復位DS18B20 JB FLAG1,TSS2 RET 。判斷DS1820是否存在?若DS18B20不存在則返回TSS2： CLR 。DS18B20已經(jīng)被檢測到!! MOV A,0CCH 。跳過ROM匹配 LCALL WRITE_1820 MOV A,44H 。發(fā)出溫度轉換命令 LCALL WRITE_1820。*****************************************。這里通過調(diào)用顯示子程序實現(xiàn)延時一段時間,等待AD轉換結束,12位的話750微秒。***************************************** LCALL DISPLAY 。顯示溫度。***************************************** LCALL INIT_1820 。準備讀溫度前先復位 MOV A,0CCH 。跳過ROM匹配 LCALL WRITE_1820 MOV A,0BEH 。發(fā)出讀溫度命令 LCALL WRITE_1820 LCALL READ_18200 。將讀出的溫度數(shù)據(jù)保存到35H/36H RET。*******************************************。寫DS18B20的子程序(有具體的時序要求)。*******************************************WRITE_1820：MOV R2,8 。一共8位數(shù)據(jù) CLR C 。C清0 SETB TEMPDIN 。/ NOP 。/ NOP 。/WR1： CLR TEMPDIN 。 MOV R3,6 。延時 DJNZ R3,$ RRC A 。數(shù)據(jù)右移 MOV TEMPDIN,C 。寫入一位數(shù)據(jù) MOV R3,23 。延時 DJNZ R3,$ SETB TEMPDIN 。拉高數(shù)據(jù)端口 NOP DJNZ R2,WR1 。判斷是否寫完 SETB TEMPDIN 。拉高數(shù)據(jù)端口 RET。*************************************。處理溫度BCD碼子程序。*************************************CONVTEMP： MOV A,TEMPH 。 ANL A,80H 。 判斷最高位 JZ TEMPC1 。 判斷溫度是否在零下？ CLR C 。 溫度值補碼 變成原碼 MOV A,TEMPL 。 CPL A ADD A,01H 。 MOV TEMPL,A 。 MOV A, TEMPH 。 CPL A 。 ADDC A,00H 。 MOV TEMPH,A 。 TEMPHC HI=符號位 MOV TEMPHC,0BH 。 置標志 SJMP TEMPC11 。TEMPC1: MOV TEMPHC,0AH 。 置+標志 不顯示。**************************************TEMPC11: MOV A,TEMPHC 。 計算小數(shù)位溫度BCD值 SWAP A MOV TEMPHC,A 。 MOV A,TEMPL 。 ANL