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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 基于stc15单片机的只能蓝牙温控风扇程序
返回列表 发新帖
查看: 1404|回复: 0
打印 上一主题 下一主题
收起左侧

基于stc15单片机的只能蓝牙温控风扇程序

[复制链接]
跳转到指定楼层
楼主
ID:944617 发表于 2021-6-25 15:46 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
  1. #include <stc15.h>
  2. #include <string.h>
  3. #include <stdio.h>
  4. #include <intrins.h>

  6. #define u8 unsigned char
  7. #define u16 unsigned int
  8. /*串口*/        
  9. #define FOSC 12000000L                         //系统频率
  10. #define BAUD 9600                                 //串口波特率
  11. #define TM (65536 - (FOSC/4/BAUD))
  12. /*LCD1602*/
  13. #define LCD_Set 0x38                   //显示初始化： 16*2显示，5*7点阵，8位数
  14. #define LCD_Clear 0x01                //清屏
  15. #define LCD_Display 0x0C        //显示功能设置：开显示，不显示光标，光标不闪烁
  16. #define LCD_Mode 0x06                //设置光标状态：读一个字符光标加1
  17. #define LCD_1 0x80                        //第一行起始地址
  18. #define LCD_2 (0x80+0x40)        //第二行起始地址
  19. /*EEPROM*/
  20. #define CMD_IDLE 0                 //空闲模式
  21. #define CMD_READ 1                 //IAP字节读命令
  22. #define CMD_PROGRAM 2         //IAP字节编程命令
  23. #define CMD_ERASE 3         //IAP扇区擦除命令
  24. //#define ENABLE_IAP 0x80 //if SYSCLK<30MHz
  25. //#define ENABLE_IAP 0x81 //if SYSCLK<24MHz
  26. #define ENABLE_IAP 0x82 //if SYSCLK<20MHz
  27. //#define ENABLE_IAP 0x83 //if SYSCLK<12MHz
  28. //#define ENABLE_IAP 0x84 //if SYSCLK<6MHz
  29. //#define ENABLE_IAP 0x85 //if SYSCLK<3MHz
  30. //#define ENABLE_IAP 0x86 //if SYSCLK<2MHz
  31. //#define ENABLE_IAP 0x87 //if SYSCLK<1MHz
  32. #define ENABLE_IAP 0x82   
  33. #define  KEY1_PRES  1
  34. #define  KEY2_PRES  2
  35. #define  KEY3_PRES  3
  36. #define  KEY4_PRES  4
  37. sbit KEY1=P3^2;
  38. sbit KEY2=P3^3;
  39. sbit KEY3=P3^4;
  40. sbit KEY4=P3^5;
  41. u8 TEMP_String[10];
  42. u8 HUMI_String[10];
  43. u8 TH_String[4];
  44. u8 TL_String[4];
  45. sbit DHT11_Data=P1^0;
  46. sbit RS=P2^5;
  47. sbit RW=P2^6;
  48. sbit E=P2^7;
  49. sbit IN1=P1^1;
  50. sbit IN2=P1^2;
  51. sbit ENA=P1^3;
  52. sbit LED=P4^5;
  53. sbit Buzz=P5^5;
  54. u16 TH=30;
  55. u16 TL=15;
  56. u8 Flag=0;
  57. float temperature;
  58. void GPIO(void)
  59. {
  60.         P0M0=0;
  61.         P0M1=0;
  62.         P1M0=0;
  63.         P1M1=0;
  64.         P2M0=0;
  65.         P2M1=0;
  66.         P3M0=0;
  67.         P3M1=0;
  68.         P4M0=0;
  69.         P4M1=0;
  70.         P5M0=0;
  71.         P5M1=0;
  72. }

  74. void delay_ms(u16 ms)
  75. {
  76.         u16 i,j;
  77.         for(i=0;i<ms;i++)
  78.                 for(j=0;j<1147;j++);        //在12MHz时，1ms
  79. }
  80. void delay_30us(void)
  81. {
  82.         u16 i;
  83.         for(i=0;i<20;i++)
  84.                 _nop_();        
  85. }
  86. /*写控制命令函数*LCD1602*/
  87. void Write_Command(u8 Comm)
  88. {
  89.         RS=0;
  90.         RW=0;
  91.         P0=Comm;
  92.         E=1;
  93.         delay_ms(1);
  94.         E=0;
  95. }

  97. /*写数据函数*/
  98. void Write_Data(u8 Data)
  99. {
  100.         RS=1;
  101.         RW=0;
  102.         P0=Data;
  103.         E=1;
  104.         delay_ms(1);
  105.         E=0;
  106. }

  108. /*LCD1602初始化*/
  109. void LCD1602_Init(void)
  110. {
  111.         Write_Command(LCD_Set);
  112.         Write_Command(LCD_Display);
  113.         Write_Command(LCD_Mode);
  114.         Write_Command(LCD_Clear);
  115.         delay_ms(5);
  116.         
  117. }
  118. /*LCD1602在某行某列显示一个字符*/
  119. void LCD1602_Print_Char(u8 line,u8 Addr,u8 Data)
  120. {
  121.         if(line)
  122.         {
  123.                 Write_Command(LCD_2+Addr);
  124.                 Write_Data(Data);
  125.                
  126.         }
  127.         else
  128.         {
  129.                 Write_Command(LCD_1+Addr);
  130.                 Write_Data(Data);
  131.                
  132.         }
  133. }
  134. /*LCD1602在某行显示一串字符*/
  135. void LCD1602_Print_String(u8 line,u8 *table)
  136. {
  137.         u8 i;
  138.         if(line)
  139.         {
  140.                 Write_Command(LCD_2);
  141.         }
  142.         else
  143.         {
  144.                 Write_Command(LCD_1);
  145.         }
  146.         for(i=0;i<16;i++)
  147.         {
  148.                 Write_Data(table[i]);
  149.         }
  150. }
  151. //复位DHT11
  152. void DHT11_Rst(void)           
  153. {                 
  154.     DHT11_Data=0;         //拉低Data
  155.     delay_ms(20);            //至少18ms
  156.     DHT11_Data=1;         //Data=1
  157.          delay_30us();
  158. }
  159. //等待DHT11的回应
  160. //返回1:未检测到DHT11的存在
  161. //返回0:存在
  162. u8 DHT11_Check(void)            
  163. {   
  164.         u8 retry=0;
  165.         while (DHT11_Data&&retry<100)//DHT11会拉低40~80us
  166.         {
  167.                 retry++;
  168.         }         
  169.         if(retry>=100)return 1;
  170.         else retry=0;
  171.     while (!DHT11_Data&&retry<100)//DHT11拉低后会再次提高40~80us
  172.         {
  173.                 retry++;
  174.         }
  175.         if(retry>=100)return 1;            
  176.         return 0;
  177. }
  178. //从DHT11读取一个位
  179. //返回值：1/0
  180. u8 DHT11_Read_Bit(void)                          
  181. {
  182.          u8 retry=0;
  183.         while(DHT11_Data&&retry<100)//等待变成低电平
  184.         {
  185.                 retry++;
  186.         }
  187.         retry=0;
  188.         while(!DHT11_Data&&retry<100)//等待变成高电平
  189.         {
  190.                 retry++;
  191.         }
  192.         delay_30us();
  193.         if(DHT11_Data)return 1;
  194.         else return 0;                  
  195. }
  196. //从DHT11读取一个字节
  197. //返回值：读到的数据
  198. u8 DHT11_Read_Byte(void)   
  199. {        
  200.     u8 i,dat;
  201.     dat=0;
  202.         for (i=0;i<8;i++)
  203.         {
  204.                    dat<<=1;
  205.                      dat|=DHT11_Read_Bit();
  206.     }                                                   
  207.     return dat;
  208. }
  209. //从DHT11读取一次数据
  210. //temp:温度值(范围:0~50°)
  211. //humi:湿度值(范围:20%~90%)
  212. //返回值：0,正常;1,读取失败
  213. u8 DHT11_Read_Data(u8 *temp,u8 *humi)   
  214. {        
  215.          u8 buf[5];
  216.         u8 i;
  217.         DHT11_Rst();
  218.         if(DHT11_Check()==0)
  219.         {
  220.                 for(i=0;i<5;i++)//读取40位数据
  221.                 {
  222.                         buf[i]=DHT11_Read_Byte();
  223.                 }
  224.                 if((buf[0]+buf[1]+buf[2]+buf[3])==buf[4])
  225.                 {
  226.                         *humi=buf[0];
  227.                         *temp=buf[2];
  228.                 }
  229.         }
  230.         else return 1;
  231.         return 0;            
  232. }
  233. //初始化DHT11的IO口 DQ 同时检测DHT11的存在
  234. //返回1:不存在
  235. //返回0:存在
  236. u8 DHT11_Init(void)
  237. {
  238.         DHT11_Rst();
  239.         return DHT11_Check();
  240. }
  241. void OtoC2(u8 value,u8 String[ ])
  242. {
  243.         String[0]=value/10+0x30;
  244.         String[1]=value%10+0x30;

  246. }
  247. void String_Join2bit(u8 Long_String [],u8 Short_String[],u8 Position)
  248. {
  249.          u8 i;
  250.         for(i=0;i<2;i++)
  251.                 Long_String[Position+i]=Short_String[i];        
  252. }
  253. /*按键扫描程序*/
  254. u8 KEY_Scan(u8 mode)
  255. {
  256.     static u8 key_up=1;//按键松开标志
  257.     if(mode)key_up=1; //支持连按
  258.     if(key_up&&(KEY1==0||KEY2==0||KEY3==0||KEY4==0))
  259.     {
  260.         delay_ms (10);//去抖动
  261.         key_up=0;
  262.         if(KEY1==0)
  263.                           return KEY1_PRES;
  264.         else if(KEY2==0)
  265.                           return KEY2_PRES;
  266.                                 else if(KEY3==0)
  267.                           return KEY3_PRES;
  268.                                 else if(KEY4==0)
  269.                           return KEY4_PRES;
  270.     }
  271.     else if(KEY1==1&&KEY2==1&&KEY3==1&&KEY4==1)
  272.         key_up=1;
  273.     return 0;// 无按键按下
  274. }
  275. /*----------------------------
  276.                         关闭IAP
  277. ----------------------------*/
  278. void IapIdle()
  279. {
  280.         IAP_CONTR = 0;         //关闭IAP功能
  281.         IAP_CMD = 0;                 //清除命令寄存器
  282.         IAP_TRIG = 0;                 //清除触发寄存器
  283.         IAP_ADDRH = 0x80; //将地址设置到非IAP区域
  284.         IAP_ADDRL = 0;
  285. }
  286. /*----------------------------
  287. 从ISP/IAP/EEPROM区域读取一字节
  288. ----------------------------*/
  289. u8 IapReadByte(u16 addr)
  290. {
  291.         u8 dat;                                                         //数据缓冲区
  292.         IAP_CONTR = ENABLE_IAP;         //使能IAP
  293.         IAP_CMD = CMD_READ;                         //设置IAP命令
  294.         IAP_ADDRL = addr;                         //设置IAP低地址
  295.         IAP_ADDRH = addr >> 8;                 //设置IAP高地址
  296.         IAP_TRIG = 0x5a;                                 //写触发命令(0x5a)
  297.         IAP_TRIG = 0xa5;                                 //写触发命令(0xa5)
  298.         _nop_();                                                 //等待ISP/IAP/EEPROM操作完成
  299.         dat = IAP_DATA;                                 //读ISP/IAP/EEPROM数据
  300.         IapIdle();                                                 //关闭IAP功能
  301.         return dat;                                         //返回
  302. }
  303. /*----------------------------
  304. 写一字节数据到ISP/IAP/EEPROM区域
  305. ----------------------------*/
  306. void IapProgramByte(u16 addr, u8 dat)
  307. {
  308.         IAP_CONTR = ENABLE_IAP;         //使能IAP
  309.         IAP_CMD = CMD_PROGRAM;                 //设置IAP命令
  310.         IAP_ADDRL = addr;                         //设置IAP低地址
  311.         IAP_ADDRH = addr >> 8;                 //设置IAP高地址
  312.         IAP_DATA = dat;                                 //写ISP/IAP/EEPROM数据
  313.         IAP_TRIG = 0x5a;                                 //写触发命令(0x5a)
  314.         IAP_TRIG = 0xa5;                                 //写触发命令(0xa5)
  315.         _nop_();                                                 //等待ISP/IAP/EEPROM操作完成
  316.         IapIdle();
  317. }

  319. /*----------------------------
  320.                         扇区擦除
  321. ----------------------------*/
  322. void IapEraseSector(u16 addr)
  323. {
  324.         IAP_CONTR = ENABLE_IAP;         //使能IAP
  325.         IAP_CMD = CMD_ERASE;                 //设置IAP命令
  326.         IAP_ADDRL = addr;                         //设置IAP低地址
  327.         IAP_ADDRH = addr >> 8;                 //设置IAP高地址
  328.         IAP_TRIG = 0x5a;                                 //写触发命令(0x5a)
  329.         IAP_TRIG = 0xa5;                                 //写触发命令(0xa5)
  330.         _nop_();                                                 //等待ISP/IAP/EEPROM操作完成
  331.         IapIdle();
  332. }
  333. /*PWM初始化*/
  334. void PWM_Init(void)
  335. {
  336.         P_SW1 &= ~(1<<4|1<<5);         //在P1.0、P1.1输出        
  337.         CCON = 0;         //初始化PCA寄存器
  338.         CL = 0;         //复位PCA寄存器
  339.         CH = 0;
  340.         CMOD = 0x02;                 //设置PCA时钟源SYSCLK/2
  341.         PCA_PWM0  = 0x00;         //PCA模块0工作于8位PWM
  342.         CCAP0H = CCAP0L = 0x00;         //PWM0的占空比为100%
  343.         CCAPM0 = 0x42;         //允许比较器功能、脉宽调节输出
  344.         CR = 1;                 //PCA定时器开始工作
  345. }
  346. /*风扇转动*/
  347. void zhuan(float temperature)
  348. {               
  349.                 u8 i;
  350.         if((temperature>TH)&&(Flag==0)) //如果温度大于上限，则报警20次，并且使用全力风速
  351.                   
  352.         {//                IN1=1;
  353.                         IN2=0;
  354.                         
  355.                         for(i=0;i<20;i++)
  356.                         {
  357.                         LED=0;
  358.                         Buzz=0;
  359.                         delay_ms (100);
  360.                         LED=1;
  361.                         Buzz=1;
  362.                         delay_ms (100);
  363.                         }
  364.                         CCAP0H = CCAP0L = 0x00; //PWM0的占空比为100%
  365.                         Flag=1;
  366.                 }
  367.                
  368.          else if((TL<temperature)&&(temperature<TH))//大于下限，小于上限则为中速风力
  369.                 {
  370. //                IN1=~IN1;
  371.                         IN2=0;
  372.                         LED=1;
  373.                         Buzz=1;
  374.                         CCAP0H = CCAP0L = 0x80;//PWM0的占空比为50%
  375.       Flag=0;                        
  376.                 }
  377.                 else if((temperature<TL)&&(Flag==0))//小于下限则停止转动
  378.                 {
  379. //                IN1=1;
  380.                         IN2=0;
  381.                         for(i=0;i<20;i++)
  382.                         {
  383.                         LED=0;
  384.                         Buzz=0;
  385.                         delay_ms (100);
  386.                         LED=1;
  387.                         Buzz=1;
  388.                         delay_ms (100);
  389.                         }
  390.                         CCAP0H = CCAP0L = 0xFF; //PWM0的占空比为0%
  391.                         Flag=1;
  392.                 }
  393. }
  394. /*串口中断程序*/
  395. void Uart1_INT() interrupt 4 using 1//使用蓝牙遥控；
  396. {
  397.         u8 Ch;
  398.         if (RI)
  399.         {
  400.                 RI = 0;         //清除RI位
  401.                 Ch= SBUF;         //将接收到的字符保存
  402.                 switch (Ch)        
  403.                 {
  404.                         case '1':
  405.                         {
  406.                                 TH++;
  407.                         IapEraseSector(0);
  408.                         IapProgramByte(0,TH);        //写EEPROM上限
  409.                         IapProgramByte(1,TL);        //写EEPROM下限
  410.                                 break;
  411.                         }
  412.                         case '2':
  413.                         {
  414.                                 TH--;
  415.                         IapEraseSector(0);
  416.                         IapProgramByte(0,TH);        //写EEPROM上限
  417.                         IapProgramByte(1,TL);        //写EEPROM下限
  418.                                 break;
  419.                         }
  420.                         case '3':
  421.                         {
  422.                                 TL++;
  423.                         IapEraseSector(0);
  424.                         IapProgramByte(0,TH);        //写EEPROM上限
  425.                         IapProgramByte(1,TL);        //写EEPROM下限
  426.                                 break;
  427.                         }
  428.                         case '4':
  429.                         {
  430.                                 TL--;
  431.                         IapEraseSector(0);
  432.                         IapProgramByte(0,TH);        //写EEPROM上限
  433.                         IapProgramByte(1,TL);        //写EEPROM下限
  434.                                 break;
  435.                         }
  436.                         case '5':
  437.                         {
  438.                                 IN2=0;
  439.                                 CCAP0H = CCAP0L = 0x00; //PWM0的占空比为100%
  440.                                 break;
  441.                         }
  442.                         case '6':
  443.                         {
  444.                                 IN1=1;
  445.                                 IN2=1;
  446.                                 break;
  447.                         }
  448.                         case 'G':
  449.                         {
  450.                                 IN2=0;
  451.                                 CCAP0H = CCAP0L = 0x40; //PWM0的占空比为75%
  452.                                 break;
  453.                         }
  454.                         case 'K':
  455.                         {
  456.                                 IN2=0;
  457.                                 CCAP0H = CCAP0L = 0xC0; //PWM0的占空比为25%
  458.                                 break;
  459.                         }
  460.                 }
  461.         }
  462. }
  463. /*串口初始化*/
  464. void UART1_Init(void)
  465. {
  466.         SCON = 0x50;        //方式1，8位UART，波特率可变
  467.         AUXR |= 1<<2|1<<0;         //定时器2为1T模式，UART1使用T2
  468. //        TMOD = 0x00;         //定时器1为模式0(16位自动重载)
  469.         T2L = TM; //设置波特率重装值
  470.         T2H = TM>>8;
  471.         AUXR |= 1<<4; //定时器2启动
  472.         ES = 1; //使能串口中断
  473.         EA = 1;
  474. }

  476. int main(void)
  477. {
  478.         u8 t=0;
  479.         u8 temperature=0;              
  480.         u8 humidity=0;
  481. //        u8 TH_EEPROM_Value,TL_EEPROM_Value;        定义EEPROM温度上下限变量  
  482.         u8 String1[]="T:   C  H:   %Rn ";               
  483.         u8 String2[]="TL:    ,TH:      ";
  484.         u8 Stirng_Error[ ]="  DHT11 Error!  ";
  485.         GPIO();
  486.         PWM_Init();
  487.         UART1_Init();
  488.         LCD1602_Init();
  489.         TH=IapReadByte(0);        //读取EEPROM
  490.         TL=IapReadByte(1);
  491.                         IapProgramByte(0,TH);        //写EEPROM上限
  492.                         IapProgramByte(1,TL);        //写EEPROM下限
  493.         while(DHT11_Init())
  494.                 LCD1602_Print_String(0,Stirng_Error);
  495.         while(1)
  496.                 {        t=KEY_Scan(0);  //得到键值
  497.           switch(t)
  498.           {
  499.                  case KEY1_PRES:
  500.                  {
  501.                          TH++;
  502.                          IapEraseSector(0);
  503.                         IapProgramByte(0,TH);        //写EEPROM上限
  504.                         IapProgramByte(1,TL);        //写EEPROM下限
  505.                          break;
  506.                  }
  507.                  case KEY2_PRES:
  508.                  {
  509.                         TH--;
  510.                         IapEraseSector(0);
  511.                         IapProgramByte(0,TH);        //写EEPROM上限
  512.                         IapProgramByte(1,TL);        //写EEPROM下限
  513.                         break;
  514.                  }
  515.                  case KEY3_PRES:
  516.                  {
  517.                         TL++;
  518.                         IapEraseSector(0);
  519.                         IapProgramByte(0,TH);        //写EEPROM上限
  520.                         IapProgramByte(1,TL);        //写EEPROM下限
  521.                         break;
  522.                  }
  523.                  case KEY4_PRES:
  524.                  {
  525.                         TL--;
  526.                         IapEraseSector(0);
  527.                         IapProgramByte(0,TH);        //写EEPROM上限
  528.                         IapProgramByte(1,TL);        //写EEPROM下限
  529.                         break;
  530.                  }
  531.           }
  532.                         DHT11_Read_Data(&temperature,&humidity) ;
  533.                         OtoC2(temperature,TEMP_String);        
  534.                         String_Join2bit(String1,TEMP_String,2);        
  535.                         OtoC2(humidity,HUMI_String);                 
  536.                         String_Join2bit(String1,HUMI_String,10);
  537.                         OtoC2(TH,TH_String);        
  538.                         String_Join2bit(String2,TH_String,11);
  539.                         OtoC2(TL,TL_String);
  540.                         String_Join2bit(String2,TL_String,3);
  541.                         LCD1602_Print_String(0,String1);        
  542.                         LCD1602_Print_String(1,String2);
  543.                         zhuan(temperature);
  544.                 }
  545. }

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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