DS18B20 与数字温度计

DS18B20是温度检测器件，具有单总线、数字化的特点。
它的外形结构还比较脆弱，一般来说，它只是适合于检测室温的场合，环境条件稍稍恶劣一些，它就抗不住了。
在工业场合，做而论道一般还是使用PT100，这个东西抗造。

做而论道用18B20和单片机制作了数字温度计，在办公室里放了N多年。
它和酒精温度计显示的温度，还是有些差异，也不知道谁测量的准。

做而论道编写程序，基本上以汇编为主，一般也不想拿出来，因为很少有人看汇编的程序。
用汇编语言编写程序，思维要跟着计算机、存储器、二进制、逻辑运算、...、来走。
多数人的思维，还是停留在中小学阶段，还是以十进制来分析问题，弄不了计算机本身的东西，所以都不愿意看汇编的程序。

做而论道编写的关于DS18B20的程序，在PROTEUS软件中，仿真的效果图如下：

图片链接：http://xiangce.baidu.com/picture/detail/544db91e604402c24acc7adc30294a86c41227d6

http://hi.baidu.com/%D7%F6%B6%F8%C2%DB%B5%C0/album/item/40138fd88d1001e971fe7fa9b80e7bec56e797b3.html#

仿真实验时，可以断开DS18B20支路，数码管将会显示：Error。

图中的DS18B20，可以用“属性”来设置小数。
小数的范围是：0、1/16~15/16，即十进制的：0、0.0625~0.9375。
小数共有四位，是0.0625的整数倍，但是它的器件上，只能显示1位小数。

在18B20的温度数据中，最低四位：0001~1111，就代表了十进制的：0.0625~0.9375。

看到过很多的文章，都谈到了，怎样才能从这四位数中求出十进制的小数。
呵呵，好多的方法，都是笨的真可以！
很有一些人，都知难而退了，就用查表来解决小数的问题。其实也就是查出一位小数，就都很满足了。

做而论道用了十余条指令吧，很简单的，就求出了两位小数，并且把第三位小数按照四舍五入，进到了前一位。
想要把四位小数都求出来，也不过20条指令而已，约30us，就能解决问题。

程序中，使用了模块化的设计方法，相当规范。
模块中的转移指令，都已经设计好了偏移量，省去了好多的标号。这样，每个模块，仅有一个标号，看起来极为清晰。

不多说了，程序如下：
;=================================
DQEQUP3.7;18B20接口

NO_18BIT20H;20H.0存在标志位
D_BUFEQU30H;30H~37H显示空间
TEMPEQU38H;38H~39H温度数据
S_BOTTEQU3AH;栈底位置
;=================================
ORG0000H
START:
MOVSP,#S_BOTT
CALLGET_T
CALLT_PROC
CALLDISPLAY
JMP$-6
;=================================
GET_T:
CALLINIT_18B20
JBNO_18,$+25
MOVA,#0CCH
CALLW_18B20
MOVA,#44H
CALLW_18B20
CALLDISPLAY
CALLINIT_18B20
MOVA,#0CCH
CALLW_18B20
MOVA,#0BEH
CALLW_18B20
CALLR_18B20
RET
;=================================
INIT_18B20:;初始化
CLRDQ;复位
MOVR3,#20;540us
DJNZR3,$
DJNZR3,$
SETBDQ
MOVR3,#30
DJNZR3,$
MOVC,DQ;读状态
MOVNO_18,C
MOVR3,#150
DJNZR3,$;300us
RET
;=================================
W_18B20:
MOVR2,#8;写入8位数
CLRDQ
MOVR3,#6
DJNZR3,$
RRCA
MOVDQ,C
MOVR3,#23
DJNZR3,$
SETBDQ
DJNZR2,$-15
RET
;=================================
R_18B20:;读出温度
MOVR0,#TEMP
MOVR4,#2;读出两字节
MOVR2,#8;读出8位数
CLRDQ
NOP
NOP
NOP
SETBDQ
MOVR3,#9
DJNZR3,$
MOVC,DQ
RRCA
MOVR3,#23
DJNZR3,$
DJNZR2,$-18;读出8位数
MOV@R0,A;先存放到TEMP
INCR0;后读出存TEMP+1
DJNZR4,$-24
RET
;=================================
T_PROC:
JNBNO_18,$+22
;-------------------下面是显示Err
MOV30H,#26
MOV31H,#14;这些地址，如果是高128的地址，
MOV32H,#32;就应该使用间接寻址。
MOV33H,#32;
MOV34H,#31;现在，就用直接寻址吧。
MOV35H,#32
RET
;-------------------下面是数据处理
MOV30H,#0
MOV31H,#0
MOV32H,#0
CLRF0
MOVA,TEMP+1
JNBACC.7,$+16
;-------------------下面是求补
CLRC
CLRA
SUBBA,TEMP
MOVTEMP,A
CLRA
SUBBA,TEMP+1
MOVTEMP+1,A
SETBF0;负号标志
;-------------------下面处理整数
MOVA,TEMP
SWAPA
ANLA,#15
MOVB,A
MOVA,TEMP+1
ANLA,#15
SWAPA
ADDA,B
MOVB,#100
DIVAB
MOV31H,A;百位
MOVA,#10
XCHA,B
DIVAB
MOV32H,A;十位
XCHA,B
ADDA,#16
MOV33H,A
;-------------------下面处理两位小数
MOVA,TEMP;
ANLA,#15;0001~1111=0.0625~0.9375
MOVB,#10
MULAB;乘以10
MOVB,A;暂存
SWAPA;交换到低四位，就是除以16
ANLA,#15;低四位就是十分位小数
MOV34H,A;写入显示位置