TEMPER_L EQU 36H ;åæ¾è¯»åºæ¸©åº¦ä½ä½æ°æ®
TEMPER_H EQU 35H ;åæ¾è¯»åºæ¸©åº¦é«ä½æ°æ®
TEMPER_NUM EQU 60H ;åæ¾è½¬æ¢åç温度å¼
FLAG1 BIT 00H
DQ BIT P3.3 ;ä¸çº¿æ»çº¿æ§å¶ç«¯å£
ORG 0000H
LJMP MAIN
ORG 0100H
MAIN:
MOV SP,#70H
LCALL GET_TEMPER ;ä»DS18B20读åºæ¸©åº¦æ°æ®
LCALL TEMPER_COV ;转æ¢è¯»åºç温度æ°æ®å¹¶ä¿å
SJMP $ ;å®æä¸æ¬¡æ°å温度éé
;-------读åºè½¬æ¢åç温度å¼
GET_TEMPER:
SETB DQ ; å®æ¶å
¥å£
BCD: LCALL INIT_1820
JB FLAG1,S22
LJMP BCD ; è¥DS18B20ä¸åå¨åè¿å
S22: LCALL DELAY1
MOV A,#0CCH ; è·³è¿ROMå¹é
------0CC
LCALL WRITE_1820
MOV A,#44H ; ååºæ¸©åº¦è½¬æ¢å½ä»¤
LCALL WRITE_1820
NOP
LCALL DELAY
LCALL DELAY
CBA: LCALL INIT_1820
JB FLAG1,ABC
LJMP CBA
ABC: LCALL DELAY1
MOV A,#0CCH ; è·³è¿ROMå¹é
LCALL WRITE_1820
MOV A,#0BEH ; ååºè¯»æ¸©åº¦å½ä»¤
LCALL WRITE_1820
LCALL READ_18200 ;READ_1820
RET
;-------读DS18B20çç¨åº,ä»DS18B20ä¸è¯»åºä¸ä¸ªåèçæ°æ®
READ_1820:
MOV R2,#8
RE1: CLR C
SETB DQ
NOP
NOP
CLR DQ
NOP
NOP
NOP
SETB DQ
MOV R3,#7
DJNZ R3,$
MOV C,DQ
MOV R3,#23
DJNZ R3,$
RRC A
DJNZ R2,RE1
RET
;-------åDS18B20çç¨åº
WRITE_1820:
MOV R2,#8
CLR C
WR1: CLR DQ
MOV R3,#6
DJNZ R3,$
RRC A
MOV DQ,C
MOV R3,#23
DJNZ R3,$
SETB DQ
NOP
DJNZ R2,WR1
SETB DQ
RET
;-------读DS18B20çç¨åº,ä»DS18B20ä¸è¯»åºä¸¤ä¸ªåèç温度æ°æ®
READ_18200:
MOV R4,#2 ; å°æ¸©åº¦é«ä½åä½ä½ä»DS18B20ä¸è¯»åº
MOV R1,#36H ; ä½ä½åå
¥36H(TEMPER_L),é«ä½åå
¥35H(TEMPER_H)
RE00: MOV R2,#8
RE01: CLR C
SETB DQ
NOP
NOP
CLR DQ
NOP
NOP
NOP
SETB DQ
MOV R3,#7
DJNZ R3,$
MOV C,DQ
MOV R3,#23
DJNZ R3,$
RRC A
DJNZ R2,RE01
MOV @R1,A
DEC R1
DJNZ R4,RE00
RET
;-------å°ä»DS18B20ä¸è¯»åºç温度æ°æ®è¿è¡è½¬æ¢
TEMPER_COV:
MOV A,#0F0H
ANL A,TEMPER_L ; èå»æ¸©åº¦ä½ä½ä¸å°æ°ç¹åçåä½æ¸©åº¦æ°å¼
SWAP A
MOV TEMPER_NUM,A
MOV A,TEMPER_L
JNB ACC.3,TEMPER_COV1 ; åèäºå
¥å»æ¸©åº¦å¼
INC TEMPER_NUM
TEMPER_COV1:
MOV A,TEMPER_H
ANL A,#07H
SWAP A
ADD A,TEMPER_NUM
MOV TEMPER_NUM,A ; ä¿ååæ¢åç温度æ°æ®
LCALL BIN_BCD
RET
;-------å°16è¿å¶ç温度æ°æ®è½¬æ¢æå缩BCDç
BIN_BCD:
MOV DPTR,#TEMP_TAB
MOV A,TEMPER_NUM
MOVC A,@A+DPTR
MOV TEMPER_NUM,A
RET
TEMP_TAB:
DB 00H,01H,02H,03H,04H,05H,06H,07H
DB 08H,09H,10H,11H,12H,13H,14H,15H
DB 16H,17H,18H,19H,20H,21H,22H,23H
DB 24H,25H,26H,27H,28H,29H,30H,31H
DB 32H,33H,34H,35H,36H,37H,38H,39H
DB 40H,41H,42H,43H,44H,45H,46H,47H
DB 48H,49H,50H,51H,52H,53H,54H,55H
DB 56H,57H,58H,59H,60H,61H,62H,63H
DB 64H,65H,66H,67H,68H,69H,70H,71H
DB 72H,73H,74H,75H,76H,77H,78H,79H
DB 80H,81H,82H,83H,84H,85H,86H,87H
DB 88H,89H,90H,91H,92H,93H,94H,95H
DB 96H,97H,98H,99H
;-------DS18B20åå§åç¨åº
INIT_1820:
SETB DQ
NOP
CLR DQ
MOV R0,#80H
TSR1: DJNZ R0,TSR1 ; 延æ¶
SETB DQ
MOV R0,#25H ;96US-25H
TSR2: DJNZ R0,TSR2
JNB DQ,TSR3
LJMP TSR4 ; 延æ¶
TSR3: SETB FLAG1 ; ç½®æ å¿ä½,表示DS1820åå¨
LJMP TSR5
TSR4: CLR FLAG1 ; æ¸
æ å¿ä½,表示DS1820ä¸åå¨
LJMP TSR7
TSR5: MOV R0,#06BH ;200US
TSR6: DJNZ R0,TSR6 ; 延æ¶
TSR7: SETB DQ
RET
;-------éæ°åDS18B20æååå¨å¨è®¾å®å¼
RE_CONFIG:
JB FLAG1,RE_CONFIG1 ; è¥DS18B20åå¨,转RE_CONFIG1
RET
RE_CONFIG1:
MOV A,#0CCH ; åSKIP ROMå½ä»¤
LCALL WRITE_1820
MOV A,#4EH ; ååæååå¨å¨å½ä»¤
LCALL WRITE_1820
MOV A,#00H ; TH(æ¥è¦ä¸é)ä¸åå
¥00H
LCALL WRITE_1820
MOV A,#00H ; TL(æ¥è¦ä¸é)ä¸åå
¥00H
LCALL WRITE_1820
MOV A,#7FH ; éæ©12ä½æ¸©åº¦å辨ç
LCALL WRITE_1820
RET
;------------------延æ¶åç¨åº
DELAY:
MOV R7,#00H
MIN: DJNZ R7,YS500
RET
YS500: LCALL YS500US
LJMP MIN
YS500US:MOV R6,#00H
DJNZ R6,$
RET
DELAY1: MOV R7,#20H
DJNZ R7,$
RET
END
温馨提示:内容为网友见解,仅供参考