找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開(kāi)始

搜索
查看: 6437|回復(fù): 14
打印 上一主題 下一主題
收起左側(cè)

GPRSA6-51單片機(jī)代碼（撥號(hào),短信控制led燈等試驗(yàn)程序）

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
GPRSA6-51代碼（內(nèi)有例程）

包含以下4個(gè)源碼：
1.撥號(hào)實(shí)驗(yàn)
2.發(fā)送TEXT短信實(shí)驗(yàn)
3.發(fā)送PDU中文短信
4.短信控制led燈

完整源碼下載：
GPRSA6-51代碼.zip (385.87 KB, 下載次數(shù): 112)






短信控制led燈的單片機(jī)源碼（部分預(yù)覽）：
  1. /**************************************************************
  2.          果云科技  GPRS A6  模塊      
  3.                                  
  4.           51 單片機(jī)例程       適用于 STC15F 系列
  5.                
  6.                 實(shí)驗(yàn)內(nèi)容 ：  短信控制LED 燈


  9. UART1 映射到 P36 P37口      用手機(jī)分別發(fā)送   ledaon 、 ledaoff  、 ledbon 、ledboff   四條短信 分別來(lái)控制兩個(gè)LED亮滅   一定要區(qū)分大小寫(xiě)
  10.                
  11. PS： A6模塊上電注冊(cè)是要一定的時(shí)間的！


  14. 串口1全雙工中斷方式收發(fā)通訊程序。本例程使用11.0592MHZ時(shí)鐘，如要改變，請(qǐng)修改下面的"定義主時(shí)鐘"的值并重新編譯。

  16. 串口設(shè)置為：115200,8,n,1.

  18. 通過(guò)PC向MCU發(fā)送數(shù)據(jù), MCU收到后通過(guò)串口把收到的數(shù)據(jù)原樣返回.

  20. ******************************************/



  24. /*************        本地常量聲明        **************/
  25. #define MAIN_Fosc                11059200L        //定義主時(shí)鐘
  26. #define        BaudRate1                115200UL        //選擇波特率


  29. #define        Timer1_Reload        (65536UL -(MAIN_Fosc / 4 / BaudRate1))                //Timer 1 重裝值， 對(duì)應(yīng)300KHZ
  30. #define        Timer2_Reload        (65536UL -(MAIN_Fosc / 4 / BaudRate1))                //Timer 2 重裝值， 對(duì)應(yīng)300KHZ

  32. #include "STC15Fxxxx.H"
  33. #include "delay.h"
  34. #include "string.h"
  35. #include "Exti.h"

  37. /*************        本地變量聲明        **************/

  39. #define Automatic_Startup 1     //定義自啟動(dòng) V1.2版本起有自啟動(dòng)功能
  40. #define Buf1_Max 60                                           //串口1緩存長(zhǎng)度
  41. #define Buf2_Max 60                                           //串口2緩存長(zhǎng)度
  42. //串口1發(fā)送回車(chē)換行
  43. #define UART1_SendLR() UART1_SendData(0X0D);\
  44.                                                                                          UART1_SendData(0X0A)


  47. /*************        本地常量聲明        **************/
  48. //sbit RUNING_LED = P1^2;                                        //運(yùn)行指示燈
  49. sbit LEDA                          = P1^3;                                        //測(cè)試用LED
  50. sbit LEDB       = P1^0;
  51. sbit LEDC       = P1^5;


  54. /*************  本地變量聲明        **************/
  55. xdata u8 Uart1_Buf[Buf1_Max];
  56. u8 Register_Flag=0;  //A6  注冊(cè)標(biāo)志位  1 ：注冊(cè)成功  3：注冊(cè)失敗   5：注冊(cè)成功，但處于漫游狀態(tài)下，無(wú)法撥打電話發(fā)短信
  57. u8 Times=0,First_Int = 0,shijian=0;


  60. bdata u8 Flag;//定時(shí)器標(biāo)志位
  61. sbit Timer0_start =Flag^0;        //定時(shí)器0延時(shí)啟動(dòng)計(jì)數(shù)器


  64. /*************        本地函數(shù)聲明        **************/
  65. void USART1_Init(void);   //串口1初始化
  66. void Timer0Init(void);                //20毫秒@11.0592MHz
  67. void CLR_Buf1(void);      //清串口接收緩存
  68. u8 Find(u8 *a);           //查找字符串
  69. void Second_AT_Command(u8 *b,u8 *a,u8 wait_time) ;//a6 at命令發(fā)送
  70. void Set_TEXT_Mode(void);
  71. void Check_New_Message(void);
  72. void UART1_SendData(u8 dat);//串口1發(fā)送 1字節(jié)
  73. void UART1_SendString(char *s);//串口1發(fā)送 字符串
  74. void Wait_CREG(void);


  77. /**********************************************/
  78. void main(void)
  79. {
  80.   USART1_Init();//串口初始化
  81.         Timer0Init();//TIM0初始化
  82.         Wait_CREG();//等待GSM注冊(cè)成功
  83.         Set_TEXT_Mode();//設(shè)置為T(mén)EXT模式
  84.   
  85.         while (1)
  86.         {
  87.     Check_New_Message();//短信檢測(cè)
  88.                  
  89.         }
  90. }

  92. /********************* UART1中斷函數(shù)************************/
  93. void UART1_int (void) interrupt UART1_VECTOR
  94. {
  95.         if (RI)
  96.     {
  97.       RI = 0;                           //清除RI位
  98.                         Uart1_Buf[First_Int] = SBUF;            //將接收到的字符串存到緩存中
  99.                         First_Int++;                                        //緩存指針向后移動(dòng)
  100.                         if(First_Int > Buf1_Max)                       //如果緩存滿,將緩存指針指向緩存的首地址
  101.                         {
  102.                                 First_Int = 0;
  103.                         }
  104.     }
  105.     if (TI)
  106.     {
  107.         TI = 0;                          //清除TI位
  108.     }
  109. }

  111. void USART1_Init(void)
  112. {
  113.         S1_8bit();                                //8位數(shù)據(jù)
  114.         //S1_USE_P30P31();                //UART1 使用P30 P31口        默認(rèn)
  115.         S1_USE_P36P37();                //UART1 使用P36 P37口
  116.         //S1_USE_P16P17();                //UART1 使用P16 P17口
  117.         AUXR &= ~(1<<4);        //Timer stop                波特率使用Timer2產(chǎn)生
  118.         AUXR |= 0x01;                //S1 BRT Use Timer2;
  119.         AUXR |=  (1<<2);        //Timer2 set as 1T mode
  120.         TH2 = (u8)(Timer2_Reload >> 8);
  121.         TL2 = (u8)Timer2_Reload;
  122.         AUXR |=  (1<<4);        //Timer run enable

  124.         REN = 1;        //允許接收
  125.         ES  = 1;        //允許中斷

  127.         EA = 1;                //允許全局中斷
  128.        

  130. }


  133. /*******************************************************************************
  134. * 函數(shù)名 : Timer0Init
  135. * 描述   : 定時(shí)器0初始化，20ms定時(shí)
  136. * 輸入   :
  137. * 輸出   :
  138. * 返回   :
  139. * 注意   :
  140. *******************************************************************************/
  141. void Timer0Init(void)                //20毫秒@11.0592MHz
  142. {
  143.         AUXR &= 0x7F;                //定時(shí)器時(shí)鐘12T模式
  144.         TMOD &= 0xF0;                //
  145.         TMOD |= 0x01;                //設(shè)置定時(shí)器模式，16位定時(shí)器
  146.         TL0 = 0x70;                  //設(shè)置定時(shí)器初值
  147.         TH0 = 0xFC;                  //設(shè)置定時(shí)器初值
  148.         TF0 = 0;                    //清TF0標(biāo)志
  149.         TR0 = 1;                    //定時(shí)器0開(kāi)始計(jì)時(shí)
  150.         ET0 = 1;              //使能定時(shí)器0中斷
  151. }

  153. /*******************************************************************************
  154. * 函數(shù)名 : CLR_Buf1
  155. * 描述   : 清除串口2緩存數(shù)據(jù)
  156. * 輸入   :
  157. * 輸出   :
  158. * 返回   :
  159. * 注意   :
  160. *******************************************************************************/
  161. void CLR_Buf1(void)
  162. {
  163.         u16 k;
  164.         for(k=0;k<Buf1_Max;k++)      //將緩存內(nèi)容清零
  165.         {
  166.                 Uart1_Buf[k] = 0x00;
  167.         }
  168.     First_Int = 0;              //接收字符串的起始存儲(chǔ)位置
  169. }



  173. /*******************************************************************************
  174. * 函數(shù)名 : Find
  175. * 描述   : 判斷緩存中是否含有指定的字符串
  176. * 輸入   :
  177. * 輸出   :
  178. * 返回   : unsigned char:1 找到指定字符，0 未找到指定字符
  179. * 注意   :
  180. *******************************************************************************/

  182. u8 Find(u8 *a)
  183. {
  184.   if(strstr(Uart1_Buf,a)!=NULL)
  185.             return 1;
  186.         else
  187.                         return 0;
  188. }

  190. /*******************************************************************************
  191. * 函數(shù)名 : Second_AT_Command
  192. * 描述   : 發(fā)送AT指令函數(shù)
  193. * 輸入   : 發(fā)送數(shù)據(jù)的指針、希望收到的應(yīng)答、發(fā)送等待時(shí)間(單位：S)
  194. * 輸出   :
  195. * 返回   :
  196. * 注意   :
  197. *******************************************************************************/

  199. void Second_AT_Command(u8 *b,u8 *a,u8 wait_time)         
  200. {
  201.         u8 i;
  202.         u8 *c;
  203.         c = b;                                                                                //保存字符串地址到c
  204.         CLR_Buf1();
  205.   i = 0;
  206.         while(i == 0)                    
  207.         {
  208.                
  209.                 if(!Find(a))            //查找需要應(yīng)答的字符
  210.                 {
  211.                         if(Timer0_start == 0)
  212.                         {
  213.                                 b = c;                                                        //將字符串地址給b
  214.                                 for (b; *b!='\0';b++)
  215.                                 {
  216.                                         UART1_SendData(*b);
  217.                                 }
  218.                                 UART1_SendLR();       
  219.                                 Times = 0;
  220.                                 shijian = wait_time;
  221.                                 Timer0_start = 1;
  222.                    }
  223.     }
  224.           else
  225.                 {
  226.                         i = 1;
  227.                         Timer0_start = 0;
  228.                 }
  229.         }
  230.         CLR_Buf1();
  231. }
  232. /*******************************************************************************
  233. * 函數(shù)名 : Set_PDU_Mode
  234. * 描述   : 設(shè)置短信為PDU模式
  235. * 輸入   :
  236. * 輸出   :
  237. * 返回   :
  238. * 注意   :
  239. *******************************************************************************/
  240. void Set_TEXT_Mode(void)
  241. {
  242.         Second_AT_Command("ATE0","OK",3);                                                                                  //取消回顯       
  243.         Second_AT_Command("AT+CNMI=3,2,0,0,0","OK",3);                                                        //新短信直接輸出
  244.         Second_AT_Command("AT+CMGF=1","OK",3);                                                                //TEXT模式       
  245.         Second_AT_Command("AT+CPMS=\"SM\",\"SM\",\"SM\"","OK",3);                //所有操作都在SIM卡中進(jìn)行       

  247. }

  249. /*******************************************************************************
  250. * 函數(shù)名 : Check_Message_rec
  251. * 描述   : 檢查是否有新信息，并執(zhí)行信息內(nèi)容指令
  252. * 輸入   :
  253. * 輸出   :
  254. * 返回   :
  255. * 注意   :
  256. ******************************************************************************/

  258. void Check_New_Message(void)
  259. {
  260.         u8 temp=0;
  261.         if(strstr(Uart1_Buf,"+CMT")!=NULL)                   //若緩存字符串中含有"+CMT"就表示有新的短信
  262.         {
  263.                 delay_ms(5);//等待數(shù)據(jù)全部接收完成
  264.                 if(strstr(Uart1_Buf,"ledaon")!=NULL)
  265.                 {
  266.                         LEDA=0;
  267.                 }
  268.                 if(strstr(Uart1_Buf,"ledaoff")!=NULL)
  269.                 {
  270.                         LEDA=1;
  271.                 }       
  272.                 if(strstr(Uart1_Buf,"ledbon")!=NULL)
  273.                 {
  274.                         LEDB=0;
  275.                 }
  276.                 if(strstr(Uart1_Buf,"ledboff")!=NULL)
  277.                 {
  278.                         LEDB=1;
  279.                 }       
  280.                 CLR_Buf1();
  281.                 Second_AT_Command("AT+CMGD=1,4","OK",3);//刪除短信
  282.         }
  283. }

  285. /*******************************************************************************
  286. * 函數(shù)名 : Wait_CREG
  287. * 描述   : 等待模塊注冊(cè)成功
  288. * 輸入   :
  289. * 輸出   :
  290. * 返回   :
  291. * 注意   :
  292. *******************************************************************************/
  293. void Wait_CREG(void)
  294. {
  295.         u8 i;
  296.         u8 k;
  297.         i = 0;
  298.         CLR_Buf1();
  299.   while(i == 0)                               
  300.         {
  301.    
  302.                 CLR_Buf1();        
  303.                 UART1_SendString("AT+CREG?");
  304.                 UART1_SendLR();
  305.                 delay_ms(100);
  306.                
  307.             for(k=0;k<Buf1_Max;k++)                             
  308.             {
  309.                         if((Uart1_Buf[k] == 'C')&&(Uart1_Buf[k+1] == 'R')&&(Uart1_Buf[k+2] == 'E')&&(Uart1_Buf[k+3] == 'G')&&(Uart1_Buf[k+4] == ':'))
  310.                         {
  311.                                          
  312.                                 if((Uart1_Buf[k+8] == '1')&&(Uart1_Buf[k+9] != '3'))
  313.                                 {
  314.                                         i = 1;
  315.                                         Register_Flag=1;
  316.                                         LEDB =0;
  317.                                   break;
  318.                                 }
  319.         if((Uart1_Buf[k+8] == '1')&&(Uart1_Buf[k+9] == '3'))
  320.                                 {
  321.                                         i = 1;
  322.                                         Register_Flag=3;
  323.                                         LEDA =0;
  324.                                   break;
  325.                                 }       
  326.                           if(Uart1_Buf[k+8] == '5')
  327.                                 {
  328.                                         i = 1;
  329.                                         Register_Flag=5;
  330.                                         LEDC =0;
  331.                                   break;
  332.                                 }       
  333.                                
  334.                         }
  335.                 }
  336.                
  337.         }
  338. }



  342. /*----------------------------
  343. UART1 發(fā)送串口數(shù)據(jù)
  344. -----------------------------*/
  345. void UART1_SendData(u8 dat)
  346. {
  347.         ES=0;                                        //關(guān)串口中斷
  348.         SBUF=dat;                       
  349.         while(TI!=1);        //等待發(fā)送成功
  350.         TI=0;                                        //清除發(fā)送中斷標(biāo)志
  351.         ES=1;                                        //開(kāi)串口中斷
  352. }
  353. /*----------------------------
  354. UART1 發(fā)送字符串
  355. -----------------------------*/
  356. void UART1_SendString(char *s)
  357. {
  358.         while(*s)//檢測(cè)字符串結(jié)束符
  359.         {
  360.                 UART1_SendData(*s++);//發(fā)送當(dāng)前字符
  361.         }
  362. }



  366. /*******************************************************************************
  367. * 函數(shù)名 : Timer0_ISR
  368. * 描述   : 定時(shí)器0中斷服務(wù)入口函數(shù),1ms中斷一次
  369. * 輸入   :
  370. * 輸出   :
  371. * 返回   :
  372. * 注意   :
  373. *******************************************************************************/
  374. void Timer0_ISR() interrupt 1
  375. {
  376.         static u8 Time_count=0;
  377.         TR0=0;//關(guān)定時(shí)器
  378.         TL0 = 0x70;                //重設(shè)定時(shí)器初值
  379.         TH0 = 0xFC;                //重設(shè)定時(shí)器初值
  380.        
  381.        
  382.        
  383.         Time_count++;
  384.         if(Time_count>=50)
  385.         {
  386.                 Time_count = 0;
  387.                 if(count_20ms) //20ms延時(shí)計(jì)數(shù)器
  388.                 count_20ms--;
  389.         }
  390.        
  391.         if(Timer0_start)
  392.           Times++;
  393.         if(Times > (50*shijian))
  394.         {
  395.                 Timer0_start = 0;
  396.                 Times = 0;
  397.         }
  398.         TR0=1;//開(kāi)定時(shí)器
  399. }

