MCU.zip_The Program

;*************************************************************************

; DS18B20 温度计 *

;采用 4 位 LED 共阳显示器显示测温值，显示精度 0.1 度，测温范围-55 度至+125 度 *

;用 AT89C2051 单片机，12MHZ 晶振，设计日期 2004.02.27 *

;*************************************************************************

;

;***********************************************************************

; 常数定义

;***********************************************************************

;*************************************************************

BITST DATA 20H

TIME1SOK BIT BITST.1

TEMPONEOK BIT BITST.2

TEMPL DATA 26H

TEMPH DATA 27H

TEMPHC DATA 28H

TEMPLC DATA 29H

;

;

;*************************************************************

; 中断向量区

;*************************************************************

ORG 0000H

LJMP START

;

ORG 00BH

LJMP T0IT

;

;******************************************************************

START: MOV SP, #60H

CLSMEM: MOV R0, #20H ;

MOV R1, #60H ;

CLSMEM1: MOV @R0, #00H ;

INC R0 ;

DJNZ R1, CLSMEM1 ;

;

MOV TMOD, #00100001B ; 定时器 0 作方式 1 (16BIT)

MOV TH0, #TIMEL ;

NOP ;

INIT: NOP ;

SETB ET0 ;

SETB TR0 ;

SETB EA ;

MOV PSW, #00H ;

CLR TEMPONEOK ;

LJMP MAIN ;

;

;**********************************************************

INC R7 ;

CJNE R7, #32H, T0IT1 ;

MOV R7, #00H ;

SETB TIME1SOK ;1S 定时到标志

T0IT1: POP PSW ;

RETI ;

;

;

;

;**********************************************************

JNB TIME1SOK, MAIN ;

CLR TIME1SOK ;测温每 1S 一次

JNB TEMPONEOK, MAIN2;上电时先温度转换一次

LCALL READTEMP1 ;读出温度值子程序

LCALL CONVTEMP ;温度 BCD 码计算处理子程序

LCALL DISPBCD ;显示区 BCD 码温度值涮新子程序

LCALL DISP1 ;消闪烁，显示一次

MAIN2: LCALL READTEMP ;温度转换开始

SETB TEMPONEOK ;

; RESET DS18B20

;**********************************************************

INITDS1820: SETB TEMPDIN ;

NOP ;

NOP ;

CLR TEMPDIN ;

MOV R6, #0A0H ; DELAY 480us

DJNZ R6, $

MOV R6, #0A0H

DJNZ R6, $ ;

DJNZ R6,LOOP1820

MOV R6, #064H ; DELAY 200us

DJNZ R6, $ ;

SJMP INITDS1820 ;

RET ;

;

INITDS1820OUT: SETB TEMPDIN ;

RET ;

;

;