;------ 從DS18B20中讀溫度數(shù)據(jù)程序 ------
RE18B20:
　　　　MOV　　 R4,#2
　　　　MOV　　 R1,#2FH
RE00:　 MOV　　 R2,#8
RE01:　 CLR　　 C
　　　　SETB　　P3.3
　　　　NOP
　　　　NOP
　　　　CLR　　 P3.3
　　　　NOP
　　　　NOP
　　　　NOP
　　　　SETB　　P3.3
　　　　MOV　　 R3,#09
RE10: 　DJNZ　　R3,RE10
　　　　MOV　　 C,P3.3
　　　　MOV　　 R3,#23
RE20: 　DJNZ　　R3,RE20
　　　　RRC　　 A
　　　　DJNZ　　R2,RE01
　　　　MOV　　 @R1,A
　　　　DEC　　 R1
　　　　DJNZ　　R4,RE00
　　　　RET

;-------- 顯示子程序 --------
DISP: 　MOV　　 A,2FH
　　　　MOV　　 C,70H
　　　　RRC　　 A
　　　　MOV　　 C,71H
　　　　RRC　　 A
　　　　MOV　　 C,72H
　　　　RRC　　 A
　　　　MOV　　 C,73H
　　　　RRC　　 A
　　　　MOV　　 2FH,A
　　　　MOV　　 A,2FH
　　　　MOV　　 B,#10
　　　　DIV　　 AB
　　　　MOV　　 30H,A
　　　　MOV　　 31H,B
　　　　MOV　　 A,30H
　　　　MOV　　 DPTR,#SGTB
　　　　MOVC　　A,@A+DPTR
　　　　MOV　　 P0,A　　　　　　;顯示溫度“十位”值
　　　　CLR　　 P2.2
　　　　SETB　　P2.0
　　　　SETB　　P2.1
　　　　SETB　　P2.3
　　　　SETB　　P2.4
　　　　LCALL　 YS4722U
　　　　MOV　　 A,31H
　　　　MOV　　 DPTR,#SGTB
　　　　MOVC　　A,@A+DPTR
　　　　MOV　　 P0,A　　　　　　;顯示溫度“個位”值
　　　　CLR　　 P2.3
　　　　SETB　　P2.0
　　　　SETB　　P2.1
　　　　SETB　　P2.2
　　　　SETB　　P2.4
　　　　LCALL　 YS4722U
　　　　MOV　　 A,#01000110B
　　　　MOV　　 P0,A　　　　　　;顯示溫度符號“ ℃”
　　　　CLR　　 P2.4
　　　　SETB　　P2.0
　　　　SETB　　P2.1
　　　　SETB　　P2.2
　　　　SETB　　P2.3
　　　　LCALL　 YS4722U
　　　　RET

;************* 8位共陽數(shù)碼管顯示器字型碼表 *****************
SGTB: 　DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
　　　　DB 88H,83H,0C6H,0A1H,86H,8EH,89H,0A3H,8CH,0C8H

YS4722U:
　　　　MOV　　 R4,#10 ;延時子程序
Y3:　　 MOV　　 R5,#216
　　　　DJNZ　　R5,$
　　　　DJNZ　　R4,Y3
　　　　RET

　　　　END


用ISP編程器將目標(biāo)文件ds18sy.hex燒寫到AT89S51單片機(jī)中（見下圖）

圖4： ISP編程器燒寫目標(biāo)文件