復(fù)制代碼


評(píng)分

參與人數(shù) 1黑幣 +1 收起 理由
en_568 + 1 贊一個(gè)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏3 分享淘帖 頂頂1 踩踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:47286 發(fā)表于 2017-4-2 19:02 | 只看該作者
太棒了 我剛買(mǎi)了個(gè)A6
回復(fù)

使用道具 舉報(bào)

板凳
ID:194622 發(fā)表于 2017-5-6 01:16 | 只看該作者
好啊，雪中送炭
回復(fù)

使用道具 舉報(bào)

地板
ID:197367 發(fā)表于 2017-5-6 16:16 | 只看該作者
你們實(shí)現(xiàn)單片機(jī)控制了嗎
回復(fù)

使用道具 舉報(bào)

5#
ID:202756 發(fā)表于 2017-5-20 08:46 | 只看該作者
你好請(qǐng)問(wèn)一下：GPRS A6  如何驗(yàn)證  我用a6模塊跟arduino連接    測(cè)試的時(shí)候沒(méi)反應(yīng)   接線也是正確的 不知道為什么  
回復(fù)

使用道具 舉報(bào)

6#
ID:212625 發(fā)表于 2017-6-22 10:34 | 只看該作者
太棒了   網(wǎng)上沒(méi)有這方面的資料
回復(fù)

