找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1668|回复: 1
收起左侧

单片机智能家居控制系统源程序

[复制链接]
ID:539393 发表于 2019-5-23 10:35 | 显示全部楼层 |阅读模式
51单片机智能家居控制系统 单片机的智能家居管理系统(图9).jpg 单片机的智能家居管理系统(图8).jpg 单片机的智能家居管理系统(图7).jpg 单片机的智能家居管理系统(图6).jpg 单片机的智能家居管理系统(图5).jpg

单片机源程序如下:
  1. /******************************
  2. * File Name:  GTM900.C
  3. * Author   :  JZHG
  4. * Time     :  2012-10-25
  5. * Version  :  V1-0
  6. *******************************/

  7. #include "GTM900.h"

  8. /**********************************************************
  9. *                                AT指令表
  10. **********************************************************/

  11. uchar code AT[]="AT\r";                                      // AT命令
  12. uchar code NEWS_MODEP[]={"AT+CMGF=0\r"};  // 发送模式选择为PDU,可以发送中文字符
  13. uchar code NEWS_LENGP[]={"AT+CMGS=25\r"}; // PDU格式信息长度
  14.                                                                               // PDU格式数据 信息内容为 家里异常!
  15. uchar code NEWS_CONTP[]={"0891683108704305F011000D91685102506275F70008A70A5BB691CC5F025E38FF01"};

  16. uchar code CALL_ON[]={"ATD15200526577;\r"};     // 拨号
  17. uchar code CALL_OFF[]={"ATH\r"};                                 // 挂机
  18. uchar code CALL_GET[]={"ATA\r"};                                 // 接电话

  19. uchar code NEWS_MODET[]={"AT+CMGF=1\r"};              // 发送模式选择为TXT,只能发送字符
  20. uchar code NEWS_LENGT[]={"AT+CMGS=+8615200526577\r"}; // TXT格式设置接收号码
  21. uchar code NEWS_CONTT[]={"JZHG1992"};                              // TXT格式数据 信息内容为 JZHG

  22. //
  23. ///***********************************************************
  24. //* 函数名称:*LookFor_Str
  25. //* 函数功能:查找字符串,在s中查找t
  26. //* 入口参数:无      出口参数:s_temp(t在s中的位置)成功 0失败
  27. //***********************************************************/
  28. //
  29. //char *LookFor_Str(uchar *s, uchar *t)
  30. //{
  31. //        uchar    *s_temp;      
  32. //        uchar    *m_temp;      
  33. //        uchar    *t_temp;     
  34. //        if (s == 0 ||t == 0) return 0;
  35. //        for (s_temp = s; *s_temp != '\0'; s_temp++)
  36. //        {
  37. //                m_temp = s_temp;
  38. //                for (t_temp = t; *t_temp == *m_temp; t_temp++, m_temp++);
  39. //                if (*t_temp == '\0') return s_temp;
  40. //        }
  41. //        return 0;
  42. //}

  43. /***********************************************************
  44. * 函数名称:Send_ENNews
  45. * 函数功能:发送英文短信
  46. *           入口参数:无      出口参数:无
  47. ***********************************************************/

  48. void Send_ENNews( void )
  49. {

  50.         USART_SendStr(AT);         // 发送AT
  51.         Delay_nms(100);
  52.         USART_SendStr(NEWS_MODET); // 短信模式选择
  53.         Delay_nms(100);
  54.         USART_SendStr(NEWS_LENGT); // 信息长度
  55.         Delay_nms(100);
  56.         USART_SendStr(NEWS_CONTT); // 发送内容
  57.         Delay_nms(200);
  58.         USART_SendChar(0x1A);       // 16进制发送1A
  59. }

  60. /***********************************************************
  61. * 函数名称:Send_CHNews
  62. * 函数功能:发送中文短信
  63. *           入口参数:无      出口参数:无
  64. ***********************************************************/

  65. void Send_CHNews( void )
  66. {
  67.         USART_SendStr(AT);      // 发送AT
  68.         Delay_nms(100);
  69.         USART_SendStr(NEWS_MODEP); // 短信模式选择
  70.         Delay_nms(100);
  71.         USART_SendStr(NEWS_LENGP); // 信息长度
  72.         Delay_nms(100);
  73.         USART_SendStr(NEWS_CONTP); // 发送内容
  74.         Delay_nms(200);
  75.         USART_SendChar(0x1A);   // 16进制发送1A
  76.         Delay_nms(10);
  77. }

  78. /***********************************************************
  79. * 函数名称:Call
  80. * 函数功能:拨号
  81. *           入口参数:ONOFF     出口参数:无
  82. ***********************************************************/

  83. void Call(uchar mode)
  84. {
  85.         if ( mode == CALLON )
  86.         {
  87. ……………………

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

所有资料51hei提供下载:
51_·.zip (765.84 KB, 下载次数: 22)
单片机的智能家居管理系统(图1).jpg
单片机的智能家居管理系统(图2).jpg
单片机的智能家居管理系统(图3).jpg
单片机的智能家居管理系统(图4).jpg
回复

使用道具 举报

ID:76201 发表于 2020-2-3 23:40 来自手机 | 显示全部楼层
程序虽好,可惜不好移植!keil5编译不通过!
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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