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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机DIY制作 › 10元成本制作1637数码管STC15F104单片机温度计LM75A可交 ...
返回列表 发新帖
查看: 3187|回复: 1
收起左侧

10元成本制作1637数码管STC15F104单片机温度计LM75A可交替显示设定温度成功

[复制链接]
ID:358930 发表于 2018-12-5 22:46 | 显示全部楼层 |阅读模式
因T友要求，分享下使用STCF104E单片机加1637数码管IIC接囗，只用2根线，加LM75A温控头IIC接囗，制作的温度控制器。实测很稳定，只用一个按键完成温度设置，42-99度。正常工作时实测温度和设置温度交替显示，成本很低。不到10元。现上源代码

制作出来的实物图如下：
20181205_221245.jpg 20181205_221029.jpg 20181205_221220.jpg

单片机源程序如下:
  1. #include <stc15.h>
  2. #include <INTRINS.H>
  3. #include <stdio.h>
  4. #include  <intrins.h>
  5. #define uchar unsigned char
  6. #define uint  unsigned int
  7. /* ***************************************************** */
  8. // 起别名定义
  9. /* ***************************************************** */
  10. typedef unsigned char uChar8;
  11. typedef unsigned int  uInt16;
  12. typedef enum{FALSE,TRUE} BOOL;
  13. /* ***************************************************** */
  14. // 宏定义
  15. /* ***************************************************** */
  16. #define LM75ADevIDAddr 0x90         
  17. #define IIC_WRITE 0x00
  18. #define IIC_READ  0x01
  19. /* ***************************************************** */
  20. // 位定义
  21. /* ***************************************************** */
  22. sbit SCL = P3^2;//绿色线
  23. sbit SDA = P3^3;//白色线
  24. long int LM75WD;//定义一个温度长整型变量
  25. sbit out = P3^5;//输出继电器
  26. sbit k = P3^4;//调节温度
  27. int set;//设置温度


  30. /* ***************************************************** */
  31. // 全局变量定义
  32. /* ***************************************************** */
  33. bit p_bH0L_Flag;                                        // 温度"0"上、下标志位
  34. float p_fLM75ATemp;                                        // 温度值

  36. /* ***************************************************** */
  37. // 函数名称：Delay5US()
  38. // 函数功能：微秒延时
  39. // 入口参数：延时微秒数（ValUS）
  40. // 出口参数：无
  41. /* ***************************************************** */
  42. void Delay5US(void)
  43. {
  44.        unsigned char i;

  46.         _nop_();
  47.         i = 11;
  48.         while (--i);
  49. }
  50. /* ***************************************************** */
  51. // 函数名称：DelayMS()
  52. // 函数功能：毫秒延时
  53. // 入口参数：延时毫秒数（ValMS）
  54. // 出口参数：无
  55. /* ***************************************************** */
  56. void DelayMS(uInt16 ValMS)
  57. {
  58.        unsigned char i, j;

  60.         _nop_();
  61.         _nop_();
  62.         _nop_();
  63.         i = 11;
  64.         j = 190;
  65.         do
  66.         {
  67.                 while (--j);
  68.         } while (--i);
  69. }



  73. /* ***************************************************** */
  74. // 函数名称：IIC_Start()
  75. // 函数功能：IIC起动
  76. // 入口参数：无
  77. // 出口参数：无
  78. /* ***************************************************** */
  79. void IIC_Start(void)
  80. {
  81.         SDA = 1;
  82.         Delay5US();
  83.         SCL = 1;
  84.         Delay5US();
  85.         SDA = 0;
  86.         Delay5US();
  87. }
  88. /* ***************************************************** */
  89. // 函数名称：IIC_Stop()
  90. // 函数功能：IIC停止
  91. // 入口参数：无
  92. // 出口参数：无
  93. /* ***************************************************** */
  94. void IIC_Stop(void)                     
  95. {
  96.         SDA = 0;
  97.         Delay5US();
  98.         SCL = 1;
  99.         Delay5US();
  100.         SDA =1;
  101. }
  102. /* ***************************************************** */
  103. // 函数名称：IIC_Ack()
  104. // 函数功能：IIC应答
  105. // 入口参数：无
  106. // 出口参数：无
  107. /* ***************************************************** */
  108. void IIC_Ack(void)                     
  109. {
  110.         SCL = 0;                                // 为产生脉冲准备
  111.         SDA = 0;                                // 产生应答信号
  112.         Delay5US();                                // 延时你懂得
  113.         SCL = 1;Delay5US();  
  114.         SCL = 0;Delay5US();                // 产生高脉冲
  115.         SDA = 1;                                // 释放总线
  116. }
  117. /* ***************************************************** */
  118. // 函数名称：IIC_RdAck()
  119. // 函数功能：读IIC应答
  120. // 入口参数：无
  121. // 出口参数：是否应答真值
  122. /* ***************************************************** */
  123. BOOL IIC_RdAck(void)                     
  124. {
  125.         BOOL AckFlag;
  126.         uChar8 uiVal = 0;
  127.         SCL = 0;Delay5US();   
  128.         SDA = 1;
  129.         SCL = 1;Delay5US();
  130.         while((1 == SDA) && (uiVal < 255))
  131.         {
  132.                 uiVal ++;
  133.                 AckFlag = SDA;
  134.         }
  135.         SCL = 0;  
  136.         return AckFlag;                // 应答返回：0;不应答返回：1
  137. }
  138. /* ***************************************************** */
  139. // 函数名称：IIC_Nack()
  140. // 函数功能：IIC不应答
  141. // 入口参数：无
  142. // 出口参数：无
  143. /* ***************************************************** */
  144. void IIC_Nack(void)                    
  145. {   
  146.         SDA = 1;
  147.         SCL = 0;Delay5US();      
  148.         SCL = 1;Delay5US();      
  149.         SCL = 0;
  150. }
  151. /* ***************************************************** */
  152. // 函数名称：OutputOneByte()
  153. // 函数功能：从IIC器件中读出一个字节
  154. // 入口参数：无
  155. // 出口参数：读出的一个字节（uByteVal）
  156. /* ***************************************************** */
  157. uChar8 OutputOneByte(void)        
  158. {
  159.         uChar8 uByteVal = 0;
  160.         uChar8 iCount;
  161.         SDA = 1;
  162.         for (iCount = 0;iCount < 8;iCount++)
  163.         {
  164.                 SCL = 0;
  165.                 Delay5US();
  166.                 SCL = 1;
  167.                 Delay5US();
  168.                 uByteVal <<= 1;
  169.                 if(SDA)
  170.                         uByteVal |= 0x01;
  171.         }         
  172.         SCL = 0;
  173.         return(uByteVal);
  174. }
  175. /* ***************************************************** */
  176. // 函数名称：InputOneByte()
  177. // 函数功能：向IIC器件写入一个字节
  178. // 入口参数：待写入的一个字节（uByteVal）
  179. // 出口参数：无
  180. /* ***************************************************** */
  181. void InputOneByte(uChar8 uByteVal)
  182. {
  183.     uChar8 iCount;
  184.     for(iCount = 0;iCount < 8;iCount++)
  185.         {  
  186.                 SCL = 0;
  187.                 Delay5US();                        
  188.                 SDA = (uByteVal & 0x80) >> 7;
  189.                 Delay5US();         
  190.                 SCL = 1;
  191.                 Delay5US();
  192.                 uByteVal <<= 1;
  193.     }
  194.         SCL = 0;            
  195. }
  196. /* ***************************************************** */
  197. // 函数名称：IIC_WrDevAddAndDatAdd()
  198. // 函数功能：向IIC器件写入器件和数据地址
  199. // 入口参数：器件地址（uDevAdd），数据地址（uDatAdd）
  200. // 出口参数：写入是否成功真值
  201. /* ***************************************************** */
  202. BOOL IIC_WrDevAddAndDatAdd(uChar8 uDevAdd,uChar8 uDatAdd)
  203. {
  204.         IIC_Start();                        // 发送开始信号
  205.         InputOneByte(uDevAdd);        // 输入器件地址
  206.         IIC_RdAck();                          // 读应答信号
  207.         InputOneByte(uDatAdd);        // 输入数据地址
  208.         IIC_RdAck();                        // 读应答信号
  209.         return TRUE;         
  210. }
  211. /* ***************************************************** */
  212. // 函数名称：IIC_RdDatFromAdd()
  213. // 函数功能：向IIC器件读数据
  214. // 入口参数：器件ID(uDevID)、数据存储地址(uStaAddVal)
  215. //                         待存数据(*p)、连续存储数据的个数(uiLenVal)
  216. // 出口参数：无
  217. /* ***************************************************** */
  218. void IIC_RdDatFromAdd(uChar8 uDevID, uChar8 uStaAddVal, uChar8 *p, uChar8 uiLenVal)
  219. {                                                   
  220.         uChar8 iCount;
  221.         IIC_WrDevAddAndDatAdd(uDevID | IIC_WRITE,uStaAddVal);  
  222.         IIC_Start();
  223.         InputOneByte(uDevID | IIC_READ);
  224.         // IIC_READ 为写命令后缀符
  225.         IIC_RdAck();     
  226.         for(iCount = 0;iCount < uiLenVal;iCount++)
  227.         {
  228.                 *p++ = OutputOneByte();
  229.                    if(iCount != (uiLenVal - 1))
  230.                         IIC_Ack();                 
  231.         }      
  232.         IIC_Nack();        
  233.         IIC_Stop();         
  234. }
  235. /* ***************************************************** */
  236. // 函数名称：LM75A_ReadReg()
  237. // 函数功能：读LM75A任意寄存器值
  238. // 入口参数：寄存器地址(addr),uLenVal,读出字节的长度
  239. // 出口参数：寄存器内容(*val)
  240. /* ***************************************************** */
  241. void LM75A_ReadReg(uChar8 addr, uChar8 *val, uChar8 uLenVal)
  242. {
  243.         IIC_RdDatFromAdd(LM75ADevIDAddr, addr, val, uLenVal);
  244. }
  245. /* ***************************************************** */
  246. // 函数名称：LM75A_TempConv()
  247. // 函数功能：温度转换
  248. // 入口参数：无
  249. // 出口参数：无
  250. /* ***************************************************** */
  251. void LM75A_TempConv(void)
  252. {
  253.         uChar8 TempML[2]={0};                                                // 临时数值，用于存放Temp的高低字节
  254.         uInt16 uiTemp;                                                                // 用于存放Temp的11位字节数据
  255.         LM75A_ReadReg(0x00,TempML,2);                                // 读出温度，并存于数组TempHL中
  256.         uiTemp = (uInt16)TempML[0];                                        // 将高字节存入变量uiTemp中
  257.         uiTemp = (uiTemp << 8 | TempML[1]) >> 5;        // 接着并入后3位，最后右移5位就是11位补码数（8+3共11位）
  258.         /* ***** 首先判断温度是“0上”还是是“0下” ***** */        
  259.         if(!(TempML[0] & 0x80))                                                // 最高位为“0”则为“0上”
  260.         {
  261.                 p_bH0L_Flag = 0;
  262.                 p_fLM75ATemp = uiTemp * 0.125;        
  263.         }
  264.         else                                                                                // 这时为“0下”（p_fLM75ATemp）℃
  265.         {
  266.                 p_bH0L_Flag = 1;
  267.                 p_fLM75ATemp = (0x800 - uiTemp) * 0.125;// 由于计算机中负数是以补码形式存的，所以有这样的算法。
  268.         }
  269. }

  271. sbit SCL1=P3^0; //CLK
  272. sbit SDA1=P3^1; //DIO
  273. unsigned char code xsbcdbuf[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77};

  275. void Delay1000ms()                //@11.0592MHz
  276. {
  277.         unsigned char i, j, k;

  279.         _nop_();
  280.         _nop_();
  281.         i = 43;
  282.         j = 6;
  283.         k = 203;
  284.         do
  285.         {
  286.                 do
  287.                 {
  288.                         while (--k);
  289.                 } while (--j);
  290.         } while (--i);
  291. }


  294. void IIC_delay(void)
  295. {
  296.     unsigned char i;
  297.     for(i=0;i<20;i++) _nop_();
  298. }
  299. void start_IIC(void)// 启动IIC

  301. {
  302.     SCL1=1; //给芯片发送开始信号
  303.     SDA1=1;
  304.     IIC_delay();
  305.     SDA1=0;
  306.     IIC_delay();
  307.     SCL1=0; //开始信号传送完
  308.     IIC_delay();
  309. }
  310. void stop_IIC(void) //停止IIC
  311. {
  312.     SCL1=0;
  313.     IIC_delay();
  314.     SDA1=0;
  315.     IIC_delay();
  316.     SCL1=1;
  317.     IIC_delay();
  318.     SDA1=1;
  319. }
  320. void ack_IIC()
  321. {
  322.     SCL1=0;
  323.     _nop_();_nop_();_nop_();
  324.     while(SDA1);
  325.     SCL1=1;
  326.     _nop_();_nop_();_nop_();
  327.     SCL1=0;
  328. }
  329. void WriteByte(unsigned char WriteData) //写一个字节数据
  330. {
  331.     unsigned char i;
  332.     for(i=0;i<8;i++)//开始传送8位数据，每循环一次传送一位数据
  333.     {
  334.         SCL1=0;
  335.         IIC_delay();
  336.         WriteData=WriteData>>1;
  337.         SDA1=CY;
  338.         IIC_delay();
  339.         SCL1=1;
  340.         IIC_delay();
  341.     }
  342. //8位数据传送完
  343.     ack_IIC(); //判断芯片发过来的ACK应答信号
  344. }
  345. void write_LEDSROM(unsigned char addr,unsigned char WData) //写一字节数据到LEDSROM
  346. {
  347.     start_IIC(); //调用开始信号
  348.     WriteByte(addr); //写起始地址命令（0C0H），地址00H单元。
  349.     WriteByte(WData);//给显示寄存器写显示数据，值可根据实参改变
  350.     stop_IIC(); //调用结束信号，一个字节命令发送完毕，可以发送下一个命令
  351. }


  354. void dsplay(int temp) //显示
  355. {
  356.           
  357.     SDA1=1;
  358.     SCL1=1;
  359.     start_IIC(); //调用开始信号
  360.     WriteByte(0x40);//写命令40H(数据设置)
  361.     stop_IIC(); //调用结束信号，一个字节命令发送完毕，可以发送下一个命令
  362.        
  363.        
  364.     write_LEDSROM(0xC0,xsbcdbuf[temp/1000]); //第一个数码管
  365.    // write_LEDSROM(0xC1,xsbcdbuf[temp%1000/100]);  //第二个数码管,0x80打开DP小数点
  366.           write_LEDSROM(0xC1,xsbcdbuf[temp%1000/100]|0x80);  //第二个数码管,0x80打开DP小数点
  367.     write_LEDSROM(0xC2,xsbcdbuf[temp%100/10]); //第三个数码管
  368.          //write_LEDSROM(0xC3,xsbcdbuf[temp%10]);//第四个数码管
  369.        
  370.     write_LEDSROM(0xC3,0x39);//第四个数码管
  371.        
  372.        
  373.        
  374.        
  375.        
  376.     IIC_delay();
  377.     start_IIC(); //调用开始信号
  378.     WriteByte(0x8a); //送开屏命令，(8BH），亮度可以根据低三位调节。//显示亮度
  379.     stop_IIC(); //调用结束信号，一个字节命令发送完毕，可以发送下一个命令
  380. }
  381. void dsplay2(int temp) //显示
  382. {
  383.           
  384.     SDA1=1;
  385.     SCL1=1;
  386.     start_IIC(); //调用开始信号
  387.     WriteByte(0x40);//写命令40H(数据设置)
  388.     stop_IIC(); //调用结束信号，一个字节命令发送完毕，可以发送下一个命令
  389.        
  390.        
  391.     write_LEDSROM(0xC0,xsbcdbuf[temp/1000]); //第一个数码管
  392.     write_LEDSROM(0xC1,xsbcdbuf[temp%1000/100]);  //第二个数码管,0x80打开DP小数点
  393.          // write_LEDSROM(0xC1,xsbcdbuf[temp%1000/100]|0x80);  //第二个数码管,0x80打开DP小数点
  394.    // write_LEDSROM(0xC2,xsbcdbuf[temp%100/10]); //第三个数码管
  395.          //write_LEDSROM(0xC3,xsbcdbuf[temp%10]);//第四个数码管
  396.        
  397.     //write_LEDSROM(0xC3,0x39);//第四个数码管
  398.        
  399.             write_LEDSROM(0xC3,0x00);//第4个数码管//关闭
  400.             write_LEDSROM(0xC2,0x00);//第3个数码管
  401.        
  402.        
  403.     IIC_delay();
  404.     start_IIC(); //调用开始信号
  405.     WriteByte(0x8a); //送开屏命令，(8BH），亮度可以根据低三位调节。//显示亮度
  406.     stop_IIC(); //调用结束信号，一个字节命令发送完毕，可以发送下一个命令
  407. }
  408. /* ***************************************************** */
  409. // 函数名称：main()
  410. // 函数功能：读取LN75A温度值，数码管显示并串口打印
  411. // 入口参数：无
  412. // 出口参数：无
  413. /* ***************************************************** */
  414. void main()
  415. {
  416. ……………………

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

所有资料51hei提供下载:
1637数显STC15F104E LM75A温度OK2.zip (50.93 KB, 下载次数: 62)

评分

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

查看全部评分

回复

使用道具 举报

ID:358930 发表于 2018-12-5 22:49 | 显示全部楼层
源代码错了，帮从源文件粘贴下，谢谢
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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