<kbd id="8mlgb"></kbd>

_{<mark id="8mlgb"></mark>}

標(biāo)題: 基于51單片機(jī)的DS18b20數(shù)字溫度計(jì)（匯編）（原程序+protues仿真） [打印本頁(yè)]

---

作者: 韓國(guó)電風(fēng)扇    時(shí)間: 2019-6-10 11:20
標(biāo)題: 基于51單片機(jī)的DS18b20數(shù)字溫度計(jì)（匯編）（原程序+protues仿真）
程序編寫(xiě)使用的是匯編語(yǔ)言，還有一些小問(wèn)題，就是調(diào)溫之后顯示的溫度值不改變，需要按幾下復(fù)位鍵之后顯示才會(huì)改變。


單片機(jī)源程序如下:

1. TEMPER_L         EQU         36H        ;存放讀出溫度低位數(shù)據(jù)
   
2.         TEMPER_H         EQU         35H        ;存放讀出溫度高位數(shù)據(jù)
   
3.         TEMPER_NUM         EQU         60H        ;存放轉(zhuǎn)換后的溫度值
   
4.         FLAG1                 BIT        00H
   
5.         DQ                 BIT         P3.2        ;一線(xiàn)總線(xiàn)控制端口
   
6. 
   
7.         ORG                0000H
   
8.         LJMP        MAIN
   
9.         ORG                0100H
   
10. MAIN:
    
11.         MOV         SP,#70H        
    
12.         LCALL         GET_TEMPER        ;從DS18B20讀出溫度數(shù)據(jù)         
    
13.         LCALL        TEMPER_COV        ;轉(zhuǎn)換讀出的溫度數(shù)據(jù)并保存
    
14.      
    
15.         LCALL   SHUJU
    
16.         LCALL   HEX2BCD
    
17.         LCALL   LOOP
    
18.         LCALL   DISPLAY
    
19.         LCALL   TAB   
    
20.         SJMP         [        DISCUZ_CODE_3        ]nbsp;             ;完成一次數(shù)字溫度采集
    
21.         
    
22. ;-------讀出轉(zhuǎn)換后的溫度值
    
23. GET_TEMPER:
    
24.         SETB         DQ                 ; 定時(shí)入口
    
25. BCD:        LCALL         INIT_1820
    
26.         JB         FLAG1,S22
    
27.         LJMP         BCD                ; 若DS18B20不存在則返回
    
28. S22:        LCALL         DELAY1
    
29.         MOV         A,#0CCH         ; 跳過(guò)ROM匹配------0CC
    
30.         LCALL         WRITE_1820
    
31.         MOV         A,#44H                 ; 發(fā)出溫度轉(zhuǎn)換命令
    
32.         LCALL         WRITE_1820
    
33.         NOP
    
34.         LCALL         DELAY
    
35.         LCALL         DELAY
    
36. CBA:        LCALL         INIT_1820
    
37.         JB         FLAG1,ABC               
    
38.         LJMP         CBA
    
39. ABC:        LCALL         DELAY1
    
40.         MOV         A,#0CCH         ; 跳過(guò)ROM匹配
    
41.         LCALL         WRITE_1820
    
42.         MOV         A,#0BEH         ; 發(fā)出讀溫度命令
    
43.         LCALL         WRITE_1820
    
44.         LCALL         READ_18200         ;READ_1820
    
45.         RET
    
46. 
    
47. ;-------讀DS18B20的程序,從DS18B20中讀出一個(gè)字節(jié)的數(shù)據(jù)
    
48. READ_1820:
    
49.         MOV         R2,#8
    
50. RE1:        CLR         C
    
51.         SETB         DQ
    
52.         NOP
    
53.         NOP
    
54.         CLR         DQ
    
55.         NOP
    
56.         NOP
    
57.         NOP
    
58.         SETB         DQ
    
59.         MOV         R3,#7
    
60.         DJNZ         R3,$
    
61.         MOV         C,DQ
    
62.         MOV         R3,#23
    
63.         DJNZ         R3,$
    
64.         RRC         A
    
65.         DJNZ         R2,RE1
    
66.         RET
    
67. 
    
68. ;-------寫(xiě)DS18B20的程序
    
69. WRITE_1820:
    
70.         MOV         R2,#8
    
71.         CLR         C
    
72. WR1:        CLR         DQ
    
73.         MOV         R3,#6
    
74.         DJNZ         R3,$
    
75.         RRC         A
    
76.         MOV         DQ,C
    
77.         MOV         R3,#23
    
78.         DJNZ         R3,$
    
79.         SETB         DQ
    
80.         NOP
    
81.         DJNZ         R2,WR1
    
82.         SETB         DQ
    
83.         RET
    
84. 
    
85. ;-------讀DS18B20的程序,從DS18B20中讀出兩個(gè)字節(jié)的溫度數(shù)據(jù)
    
