ds18b20汇编程序与c程序

; 读出转换后的温度值
;//*****************************************//
GET_TEMPER:
SETBDQ; 定时入口

LCALLINIT_1820
JBFLAG1,TSS2
RET; 若DS18B20不存在则返回
TSS2:
MOVA,#0CCH; 跳过ROM匹配
LCALLWRITE_1820
MOVA,#44H; 发出温度转换命令
LCALLWRITE_1820

LCALLINIT_1820
MOVA,#0CCH; 跳过ROM匹配
LCALLWRITE_1820
MOVA,#0BEH; 发出读温度命令
LCALLWRITE_1820
LCALLREAD_1820
MOVTEMPER_NUM,A; 将读出的温度数据保存
RET
;//*****************************************//

; 读DS18B20的程序,从DS18B20中读出一个字节的数据
;//*****************************************//
READ_1820:
MOVR2,#8
RE1:
CLRC
SETBDQ
NOP
NOP
CLRDQ
NOP
NOP
NOP
SETBDQ
MOVR3,#7
DJNZR3,$
MOVC,DQ
MOVR3,#23
DJNZR3,$
RRCA
DJNZR2,RE1
RET
;//*****************************************//

; 写DS18B20的程序
;//*****************************************//
WRITE_1820:
MOVR2,#8
CLRC
WR1:
CLRDQ
MOVR3,#6
DJNZR3,$
RRCA
MOVDQ,C
MOVR3,#23
DJNZR3,$
SETBDQ
NOP
DJNZR2,WR1
SETBDQ
RET
;//*****************************************//

; 读DS18B20的程序,从DS18B20中读出两个字节的温度数据
;//*****************************************//
READ_18200:
MOVR4,#2; 将温度高位和低位从DS18B20中读出
MOVR1,#36H; 低位存入36H(TEMPER_L),高位存入35H(TEMPER_H)
RE00:
MOVR2,#8
RE01:
CLRC
SETBDQ
NOP
NOP
CLRDQ
NOP
NOP
NOP
SETBDQ
MOVR3,#7
DJNZR3,$
MOVC,DQ
MOVR3,#23
DJNZR3,$
RRCA
DJNZR2,RE01
MOV@R1,A
DECR1
DJNZR4,RE00
RET
;//*****************************************//

; 将从DS18B20中读出的温度数据进行转换
;//*****************************************//
TEMPER_COV:
MOVA,#0F0H
ANLA,TEMPER_L; 舍去温度低位中小数点后的四位温度数值
SWAPA
MOVTEMPER_NUM,A
MOVA,TEMPER_L
JNBACC.3,TEMPER_COV1; 四舍五入去温度值
INCTEMPER_NUM

TEMPER_COV1:
MOVA,TEMPER_H
ANLA,#07H
SWAPA
ORLA,TEMPER_NUM
MOVTEMPER_NUM,A; 保存变换后的温度数据
LCALLBIN_BCD
RET
;//*****************************************//

; 将16进制的温度数据转换成压缩BCD码
;//*****************************************//
BIN_BCD:
MOVDPTR,#TEMP_TAB
MOVA,TEMPER_NUM
MOVCA,@A+DPTR
MOVTEMPER_NUM,A
RET