找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 2071|回復: 1
打印 上一主題 下一主題
收起左側(cè)

單片機智能家居控制系統(tǒng)源程序

[復制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:539393 發(fā)表于 2019-5-23 10:35 | 只看該作者 |只看大圖 回帖獎勵 |正序瀏覽 |閱讀模式
51單片機智能家居控制系統(tǒng)

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

  8. #include "GTM900.h"

  10. /**********************************************************
  11. *                                AT指令表
  12. **********************************************************/

  14. uchar code AT[]="AT\r";                                      // AT命令
  15. uchar code NEWS_MODEP[]={"AT+CMGF=0\r"};  // 發(fā)送模式選擇為PDU，可以發(fā)送中文字符
  16. uchar code NEWS_LENGP[]={"AT+CMGS=25\r"}; // PDU格式信息長度
  17.                                                                               // PDU格式數(shù)據(jù) 信息內(nèi)容為 家里異常！
  18. uchar code NEWS_CONTP[]={"0891683108704305F011000D91685102506275F70008A70A5BB691CC5F025E38FF01"};

  20. uchar code CALL_ON[]={"ATD15200526577;\r"};     // 撥號
  21. uchar code CALL_OFF[]={"ATH\r"};                                 // 掛機
  22. uchar code CALL_GET[]={"ATA\r"};                                 // 接電話

  24. uchar code NEWS_MODET[]={"AT+CMGF=1\r"};              // 發(fā)送模式選擇為TXT，只能發(fā)送字符
  25. uchar code NEWS_LENGT[]={"AT+CMGS=+8615200526577\r"}; // TXT格式設置接收號碼
  26. uchar code NEWS_CONTT[]={"JZHG1992"};                              // TXT格式數(shù)據(jù) 信息內(nèi)容為 JZHG

  28. //
  29. ///***********************************************************
  30. //* 函數(shù)名稱：*LookFor_Str
  31. //* 函數(shù)功能：查找字符串,在s中查找t
  32. //* 入口參數(shù):無      出口參數(shù)：s_temp(t在s中的位置)成功 0失敗
  33. //***********************************************************/
  34. //
  35. //char *LookFor_Str(uchar *s, uchar *t)
  36. //{
  37. //        uchar    *s_temp;      
  38. //        uchar    *m_temp;      
  39. //        uchar    *t_temp;     
  40. //        if (s == 0 ||t == 0) return 0;
  41. //        for (s_temp = s; *s_temp != '\0'; s_temp++)
  42. //        {
  43. //                m_temp = s_temp;
  44. //                for (t_temp = t; *t_temp == *m_temp; t_temp++, m_temp++);
  45. //                if (*t_temp == '\0') return s_temp;
  46. //        }
  47. //        return 0;
  48. //}

  50. /***********************************************************
  51. * 函數(shù)名稱：Send_ENNews
  52. * 函數(shù)功能：發(fā)送英文短信
  53. *           入口參數(shù):無      出口參數(shù)：無
  54. ***********************************************************/

  56. void Send_ENNews( void )
  57. {

  59.         USART_SendStr(AT);         // 發(fā)送AT
  60.         Delay_nms(100);
  61.         USART_SendStr(NEWS_MODET); // 短信模式選擇
  62.         Delay_nms(100);
  63.         USART_SendStr(NEWS_LENGT); // 信息長度
  64.         Delay_nms(100);
  65.         USART_SendStr(NEWS_CONTT); // 發(fā)送內(nèi)容
  66.         Delay_nms(200);
  67.         USART_SendChar(0x1A);       // 16進制發(fā)送1A
  68. }

  70. /***********************************************************
  71. * 函數(shù)名稱：Send_CHNews
  72. * 函數(shù)功能：發(fā)送中文短信
  73. *           入口參數(shù):無      出口參數(shù)：無
  74. ***********************************************************/

  76. void Send_CHNews( void )
  77. {
  78.         USART_SendStr(AT);      // 發(fā)送AT
  79.         Delay_nms(100);
  80.         USART_SendStr(NEWS_MODEP); // 短信模式選擇
  81.         Delay_nms(100);
  82.         USART_SendStr(NEWS_LENGP); // 信息長度
  83.         Delay_nms(100);
  84.         USART_SendStr(NEWS_CONTP); // 發(fā)送內(nèi)容
  85.         Delay_nms(200);
  86.         USART_SendChar(0x1A);   // 16進制發(fā)送1A
  87.         Delay_nms(10);
  88. }

  90. /***********************************************************
  91. * 函數(shù)名稱：Call
  92. * 函數(shù)功能：撥號
  93. *           入口參數(shù):ONOFF     出口參數(shù)：無
  94. ***********************************************************/

  96. void Call(uchar mode)
  97. {
  98.         if ( mode == CALLON )
  99.         {
  100. ……………………

  102. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
51_·.zip (765.84 KB, 下載次數(shù): 22)

單片機的智能家居管理系統(tǒng)(圖1）.jpg (56.59 KB, 下載次數(shù): 27)

單片機的智能家居管理系統(tǒng)(圖1）.jpg

單片機的智能家居管理系統(tǒng)(圖2）.jpg (44.49 KB, 下載次數(shù): 24)

單片機的智能家居管理系統(tǒng)(圖2）.jpg

單片機的智能家居管理系統(tǒng)(圖3）.jpg (43.34 KB, 下載次數(shù): 26)

單片機的智能家居管理系統(tǒng)(圖3）.jpg

單片機的智能家居管理系統(tǒng)(圖4）.jpg (40.01 KB, 下載次數(shù): 19)

單片機的智能家居管理系統(tǒng)(圖4）.jpg
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

沙發(fā)
ID:76201 發(fā)表于 2020-2-3 23:40 來自手機 | 只看該作者
程序雖好，可惜不好移植！keil5編譯不通過！
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復 返回頂部 返回列表