86. READ_18200:
    
87.         MOV         R4,#2         ; 將溫度高位和低位從DS18B20中讀出
    
88.         MOV         R1,#36H ; 低位存入36H(TEMPER_L),高位存入35H(TEMPER_H)
    
89. RE00:        MOV         R2,#8
    
90. RE01:        CLR         C
    
91.         SETB         DQ
    
92.         NOP
    
93.         NOP
    
94.         CLR         DQ
    
95.         NOP
    
96.         NOP
    
97.         NOP
    
98.         SETB         DQ
    
99.         MOV         R3,#7
    
100.         DJNZ         R3,$
     
101.         MOV         C,DQ
     
102.         MOV         R3,#23
     
103.         DJNZ         R3,$
     
104.         RRC         A
     
105.         DJNZ         R2,RE01
     
106.         MOV         @R1,A
     
107.         DEC         R1
     
108.         DJNZ         R4,RE00
     
109.         RET
     
110. 
     
111. ;-------將從DS18B20中讀出的溫度數(shù)據(jù)進(jìn)行轉(zhuǎn)換
     
112. TEMPER_COV:
     
113.         MOV         A,#0F0H
     
114.         ANL         A,TEMPER_L ; 舍去溫度低位中小數(shù)點(diǎn)后的四位溫度數(shù)值
     
115.         SWAP         A
     
116.         MOV         TEMPER_NUM,A
     
117.         MOV         A,TEMPER_L
     
118.         JNB         ACC.3,TEMPER_COV1 ; 四舍五入去溫度值
     
119.         INC         TEMPER_NUM
     
120.         
     
121. TEMPER_COV1:
     
122.         MOV         A,TEMPER_H
     
123.         ANL         A,#07H
     
124.         SWAP         A
     
125.         ADD         A,TEMPER_NUM
     
126.         MOV         TEMPER_NUM,A ; 保存變換后的溫度數(shù)據(jù)
     
127. 
     
128.         RET
     
129. 
     
130. ;-------DS18B20初始化程序
     
131. INIT_1820:
     
132.         CLR         DQ
     
133.         MOV         R0,#0FBH
     
134. TSR1:        DJNZ         R0,TSR1 ; 延時(shí)
     
135.         SETB         DQ
     
136.         MOV         R0,#25H ;96US-25H
     
137. TSR2:        DJNZ         R0,TSR2
     
138. 
     
139. TSR3:        SETB         FLAG1         ; 置標(biāo)志位,表示DS1820存在
     
140. TSR6:        DJNZ         R0,TSR6 ; 延時(shí)
     
141. TSR7:        SETB         DQ
     
142.         RET
     
143. 
     
144. ;-------重新寫(xiě)DS18B20暫存存儲(chǔ)器設(shè)定值
     
145. RE_CONFIG:
     
146.         JB         FLAG1,RE_CONFIG1 ; 若DS18B20存在,轉(zhuǎn)RE_CONFIG1
     
147.         RET
     
148. RE_CONFIG1:
     
149.         MOV         A,#0CCH ; 發(fā)SKIP ROM命令
     
150.         LCALL         WRITE_1820
     
151.         MOV         A,#4EH ; 發(fā)寫(xiě)暫存存儲(chǔ)器命令
     
152.         LCALL         WRITE_1820
     
153.         
     
154.         MOV         A,#00H ; TH(報(bào)警上限)中寫(xiě)入00H
     
155.         LCALL         WRITE_1820
     
156.         MOV         A,#00H ; TL(報(bào)警下限)中寫(xiě)入00H
     
157.         LCALL         WRITE_1820
     
158.         MOV         A,#7FH ; 選擇12位溫度分辨率
     
159.         LCALL         WRITE_1820
     
160.         RET
     
161. 
     
162. ;------------------延時(shí)子程序
     
163. DELAY:
     
164.         MOV         R7,#00H
     
165. 
     
166. MIN:        DJNZ         R7,YS500
     
167.         RET
     
168. YS500:        LCALL         YS500US
     
169.         LJMP         MIN
     
170. YS500US:MOV         R6,#00H
     
171.         DJNZ         R6,$
     
172.         RET
     
173. DELAY1:        MOV         R7,#20H
     
174.         DJNZ         R7,$
     
175.         RET        
     
176. 
     
177. SHUJU:      
     
178.          MOV R0,    #0H   
     
179.              MOV R1, TEMPER_NUM   
     
180.              CALL HEX2BCD      ;調(diào)用子程序把R0 R1中的數(shù)字，轉(zhuǎn)換成BCD碼，送到R2 R3 R4;-------下面，把萬(wàn)千百十個(gè)位，分別存入R4 R3 R2 R1 R0     
     
181.              MOV A,   R4     
     
182.              MOV B,   #16   
     
183.              DIV AB                ;除以16，目的是分離出高、低四位     
     
