设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 恒流PT100温度检测报警装置单片机程序与仿真 测温范围-9 ...
返回列表 发新帖
查看: 8057|回复: 4
打印 上一主题 下一主题
收起左侧

恒流PT100温度检测报警装置单片机程序与仿真 测温范围-99～400℃

  [复制链接]
跳转到指定楼层
楼主
ID:291815 发表于 2019-6-12 18:56 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
基于PT100的温度检测报警装置仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


运放电源电压必须得6V,否则输出电压不准。 AD转换ADC0832的电压需要为5V
数字式温度计  测温范围,-99～400℃

（-100度测试）RV1=60Ω    显示温度-99.2度 误差0.5度
（0度测试）RV1=100Ω    显示温度0.5度 ，误差0.5度
（100度测试）RV1=140Ω    显示温度103.5度，误差0.5度
（200度左右测试）RV1=180Ω    显示温度214.2度，误差约0.5度
（300度左右测试）RV1=210Ω    显示温度292.8度，误差约1度
（380度左右测试）RV1=240Ω    显示温度380度，误差约0.5度

单片机源程序如下:
  1. /*一、主要功能：
  2. （1）PT100数字温度计.
  3. （2）采集测温范围为-99 ℃～400 ℃.
  4. （3) 精度4度，误差+-2度.
  5. （4）显示模块，采用4个LED数码管显示.
  6. (5) 蜂鸣器报警温度大于50度报警。
  7. */
  8. #include<reg52.h>
  9. #include<intrins.h>
  10. #define uint unsigned int
  11. #define uchar unsigned char
  12. //-----------------------
  13. sbit SEG1=P2^0;                    //段码位1
  14. sbit SEG2=P2^2;                    //段码位2  
  15. sbit SEG3=P2^4;                    //段码位3
  16. sbit SEG4=P2^6;                    //段码位4

  18. sbit CS  = P1^0; //ADC0832片选
  19. sbit CLK = P1^1; //ADC0832时钟
  20. sbit DIO = P1^2; //输入输出

  22. sbit BUZ = P3^0; //蜂鸣器报警设置

  24. uchar dispaly[3];         //显示缓冲
  25. uchar tem[11]={10,10,20,13,11,11,15,21,18,29,11};
  26. uchar  ng;                                  //负号标志
  27. uchar code tab[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x58,0x00,0x40};//共阴数码码表01000000
  28.                  /* 0    1    2   3    4    5    6    7    8    9     C   无*/
  29. uchar Display_Digit[]={0,0,0,0};//待显示的各温度数位
  30. //延时
  31. //************************************************************************/
  32. // 函数: LCD_Delay()
  33. // 描述: 延时t ms函数
  34. // 参数: t
  35. // 返回: 无
  36. // 备注: 12MHZ       t=1延时时间约1ms
  37. // 版本:  2011/01/01      First version
  38. //************************************************************************/
  39. void Delay_ms(unsigned int t)//延时1ms
  40. {
  41.         unsigned int i,j;
  42.         for(i=0;i<t;i++)
  43.         for(j=0;j<120;j++)
  44.         ;
  45. }
  46. /*******************
  47. 中值滤波函数
  48. *********************/
  49. uchar median(uchar *dat,uchar num_d)  //需要排序的数组
  50. { uchar i,j,temp;
  51. for (i=0;i<num_d;i++) //采用冒泡法对采样温度进行排序
  52.         for (j=0;j<num_d-i;j++)
  53.         {
  54.                 if (dat[i]>dat[i+1])
  55.                 {
  56.                         temp=dat[i];
  57.                         dat[i]=dat[i+1];
  58.                         dat[i+1]=temp;
  59.                 }
  60.         }
  61. return(dat[(num_d-1)/2]); //取中值并返回
  62. }
  63. /*******************电阻值计算函数*********************/
  64. float account_res(void)
  65. {        uchar temp;
  66.         float temp_r,d;

  68.         temp=median(tem,11); //利用中值法求取中间值
  69.         d = temp*500.0/256;//采集到的PT100上的压降
  70.         temp_r=d*3135/4096;//计算出电阻值 3300是R1
  71.         return(temp_r);
  72. }

  74. /*****************计算温度函数*******************/
  75. float temperature(void)
  76. { float temp1,T_out;
  77. uchar temp2;

  79. temp1=account_res(); //计算Pt100阻值
  80. temp2=(uint)temp1; //取Pt100阻值高位
  81. if(temp2<100){ng=1;}else{ng=0;}//负温度
  82. if(temp2<60) T_out=777;
  83.   else if(temp2<100) T_out=256.02-2.558*temp1; //若阻值在小于0℃到负99之间
  84.   else if(temp2<139) T_out=2.558*temp1-256.02; //若阻值在0~100℃之间
  85.   else if(temp2<177) T_out=2.637*temp1-267.01; //若阻值在100~200℃之间
  86.   else if(temp2<214) T_out=2.766*temp1-281.9; //若阻值在200~300℃之间
  87.   else if(temp2<250) T_out=2.865*temp1-300.94;  //若阻值在300~400℃之间
  88.   else if(temp2<260) T_out=2.81*temp1-300.94;  //若阻值在400℃之间
  89.   else if(temp2>260) T_out=777; //若阻值在大于400℃之间
  90.   return(T_out);
  91. }

  93. /*******************调整显示数据函数*******************/
  94. void adj_t(void)
  95. {
  96.         float temp_v;
  97.         uint value;          
  98.         temp_v=10*temperature(); //利用计算温度值
  99.         value=(uint)temp_v;
  100. if((value>500)&&(ng==0)){BUZ=0;}else{BUZ=1;}//蜂鸣器50度报警，开，关蜂鸣器

  102.         if(value==7770) //超出测量范围
  103.         {         Display_Digit[0]=12; //显示'E'
  104.                 Display_Digit[1]=12; //显示'E'
  105.                 Display_Digit[2]=12; //显示'E'
  106.                 Display_Digit[3]=12; //显示'E'
  107.         }
  108.         else {  Display_Digit[3]=value/1000; //待显示百位
  109.                     Display_Digit[2]=(value%1000)/100; //待显示十位
  110.                     Display_Digit[1]=((value%1000)%100)/10; //待显示个位
  111.                            Display_Digit[0]=(value%1000)%100%10; //待显示小数
  112.                 if(Display_Digit[3]==0x00) { Display_Digit[3]=11; if(Display_Digit[2]==0) Display_Digit[2]=11; }
  113.         }
  114. }

  116. void DIS_SEG(void)//在LED上显示数据
  117. {
  118.                         if(ng==1){P0=0x40;}else{P0=tab[Display_Digit[3]];}   // 数码管显示负数 或正的1000位
  119.                         SEG1=0;                    //片选1000位数码管      
  120.                         Delay_ms(2);    //延时3ms
  121.             SEG1=1;                         //关闭1000位数码管

  123.                         P0=tab[Display_Digit[2]]; //温度100位     
  124.                         SEG2=0;                        //片选100位数码管
  125.                         Delay_ms(2);    //延时3ms
  126.             SEG2=1;                 //关闭100位数码管

  128.                         P0=(tab[Display_Digit[1]]+0x80); //温度10位
  129.                         SEG3=0;                        //片选10位数码管
  130.                         Delay_ms(2);    //延时3ms
  131.             SEG3=1;                 //关闭10位数码管

  133.                     P0=tab[Display_Digit[0]];    //个数位
  134.                         SEG4=0;                        //片选个位数码管
  135.                         Delay_ms(2);    //延时3ms
  136.             SEG4=1;                 //关闭个位数码管
  137. }
  138. //------------------------------------------------------------------------
  139. //获取指定通道的A/D转换结果
  140. //------------------------------------------------------------------------
  141. uchar Get_AD_Result(void)
  142. {
  143.         uchar i,dat1=0,dat2=0;

  145.         CS  = 0; _nop_(); _nop_();                                                 //片选使能，低电平有效
  146.         CLK = 0; _nop_(); _nop_();                                                  //芯片时钟输入
  147.         DIO = 1; _nop_(); _nop_();
  148.         CLK = 1; _nop_(); _nop_();
  149.         //第1个下降沿之前，设DI=1/0
  150.         //选择单端/差分(SGL/DIF)模式中的单端输入模式       
  151.         CLK = 0;DIO = 1; _nop_(); _nop_();
  152.         CLK = 1;         _nop_(); _nop_();
  153.         //第2个下降沿之前,设置DI=0/1,选择CHO/CH1

  155.         CLK = 0;DIO = 0; _nop_(); _nop_(); //通道0 内部电压测试

  157.         CLK = 1;                 _nop_(); _nop_();
  158.         //第3个下降沿之前,设置DI=1
  159.         CLK = 0;DIO = 1; _nop_(); _nop_();
  160.    //第4-11个下降沿读数据(MSB->LSB)
  161.         for(i=0;i<8;i++)
  162.         {
  163.                  CLK = 1; _nop_(); _nop_();
  164.                 CLK = 0; _nop_(); _nop_();
  165.                 dat1 = dat1 << 1 | DIO;               
  166.         }
  167.         //第11-18个下降沿读数据(LSB->MSB)
  168.         for(i=0;i<8;i++)
  169.         {
  170.                 CLK = 1; _nop_(); _nop_();
  171.                 CLK = 0; _nop_(); _nop_();
  172.                  dat2 = dat2 << ((uchar)(DIO)<<i);
  173.         }
  174.         CS = 1;//取消片选一个周期结束
  175.         //如果MSB->LSB和LSB->MSB读取的结果相同,则返回读取的结果,否则返回0
  176.         return dat1;
  177. //        return (dat1 == dat2) ? dat1:0;//取消校验
  178. }

  180. void main(void)
  181. {   uchar j;
  182.         BUZ=1;//关蜂鸣器
  183.         while(1)
  184.         {
  185.         tem[0]=Get_AD_Result(); //读取温度值存入缓冲区
  186.         tem[1]=Get_AD_Result(); //读取温度值存入缓冲区
  187.         tem[2]=Get_AD_Result(); //读取温度值存入缓冲区
  188.         tem[3]=Get_AD_Result(); //读取温度值存入缓冲区
  189.         tem[4]=Get_AD_Result(); //读取温度值存入缓冲区
  190.         tem[5]=Get_AD_Result(); //读取温度值存入缓冲区
  191.         tem[6]=Get_AD_Result(); //读取温度值存入缓冲区
  192.         tem[7]=Get_AD_Result(); //读取温度值存入缓冲区
  193.         tem[8]=Get_AD_Result();        //读取温度值存入缓冲区
  194.         tem[9]=Get_AD_Result(); //读取温度值存入缓冲区
  195.         tem[10]=Get_AD_Result();//读取温度值存入缓冲区       
  196.         adj_t();// 调整显示数据函数//50度报警。
  197.         for(j=0;j<250;j++){DIS_SEG();}//显示数据
  198.    }
  199. }