使用道具 舉報(bào)

7#
ID:231277 發(fā)表于 2017-9-5 22:58 | 只看該作者
證想做這個(gè)呢，先參考了謝謝，萬(wàn)分感謝，
回復(fù)

使用道具 舉報(bào)

8#
ID:231284 發(fā)表于 2017-9-5 23:21 | 只看該作者
謝謝分享
回復(fù)

使用道具 舉報(bào)

9#
ID:82765 發(fā)表于 2017-9-6 07:49 | 只看該作者
提示: 作者被禁止或刪除 內(nèi)容自動(dòng)屏蔽
回復(fù)

使用道具 舉報(bào)

10#
ID:239519 發(fā)表于 2017-10-14 22:28 | 只看該作者
謝謝樓主分享，剛好需要用到，太感謝了。
回復(fù)

使用道具 舉報(bào)

11#
ID:233225 發(fā)表于 2017-11-15 13:40 | 只看該作者
666，希望可以用下
回復(fù)

使用道具 舉報(bào)

12#
ID:270999 發(fā)表于 2018-1-3 19:42 | 只看該作者
很棒，謝謝分享
回復(fù)

使用道具 舉報(bào)

13#
ID:268524 發(fā)表于 2018-1-3 20:53 | 只看該作者
想做這個(gè)呢，先參考了謝謝，萬(wàn)分感謝，
回復(fù)

使用道具 舉報(bào)

14#
ID:165122 發(fā)表于 2018-2-17 22:30 | 只看該作者
太棒啦，正好可以學(xué)習(xí)一下！
回復(fù)

使用道具 舉報(bào)

15#
ID:165122 發(fā)表于 2018-2-17 22:30 | 只看該作者
太棒啦，正好可以學(xué)習(xí)一下。感謝分享！
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

快速回復(fù) 返回頂部 返回列表