给你个网站
你可以去看一下
http://www.sinochip.net/TechSheet/67.htm本程序工作过程如下:
;1、开机后首先进行初始化,初始化后显示“P”1秒,提示系统进入测试工作状态,显
; 示完成后,进行温度测试。
;2、温度测试的过程是这样的:
; * T0置为计数方式,对T0脚(即P3.5)的脉冲计数,工作方式2,初值为255
; * 将T1置为定时方式,工作方式2,初值为0
; * 从P3.4口送单稳触发脉冲,使555输出单稳脉冲(正脉冲),该脉冲宽度随热敏
; 电阻阻值而变化。
; * 开T0、T1中断,启动T0、T1。此时T1自动对内部机器周期计数,当TL1溢
; 出时,产生T1中断。在T1中断处理程序中,将RAM 21H单元加1(即21H单
; 元存放脉冲宽计数值高位)后返回主程序。
; * 当来自P3.5的单稳脉冲结束(即下降沿到来)时,TL0计数器加1并溢出,产
; 生T0中断。在T0中断处理程序中,关T0、T1中断,并将TL1中的的内容读
; 到RAM 20H单元(20H单元存放脉宽计数值的低位)。
; * 查表求温度值
; NTTAB是脉宽计数值与温度的对照表,按低温到高温的次序存放,即第一、第
; 二单元存放-100C时的脉宽计数值,依此类推,第121和122单元则存放+500C
; 时的脉宽计数值。
; 将20H、21H中的计数值与NTTAB中的计数值依次进行比较,直至20H、21H
; 中的值小于NTTAB中的计数值为止。而比较的次数就对应温度的整数值,二计
; 数值之差与对照表相邻两计数值的商即为小数位。
;3、程序中除了对-100C到+500C进行测试外,还有开路(计数值过大)、短路检测(计
; 数值过小)、负超温检测、正超温检测,并有相应的显示。
;4、将检测值(温度值或其他结果)显示1秒,然后再重复温度检测。
;需要说明的是:本程序虽包括了测温的全过程,但未考虑软硬件的自检,软件滤波等部
;分。
;电容C4、热敏电阻RT的参数决定单稳脉冲的宽度,而最终的计数值除了与单稳
; 脉冲的宽度有关外,还与晶振频率有关,因而在RT的型号确定后要根据系统对精
; 度和分辨率等的要求选择C4的值。本程序中NTTAB脉宽计数值与温度对照表是在
; 热敏电阻为MF53-1型负温热敏电阻加12K精密电阻与之并联,C4为1μ,晶振为
; 4MHz的条件下得到的。数据不十分准,仅做参考。你可以在元件参数定了后,可在
; 调试程序时用可变电阻箱代替热敏电阻,在程序测出计数值处设断点,读出每个标
; 准阻值所对应的计数值(即20H、21H中的内容),自己将NTTAB建立起来。
; * * * * * * * * * * * * * * * * * * * * * * * * * *
; * 用89C2051控制的数字测温仪 *
; * 源程序清单 *
; * * * * * * * * * * * * * * * * * * * * * * * * * *
ORG 0000H
AJMP MAIN ;转主程序
ORG 000BH
AJMP WT0 ;T0中断入口
ORG 001BH
AJMP WT1 ;T1中断入口
;主程序
ORG 030H
MAIN: MOV IE,#00H ;关中断
MOV SP,#40H ;设堆栈指针SP为40H
SETB P3.5 ;将P3.5口置”1”
MOV 30H,#0CH ;“P3 ”送显示缓冲区30H~33H
MOV 31H,#0EH
MOV 32H,#0EH
MOV 33H,#0EH
MAIN0: ACALL D1S ;调显示1秒子程序
MOV P1,#0FFH ;关显示
CLR 20H ;清脉宽计数值存放区20H~21H
CLR 21H
CLR 22H ;清单稳脉冲结束标志22H
MOV TH0,#0FFH ;置T0计数初值255
MOV TL0,#0FFH
MOV TH1,#00H ;置T1的计数初值0
MOV TL1,#00H
MOV TMOD,#26H ;置T0为计数方式,方式2;T1为定时方式。方式2
SETB EA ;允许T0、T1中断
SETB ET0
SETB ET1
SETB TR0 ;开T0中断
CLR P3.5 ;送单稳触发脉冲
NOP
NOP
NOP
NOP
SETB P3.5
SETB TR1 ;开T1中断
MAIN1: CJNE 22H,#01H,MAIN2 ;单稳脉冲未结束,转检查是否超时
AJMP MAIN3 ;单稳脉冲结束,转取脉宽计数值
MAIN2: CJINE 21H,#08H,MAIN1 ;未超时,转等待单稳脉冲结束
CLR EA
CLR ET0
CLR ET1
CLR TR0
CLR TR1
MOV 30H,#0DH ;开路提示“E1”送显示缓冲区,转显示
MOV 31H,#01H
MOV 32H,#0EH
MOV 33H,#0EH
AJMP MAIN0
MAIN3: CJNE 21H,#00H,MAIN4 ;单稳脉冲结束,先判断是否短路。不是,转查表程序。
MOV 30H,#0DH ;短路,短路提示“E2”送显示缓冲区,转显示
MOV 31H,#02H
MOV 32H,#0EH
MOV 33H,#0EH
AJMP MAIN0
MAIN4: ACALL NTTR ;调查表子程序
AJMP MAIN0
;查表求温度值子程序
NTTR: MOV R2,#00H ;清计数与温度对照表偏移量寄存器R2
MOV DPTR,NTTAB ;DPTR指向计数与温度对照表首址
NTTR1: CLR C ;20H、21H中的内容与NTTRB相减,并将差值存23H、24H
MOV R3,#02H
MOV R0,#20H
MOV R1,#23H
NTTR2: MOV A,R2
MOVC A,@A+DPTR
SUBB A,@R0
MOV @R1,A
INC R0
INC R1
INC R2
CJNE R2,#122,NTTR3 ;若未到NTAB表尾,继续比较
POVER:JC NTTR30 ;到表尾,查到对应温度,转求温度值
MOV 30,#0EH ;到表尾,查到对应温度,正超温提示“UUU”送显缓区
MOV 31H,#0BH
MOV 32H,#0BH
MOV 33H,#0BH
RET ;返回主程序
NTTR3: DJNZ R3,NTTR2
JNC NTTR1 ;未查到对应温度值,继续查表
NTTR30:MOV A,R2 ;已查到对应温度,由偏移量求出整数部分,暂存R4
CLR C
SUBB A,#02H
RR A
MOV R4,A
MOV R1,#23H ;求温度值的小数部分:+X/2送B
MOV A,@R1
CPL A
INC A
RR A
MOV B,A
NTTR4: DEC R2 ;Ni+1送20H、21H
MOV R0,#21H
MOV A,R2
MOVC A,@A+DPTR
MOV @R0, A
DEC R0
DEC R2
MOV A, R2
MOVC A,@A+DPTR
MOV @R0, A
DEC R2 ;求+i/2从A
DEC R2
MOV R3,#02H
CLR C
NTTR5: MOV A,R2
MOVC A,@A+DPTR
SUBB A,@R0
JNC NTTR50
CLP A
INC A
NTTR50:RR A
MOV R5,A
MOV A,B ;+x/2*10/+i得到温度值的小数部分
JZ NTTR6
MOV B, #05H
MUL AB
MOV B,R5
DIV AB
MOV 20H,A ;小数部分送20H
AJMP NTTR7
NTTR6: MOV 20H,#00H
NTTR7: MOV A,#0AH ;判整数部分为正还是负
CLR C
SUBB A,R4
JC PTEMP
NTEMP:CJNE A,#0AH,NTEMP1 ;为负
MOV 30H,#0EH ;“-X”送显示缓冲区高三位
MOV 31H,#0AH
MOV 32H,A
AJMP NTEMP2
NTEMP1:MOV 30H,#0AH ;“-10” 送显示缓冲区高三位
MOV 31H,#01H
MOV 32H,#00H
NTEMP2:MOV A,#0AH ;修正小数部分后,将小数部分送显缓低三位
CLR C
SUBB A,20H
MOV 33H,A
RET ;返回主程序
PTEMP: MOV 30H,#0EH ;为正。“ ”送显缓最高位
MOV A,R4 ;温度值整数部分送显缓中间两位
MOV B,#0AH
DIV AB
JNZ PTEMP1
] MOV 31H,#0EH
JMP PTEMP2
PTEMP1:MOV 31H,A
PTEMP2:MOV 32H,B
MOV 33H,20H ;小数部分送显缓最低位
RET ;返回主程序
;显示子程序(将显缓区的内容循环显示一遍,每位显示1ms后,关显示返回主程序)
DSP: MOV R2,#01H
MOV R0,#30H
MOV DPTR,#TAB
DSP1: MOV A,@R0
MOVC A,@A+DPTR
MOV P1,A
ORL P3,R2
ACALL D1MS
MOV A,R2
RL A
MOV R2,A
CJNE R2,#10H,DSP2
ANL P3,#0F0H
RET
DSP2: INC R0
AJMP DSP1
;延时1ms子程序
D1MS: MOV R7,#166
D1MS1: DJNZ R7,D1MS1
RET
;显示1秒子程序
D1S: MOV R6,#04H
D1S1: MOV R5,#250
D1S2: ACALL DSP
DJNZ R5,D1S2
DJNZ R6,D1S1
RET
;段码表
TAB: DB 40H,79H,24H,30H,19H :0.,1.,2.,3.,4.
DB 12H,02H,78H,00H,10H :5.,6.,7.,8.,9.
DB 3FH,41H,0CH,06H,0FFH :-.,U.,P.,E.,灭
;T0中断处理程序
WT0: MOV A,TL1 ;将T1计数值送20H
MOV 20H,A
CLR EA ;关中断
CLR TR0 ;T0停止计数
CLR TR1 ;T1停止计数
MOV 22H,#01H ;置单稳脉冲结束标志
RETI ;返回主程序
;T1中断处理程序
WT1: INC 21H ;脉宽计数值高位加1
RETI ;返回主程序
;脉宽计数与温度对照表
NTTBL: DB 0D0H,05H,0B2H,05H,96H,05H,72H,05H
DB 52H,05H,35H,05H,15H,05H,0F6H,04H
DB 0D8H,04H,0B9H,04H,9CH,04H,81H,04H
DB 65H,04H,4AH,04H,30H,04H,14H,04H
DB 0FAH,03H,0E0H,03H,0C6H,03H,0ADH,03H
DB 95H,03H,7CH,03H,64H,03H,4CH,03H