找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4814|回复: 0
打印 上一主题 下一主题
收起左侧

单片机热敏电阻测温源代码

[复制链接]
跳转到指定楼层
楼主
ID:77322 发表于 2018-1-21 11:51 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
单片机热敏电阻测温
源程序如下:

  1. #include<reg52.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char

  4. sfr P1ASF=0x9d;
  5. sfr ADC_RES=0xbd;
  6. sfr ADC_CONTR=0xbc;

  7. #define ADC_POWER 0x80
  8. #define ADC_FLAG 0x10
  9. #define ADC_START 0x08

  10. #define ADC_SPEEDLL 0x00 //0000 0000
  11. #define ADC_SPEEDL 0x20  //0010 0000
  12. #define ADC_SPEEDH 0x40  //0100 0000
  13. #define ADC_SPEEDHH 0x60 //0110 0000

  14. void delay(uint z); //延时函数
  15. void initADC();        //初始化AD功能


  16. uint code Ttable[42][2]={// 此数组保存热敏电阻的温度值(从2-43摄氏度),2℃对应25.7K;超出无效
  17. {2,257},{3,246},{4,236},{5,225},{6,216},
  18. {7,207},{8,198},{9,190},{10,182},{11,174},
  19. {12,167},{13,160},{14,154},{15,148},{16,142},
  20. {17,136},{18,131},{19,126},{20,121},{21,116},
  21. {22,112},{23,107},{24,103},{25,100},{26,96},
  22. {27,92},{28,89},{29,86},{30,82},{31,80},{32,77},
  23. {33,74},{34,71},{35,69},{36,66},{37,64},{38,62},
  24. {39,60},{40,58},{41,56},{42,54},{43,52}
  25. };   

  26. uchar code table[13]={//共阴 数码管数字0-9
  27. 0x3F, 0x06, 0x5B, 0x4F, 0x66, 0x6D,0x7D, 0x07, 0x7F, 0x6F/*0-9*/,
  28. 0x00/*无*/, 0x02/*|*/, 0x39/*C*/,};

  29. uchar code table_wela [4]={//数码管位置0-3
  30. 0xef,0xdf,0xbf,0x7f};//1110 1111;        1101 1111;        1011 1111;        0111 1111

  31. uchar  show[4];

  32. void delay(uint z)
  33. {
  34.         uint x,y;
  35.         for(x=20;x>0;x--)
  36.         for(y=z;y>0;y--);
  37. }

  38. /****************************************************
  39. 函数名称 : void adc_isr() interrupt 5
  40. 功能描述 : AD 中断 , 获取 AD 数据
  41. 输 入 : 无
  42. 输 出 : show
  43. 全局变量 : show
  44. 调用模块 : delay **************************/
  45. void Adc_isr() interrupt 5//Interrupt Service Routines=ISR中断服务程序
  46. {
  47.         uchar i;
  48.         uint m;
  49.         m=ADC_RES; // 计算此时热敏电阻阻值
  50.         m=(100*m)/(255-m); // 计算此时的温度值
  51.         for(i=41;i<42;i--)
  52.         {
  53.                 if(m>=Ttable[i][1]&&m<Ttable[i-1][1])
  54.                 {
  55.                         show[0]=(Ttable[i][0]+1)/10; //十位
  56.                         show[1]=(Ttable[i][0]+1)%10; //个位
  57.                         show[2]=11;                                 //温度符号       
  58.                         show[3]=12;
  59.                         break;
  60.                 }
  61.         }
  62.         ADC_CONTR=ADC_POWER|ADC_SPEEDLL|ADC_START|0x01; // 重新 使能 AD 转换
  63. }

  64. /******************************************************
  65. 函数名称 : void initADC()
  66. 功能描述 : 初始化 AD 功能
  67. 输 入 : 无
  68. 输 出 : 无
  69. 全局变量 : 无
  70. 调用模块 : delay *********************************************************/
  71. void initADC()
  72. {
  73.         P1ASF=0xff;
  74.         ADC_RES=0;
  75.         delay(800);
  76.         ADC_CONTR=ADC_POWER|ADC_SPEEDLL|ADC_START|0x01;// 使能 P11 为 AD 输入
  77.         IE=0xa0;//1010 0000等价于: EA=1; EADC=1;
  78.         delay(5);
  79. }

  80. void main()
  81. {
  82. ……………………

  83. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
附源码-单片机设计之热敏电阻测温.rar (1.33 KB, 下载次数: 85)


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

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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