内容发布更新时间 : 2024/12/23 18:11:38星期一 下面是文章的全部内容请认真阅读。

洛阳师范学院课程设计说明书（2015）

MOV MOV RET

R4,#08H R5,A_BIT

LCALL DINPUT

;-------------7219命令写入子程序------------------ DINPUT: MOV A,R4

MOV B,#8 MOV P0.1,C CLR P0.3 SETB P0.3 DJNZ B,LOOP0 MOV A,R5 MOV B,#8 MOV P0.1,C CLR P0.3 SETB P0.3 DJNZ B,LOOP1 CLR P0.2 SETB P0.2 RET LOOP0: RLC A

LOOP1: RLC A

;//****************DS18B20********************// DS18B20: LCALL TEMP LCALL CHULI

RET

TEMP: LCALL REST_18B20

MOV A,#0CCH ;跳过ROM匹配 LCALL WRITE_1820

MOV A,#44H ;发出温度转换命令 LCALL WRITE_1820

LCALL REST_18B20 ;准备读温度前先初始化 MOV A,#0CCH ;跳过ROM匹配

;-----------------DS18B20的温度转换子程序--------------

50

洛阳师范学院课程设计说明书（2015）

LCALL WRITE_1820

MOV A,#0BEH ;发出读温度命令 LCALL WRITE_1820 LCALL READ_1820 RET

;--------------------------DS18B20复位程序-------------------------- REST_18B20:

SETB DQ NOP

CLR DQ

MOV R2,#250 ;主机发出延时500微秒的复位低脉冲 DJNZ R2,$

SETB DQ ;然后拉高数据线 MOV R2,#30

DJNZ R2,$ ;延时60us等待DS18B20回应 JNB DQ,REST1

JMP REST_18B20 ;超时而没有响应,重新初始化 REST1: MOV R2,#120

DJNZ R2,$ ;延时240us

JB DQ,REST2 ;数据变高，初始化成功 JMP REST_18B20 REST2: MOV R2,#240 DJNZ R2,$ RET

;----------写DS18B20的子程序(有具体的时序要求)-------------- WRITE_1820:

MOV B,#8 ;一共8位数据 WR1: CLR DQ MOV R3,#7 DJNZ R3,$ RRC A MOV DQ,C MOV R3,#20 DJNZ R3,$

;保持16uS以上

;等待

51

洛阳师范学院课程设计说明书（2015）

SETB DQ NOP NOP

DJNZ B,WR1 SETB DQ RET

;------读DS18B20的程序,从DS18B20中读出两个字节的温度数据-------------------------- READ_1820:

MOV R2,#2 ;将温度高位和低位从DS18B20中读出 MOV R1,#3EH ;低位存入3EH RE0: MOV B,#8 RE1: SETB DQ NOP NOP CLR DQ NOP NOP SETB DQ MOV R3,#9 DJNZ R3,$ MOV C,DQ MOV R3,#30 DJNZ R3,$

RRC A

DJNZ B,RE1 MOV @R1,A

INC R1 ;高位存入3FH DJNZ R2,RE0 RET

;=====================数据处理===================== CHULI: MOV A ,3EH

;延时18uS

ANL A,#0F0H SWAP

A

MOV 3DH,A

52