复制代码

所有资料51hei提供下载:
51heiPT100.zip (125.77 KB, 下载次数: 235)


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏7 分享淘帖 顶顶 踩踩
回复

使用道具 举报

来自 2#
ID:328014 发表于 2020-6-30 14:49 | 只看该作者

楼上 可以用啊,


运放电源电压必须得6V,否则输出电压不准。 AD转换ADC0832的电压需要为5V
（-100度测试）RV1=60Ω    显示温度-99.2度 误差0.5度
（0度测试）RV1=100Ω    显示温度0.5度 ，误差0.5度
（100度测试）RV1=140Ω    显示温度103.5度，误差0.5度
（200度左右测试）RV1=180Ω    显示温度214.2度，误差约0.5度
（300度左右测试）RV1=210Ω    显示温度292.8度，误差约1度
（380度左右测试）RV1=240Ω    显示温度380度，误差约0.5度


回复

使用道具 举报

板凳
ID:683006 发表于 2020-6-30 14:43 | 只看该作者
这个如何使用呢?还一不小心下了两次，扣了两次
回复

使用道具 举报

地板
ID:800656 发表于 2020-7-9 21:41 | 只看该作者
？PT100在哪
回复

使用道具 举报

5#
ID:548707 发表于 2021-5-20 17:37 | 只看该作者
大佬，请问这个有多路巡检的吗
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表