標(biāo)題: 51單片機(jī)寫(xiě)的恒溫箱程序 可控硅0，1控制燈泡亮滅 [打印本頁(yè)]
作者: 王大鵬    時(shí)間: 2019-3-24 11:51
標(biāo)題: 51單片機(jī)寫(xiě)的恒溫箱程序 可控硅0，1控制燈泡亮滅
具有按鍵設(shè)置，聲光報(bào)警，顯示，自動(dòng)調(diào)節(jié)等功能
使用DS18B20測(cè)試箱內(nèi)溫度，可控硅0，1控制燈泡亮滅，由此控制溫度，具有LCD1602顯示，按鍵設(shè)置上下限，聲光報(bào)警功能。

單片機(jī)源程序如下:
  1. #include <reg52.h>
  2. #include "temp.h"
  3. #include "lcd.h"

  5. #define uchar unsigned char
  6. #define uint unsigned int
  7.         
  8. sbit key1=P3^1;//+
  9. sbit key2=P3^0;//-
  10. sbit silicon=P2^1;    //可控硅
  11. sbit BZ=P1^5;         //蜂鳴器
  12. sbit LED=P2^0;        //led標(biāo)志位
  13.         
  14. uint temp,temps=26;//溫度緩存變量,設(shè)定溫度變量

  16. void delay(uint us)//延時(shí)函數(shù)
  17. {
  18.         for(;us>0;us--);
  19. }
  20. void keyson()                        //按鍵掃描程序
  21. {
  22.         if(!key1&&temps<60)
  23.         {
  24.                 delay(30);
  25.                 temps++;
  26.                 while(!key1);
  27.         }
  28.         if(!key2&&temps>0)
  29.         {
  30.                 delay(30);
  31.                 temps--;
  32.                 while(!key2);
  33.         }
  34. }
  35. void display()                //lcd1602顯示界面
  36. {
  37.     LcdWriteCom(0x85);//當(dāng)前溫度
  38.                 LcdWriteData('C');
  39.                 LcdWriteData(':');
  40.                 LcdWriteData(temp/10+0x30);
  41.                 LcdWriteData(temp%10+0x30);
  42.                 LcdWriteData(0xdf);
  43.                 LcdWriteData('C');
  44.                 LcdWriteCom(0x80+0x45);//設(shè)置溫度
  45.                 LcdWriteData('S');
  46.                 LcdWriteData(':');
  47.                 LcdWriteData(temps/10+0x30);
  48.                 LcdWriteData(temps%10+0x30);
  49.                 LcdWriteData(0xdf);
  50.                 LcdWriteData('C');
  51. }

  53. void beep()
  54. {
  55.         uchar k,g;
  56.         for (k=0;k<80;k++)
  57.         {
  58.                 BZ=~BZ;
  59.                 for(g=0;g<200;g++);
  60.         }
  61. }

  63. void main()
  64. {
  65.         uint i,j,flag=1,flag1;//標(biāo)志位
  66.         LcdInit();                                                                                                                        //lcd1602初始化
  67.         for(i=0;i<60;i++)
  68.         temp=(float)Ds18b20ReadTemp()*0.0625;
  69.         while(1)
  70.         {
  71.                 temp=(float)Ds18b20ReadTemp()*0.0625;               
  72.                 display();                                                                                                                //lcd1602顯示界面
  73.                 keyson();                                                                                                                        //按鍵掃描程序
  74.                 if(temp<temps)
  75.                 {
  76.                         silicon=0;                                                                         //低于設(shè)定溫度，可控硅打開(kāi)
  77.                         LED=0;
  78.                         flag=1;
  79.                 }
  80.                 if(temp>=temps)
  81.                 {
  82.                         silicon=1;
  83.                         if(flag==1)flag1=1,flag=0;
  84.                 }
  85.                 if(flag1==1)                                                                            //高于設(shè)定溫度，可控硅關(guān)閉，聲光報(bào)警
  86.                 {   
  87.                         LED=0;
  88. //                        BZ=0;
  89. //                        delay(40);
  90. //                        BZ=1;
  91.                         beep();
  92.                         delay(1);                                                           
  93.                         j++;
  94.                         if(j>35)flag1=0,j=0;
  95.                 }
  96.                 else        LED=1,BZ=1;                                       
  97.         }
  98. }
復(fù)制代碼

Keil代碼下載:
恒溫箱-.zip (55.74 KB, 下載次數(shù): 93)


作者: lljj555    時(shí)間: 2020-6-11 10:30
優(yōu)秀，不錯(cuò)
作者: wdi    時(shí)間: 2022-2-1 09:28
謝謝分享 正需要謝謝樓主��！



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1