184.              MOV 42H, A            ;存放十位     
     
185.              MOV 43H, B            ;存放個(gè)位;   
     
186.              MOV A,   R2     
     
187.              MOV R4, A            ;存放萬(wàn)位;     
     
188.              MOV A,   R3     
     
189.              MOV B,   #16     
     
190.              DIV AB     
     
191.              MOV 40H, A   
     
192.              MOV 41H, B     
     
193.              SJMP  DISPLAY               
     
194. HEX2BCD:     CLR A     ;把R0 R1中的數(shù)字，轉(zhuǎn)換成BCD碼，送到R2 R3 R4     
     
195.              MOV R2, A            ;先清零   
     
196.              MOV R3, A      
     
197.              MOV R4, A      
     
198.              MOV R5, #16       ;共轉(zhuǎn)換十六位數(shù)
     
199. LOOP:        CLR C     
     
200.              MOV A,R1           ;從待轉(zhuǎn)換數(shù)的高端移出一位到Cy     
     
201.              RLC A     
     
202.              MOV R1,A     
     
203.              MOV A, R0     ;搜索
     
204.              RLC A     
     
205.              MOV R0,A     
     
206.              MOV A,R4           ;送到BCD碼的低端     
     
207.              ADDC A,R4           ;帶進(jìn)位加。自身相加，相當(dāng)于左移一位     
     
208.              DA   A                 ;十進(jìn)制調(diào)整，變成BCD碼     
     
209.              MOV R4,A     
     
210.              MOV A,R3     
     
211.              ADDC A,R3     
     
212.              DA   A     
     
213.              MOV R3,A                     
     
214.              MOV A,R2     
     
215.              ADDC A,R2   
     
216.              MOV R2, A     
     
217.              DJNZ R5, LOOP         ;共轉(zhuǎn)換十六位數(shù)
     
218.                 RET
     
219.             
     
220.         
     
221. DISPLAY:MOV R1,#40H
     
222.         INC R1
     
223.         INC R1
     
224.         MOV R5,#0F1H
     
225.         MOV A,R5
     
226.         MOV P0,#0FFH
     
227.         MOV P2,A
     
228.         MOV A,@R1
     
229.         MOV DPTR,#TAB
     
230.         MOVC A,@A+DPTR
     
231.         MOV P0,A
     
232.         NOP
     
233.         NOP
     
234.         NOP
     
235.         NOP
     
236.         NOP
     
237.         NOP        
     
238.         NOP   
     
239.         NOP
     
240.         NOP
     
241.         NOP
     
242.         NOP
     
243.         NOP
     
244.         NOP
     
245.         NOP
     
246.         NOP
     
247.         NOP
     
248.         NOP
     
249.         NOP
     
250.         NOP
     
251.         NOP
     
252.         NOP
     
253.         NOP
     
254.         NOP
     
255.         NOP
     
256.         NOP
     
257.         NOP
     
258.         NOP
     
259.         NOP
     
260.         NOP
     
261.         INC R1
     
262.         MOV R5,#0F2H
     
263.         MOV A,R5
     
264.         MOV P0,#0FFH
     
265.         MOV P2,A
     
266.         MOV A,@R1
     
267.         MOV DPTR,#TAB
     
268.         MOVC A,@A+DPTR
     
269.         MOV R2,#80H
     
270.         ADD A,R2
     
271.         MOV P0,A
     
272.         NOP
     
273.         NOP
     
274.         NOP
     
275.         NOP
     
276.         NOP
     
277.         NOP        
     
278.         NOP   
     
279.         NOP
     
280.         NOP
     
281.         NOP
     
282.         NOP
     
283.         NOP
     
284.         NOP
     
285.         NOP
     
286.         NOP
     
287.         NOP
     
288.         NOP
     
289.         NOP
     
290.         NOP
     
291.         NOP
     
292.         NOP
     
293.         NOP
     
294.         NOP
     
295.         NOP
     
296.         NOP
     
297.         NOP
     
298.         NOP
     
299.         NOP
     
300.         NOP
     
301.         
     
302.         
     
303.         AJMP DISPLAY
     
304. 
     
305.       
     
306.       
     
307. TAB:    DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,88H,0BFH
     
308.       
     
309. 
     
310.        END
     
311.             
     

復(fù)制代碼

所有資料51hei提供下載:
由于有會(huì)員測(cè)試打不開(kāi),已經(jīng)被管理刪除

---

作者: 筱豆先生    時(shí)間: 2019-11-15 13:58
給的仿真文件打開(kāi)之后是損壞的，資料無(wú)用

---

作者: 133456789    時(shí)間: 2021-3-23 16:14
可惜沒(méi)有仿真圖

---

歡迎光臨 (http://www.torrancerestoration.com/bbs/)

Powered by Discuz! X3.1

<input id="faq8r"></input>