DS18B20数字温度计的设计(一)信息工程毕业论(6)
2013-05-13 01:07
导读:p; MOV C , TEMPDIN MOV R6 , #3CH DJNZ R6 , $ RRC A SETB TEMPDIN DJNZ R7 ,READDS1820LOOP MOV R6 , #3CH DJNZ R6 , $ RET WRITEDS1820: MOV R7 ,#08H SETB TEMPDIN NOP NOP WRITEDS1820LOP: CLR TEMPDIN MOV R6
p; MOV C , TEMPDIN
MOV R6 , #3CH
DJNZ R6 , $
RRC A
SETB TEMPDIN
DJNZ R7 ,READDS1820LOOP
MOV R6 , #3CH
DJNZ R6 , $
RET
WRITEDS1820: MOV R7 ,#08H
SETB TEMPDIN
NOP
NOP
WRITEDS1820LOP: CLR TEMPDIN
MOV R6 ,#07H
DJNZ R6, $
RRC A
MOV TEMPDIN
DJNZ R7 , WRITEDS1820LOP
RET
READTEMP: LCALL INITDS1820
MOV A ,#0CCH
LCALL WRITEDS1820
MOV R6 ,# 34H
DJNZ R6 ,$
MOV A , #44H
LCALL WRITEDS1820
MOV R6 ,# 34H
DJNZ R6 ,$
RET
READTEMP1: LCALL INITDS1820
MOV A , #0CCH
LCALL WRITEDS1820
MOV R6 , #34H
DJNZ R6 , $
MOV A , #0BEH
LCALL WRITEDS1820
MOV R6 , #34H
DJNZ R6 , $
MOV R5 , #09H
MOV B , #00H
READTEMP2: LCALL READDS1820
MOV @R0 , A
(科教范文网 lw.nseaC.Com编辑发布)
INC R0
READTEMP21: LCALL CRC8CAL
DJNZ R5 , READTEMP2
MOV A , B
JNZ READTEMPOUT
MOV A , TEMPHEAD +0
MOV TEMPL , A
MOV A , TEMPHEAD +1
READTEMPOUT: RET
CONVEMP: MOV A , TEMPH
ANL A , #80H
JZ TEMPC1
CLR C
MOV A , TEMPL
CLP A
ADD A