基于EMP78P156单片机的RC测温的实现
加入技术交流群
一、总体控制电路：
本文引用地址：https://www.eepw.com.cn/article/201611/316077.htm
图 1
二、RC测温原理：
利用单片机I/O口来实现RC测温，电路很简单，而且也不难实现，最主要的是要有个概念，如何实RC测温，也就是RC测温的原理。这里具体的介绍一下，可以在这个原理基础上进行修改很扩展为多路的测温。如下图（2）
图中：
P1.0、P1.1和P1.2是单片机的3个I/O口；
RK为100K精密电阻；
RT为100K—精度为1%的热敏电阻；
R1为100 的普通电阻；
C1为瓷介电容。
工作原理：
1. 先将P1.0、P1.1和P1.2设为低电平输出，延时0.5s ，使C1放电完。
2. 将P1.1和P1.2设置为输入状态，P1.0输出高电平，通过RK电阻给C1充电，单片机内部的计数器开始计时，并且不断的检测P1.2状态，当P1.2为高电平时，即当C1的电压达到了单片机高电平输入的门限电压时，根据计数的值来确定从开始充电到P1.2转变为高电平的时间T1。
3. 将P1.0、P1.1和P1.2设为低电平输出，延时0.5s ，使C1放电完。
4. 再将P1.0和P1.2设置为输入状态，P1.1输出高电平，通过RT电阻给C1充电，单片机内部的计数器开始计时，并且不断的检测P1.2状态，当P1.2为高电平时，即当C1的电压达到了单片机高电平输入的门限电压时，根据计数的值来确定从开始充电到P1.2转变为高电平的时间T2。
5. 电容电压计算公式：
所以 ，这样我们可以通过计算来得到热敏电阻的阻值，通过查表来得到测量的温度值。
注：我们可以根据需要把R1也换成热敏电阻，来实现两路温度的检测，理论上N个I/O口可以测量N-1个温度。也可以把电容一端接VCC，那么当C1充满的时候检测端口电压就是低电平。
三、实际程序举例
/******RC测温程序********/
/*单片机：EM78P156*/
/*晶振：4MHZ*/
/*编者：郑文*/
/*日期：2007.01.31*/
/*功能：RC测温*/
/************************/
/*说明：精密电阻充电时间计数值存放地址：RF_DA
/*热敏电阻充电时间计数值存放地址：RS_DA
/*寄存器及变量定义*/
R0EQU 0X00
TCCEQU 0X01
CONTEQU 0X01
PCEQU 0X02
STATUSEQU 0X03
CEQU 0
DCEQU 1
ZEQU 2
R4EQU 0X04
RSREQU 0X04
IOC5EQU 0X05
PORT5EQU 0x05
IOC6EQU 0X06
PORT6EQU 0x06
;***************************
;***************************
IOCAEQU 0X0A
IOCBEQU 0X0B
IOCCEQU 0X0C
IOCDEQU 0X0D
IOCEEQU 0X0E
RFEQU 0X0F
IOCFEQU 0X0F
;**************************
;**************************
T_SETEQU 0X1F;温度设置值寄存器
T_MEASEQU 0X20;当前测得温度值
AD_DA
AD_DA
RF_DA
RF_DA
RS_DA
RS_DA
XSWEQU 0X2A;显示位，判断哪位可以正在点亮
BACCEQU 0X2D;ACC备份寄存器
BSTATUSEQU 0X2E;STATUS备份寄存器
LA_CNT1EQU 0X2F
FLAG1EQU 0X30
LPEQU 0;LP放电标志位
HAVEDISEQU 1;放电时间计数标志位
RS_OVEREQU 4
REF_OVEREQU 5
AD_EEQU 6;采样正在进行标志位
AD_TYPEEQU 7;采样类型，是参考电阻采样还是传感器电阻采样
/********************************************/
ORG00H
JMPSTART
ORG08H
JMPINT_TCC ;进入中断程序
;*******************************************
;=================================================
START:
CALL INITAITE ;程序初始化
MAIN:
MAIN2:
CALL ADCONVER ;RC测温RC时间测量
JMPMAIN
;**************************************************
INITAITE:
MOVA,@0B00000000;BIT6特殊，预分频器分给计数器，分频比为1：2，
CONTW;上升沿触发，内部时钟源，中断屏蔽。
MOVA,@0B00000000;5口定义为输出口
IOWIOC5
MOVA,@0B00000000;6口定义为输出口
IOWIOC6
MOVA,@0B00000000
IOWIOCE;WITE=0禁止WDT,EIS=0定义P60口为双向IO口而不是中断口；
MOVA,@0B00000001
IOWIOCF;定时器中断允许
ENI;开中断,整个程序执行过程，中断一直是起用的
RET
/**********************************************************
*程序名称：AD程序
************************************************************/
;---------
;|P6.3|----------P5.1
;||____|
;|P6.5|--|____|--|P5.2
;||___/|
;|P5.4|--|__/_|--|P5.0
;||/---
;||--- c
;|||
;---------+5v
;***********************************************************
;;;;;;;;;;;;;;;;;;;RC转换测量;;;;;;;;;;;;;;;;;;;;;;;;;
ADCONVER:
JBCFLAG1,AD_E;是否正在进行AD采样，1 EN, 0 DIS
JMPADQUIT
JBCFLAG1,HAVEDIS;放电时间是否到
JMPREF_SENSOR
;;;;;;;;;;;;;;;;;;;;;;;;
IORIOC6;置P6.3,P6.4,P6.5输出，为AD采样做好准备
ANDA,@0B11000111
IOWIOC6
BSPORT6,3;P5.0,P5.1,P5.2输出为1，对电容进行放电
BSPORT6,4
BSPORT6,5
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CLRLA_CNT1;清放电时间计数
BSFLAG1,LP; LP置高表示放电结束
BSFLAG1,AD_E;使能AD采样
RET
REF_SENSOR:
BCFLAG1,HAVEDIS
BCFLAG1,AD_TYPE;正在采样的是参考电阻还是传感器：1 REF REGISTER, 0 SENSOR
MPAD_1;正在对参考电阻进行采样
;对传感器电阻进行采样
MOVA,AD_DA
MOVRS_DA
MOVA,AD_DA
MOVRS_DA
BSFLAG1,RS_OVER
BSFLAG1,AD_TYPE
IORIOC6;SET port6.3,port6.4 INPORT，port6.5 EXPORT
ORA,@0B00011000
ANDA,@0B11011111
IOWIOC6
MOVA,@231;REF START COUNT
MOVTCC,A
MOVA,@0
MOVAD_DA
MOVAD_DA
BCPORT6,5
BSFLAG1,AD_E;置正在采样标志位
JMPADQUIT
AD_1:;对参考电阻进行采样
MOVA,AD_DA
MOVRF_DA
MOVA,AD_DA
MOVRF_DA
BSFLAG1,REF_OVER
BCFLAG1,AD_TYPE;清零AD_TYPE
IORIOC6
ORA,@0B00101000
ANDA,@0b11101111;port6.3,port6.5 INPORT，port6.4 EXPORT
IOWIOC6
MOVA,@231;SENSOR START COUNT
MOVTCC,A
MOVA,@0
MOVAD_DA
MOVAD_DA
BCPORT6,4
BSFLAG1,AD_E
ADQUIT:
RET
;******************************************************
INT_TCC:
MOVBACC,A;保护ACC和STATUS
SWAPASTATUS
MOVBSTATUS,A
JBSRF,0;判断是否为计数器中断，如果是得话进入
;计数器中断服务程序，不是则退出
JMPINTQUIT
MOVA,@231;赋初始值给TCC
MOVTCC,A
BCRF,0;RF可以指令清零，但不能置1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
LAPSE_TIMER:
JBSFLAG1,LP;放电0.1S计时(LP放电标志位)
JMPTCC_1;如果放电没结束则跳转到TCC_1
INCLA_CNT1;如果放电结束了，执行
MOVA,@255
XORA,LA_CNT1
JBSSTATUS,Z
MPTCC_1;如果不等于255则跳转到TCC_1
BCFLAG1,AD_E;采样正在进行的标志位清0(AD采样不使能)
BSFLAG1,HAVEDIS ;放电时间标志位为1（表示已经计时0.5秒，足够放完电）
BCFLAG1,LP;放电结束，放电标志位清零
TCC_1:
JBSFLAG1,AD_E;判断AD采样使能?
JMPINTQUIT;不使能就跳出中断
JBCFLAG1,LP;判断放电标志位使能?
JMPINTQUIT;不使能就跳出中断
INCAD_DA
JBSSTATUS,Z
JMPTCC_0
INCAD_DA
MOVA,AD_DA
XORA,@120
JBSSTATUS,Z
JMPTCC_0
BCFLAG1,AD_E;AD采样不使能
JMPINTQUIT
TCC_0:
JBCPORT6,3;检测P51口电平是否变化
JMPINTQUIT;没有变化就跳出中断
BCFLAG1,AD_E;如果P51为0则停止采样
INTQUIT:
SWAPABSTATUS;恢复寄存器
MOVSTATUS,A
SWAPBACC
SWAPABACC
RETI
END
评论