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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › GPRSA6-51单片机代码（拨号,短信控制led灯等试验程序）
返回列表 发新帖
查看: 6560|回复: 14
收起左侧

GPRSA6-51单片机代码（拨号,短信控制led灯等试验程序）

  [复制链接]
ID:142988 发表于 2017-4-2 14:35 | 显示全部楼层 |阅读模式
GPRSA6-51代码（内有例程）
0.png
包含以下4个源码：
1.拨号实验
2.发送TEXT短信实验
3.发送PDU中文短信
4.短信控制led灯

完整源码下载：
GPRSA6-51代码.zip (385.87 KB, 下载次数: 112)






短信控制led灯的单片机源码（部分预览）：
  1. /**************************************************************
  2.          果云科技  GPRS A6  模块      
  3.                                  
  4.           51 单片机例程       适用于 STC15F 系列
  5.                
  6.                 实验内容 ：  短信控制LED 灯


  9. UART1 映射到 P36 P37口      用手机分别发送   ledaon 、 ledaoff  、 ledbon 、ledboff   四条短信 分别来控制两个LED亮灭   一定要区分大小写
  10.                
  11. PS： A6模块上电注册是要一定的时间的！


  14. 串口1全双工中断方式收发通讯程序。本例程使用11.0592MHZ时钟，如要改变，请修改下面的"定义主时钟"的值并重新编译。

  16. 串口设置为：115200,8,n,1.

  18. 通过PC向MCU发送数据, MCU收到后通过串口把收到的数据原样返回.

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



  24. /*************        本地常量声明        **************/
  25. #define MAIN_Fosc                11059200L        //定义主时钟
  26. #define        BaudRate1                115200UL        //选择波特率


  29. #define        Timer1_Reload        (65536UL -(MAIN_Fosc / 4 / BaudRate1))                //Timer 1 重装值， 对应300KHZ
  30. #define        Timer2_Reload        (65536UL -(MAIN_Fosc / 4 / BaudRate1))                //Timer 2 重装值， 对应300KHZ

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

  37. /*************        本地变量声明        **************/

  39. #define Automatic_Startup 1     //定义自启动 V1.2版本起有自启动功能
  40. #define Buf1_Max 60                                           //串口1缓存长度
  41. #define Buf2_Max 60                                           //串口2缓存长度
  42. //串口1发送回车换行
  43. #define UART1_SendLR() UART1_SendData(0X0D);\
  44.                                                                                          UART1_SendData(0X0A)


  47. /*************        本地常量声明        **************/
  48. //sbit RUNING_LED = P1^2;                                        //运行指示灯
  49. sbit LEDA                          = P1^3;                                        //测试用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  注册标志位  1 ：注册成功  3：注册失败   5：注册成功，但处于漫游状态下，无法拨打电话发短信
  57. u8 Times=0,First_Int = 0,shijian=0;


  60. bdata u8 Flag;//定时器标志位
  61. sbit Timer0_start =Flag^0;        //定时器0延时启动计数器


  64. /*************        本地函数声明        **************/
  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命令发送
  70. void Set_TEXT_Mode(void);
  71. void Check_New_Message(void);
  72. void UART1_SendData(u8 dat);//串口1发送 1字节
  73. void UART1_SendString(char *s);//串口1发送 字符串
  74. void Wait_CREG(void);


  77. /**********************************************/
  78. void main(void)
  79. {
  80.   USART1_Init();//串口初始化
  81.         Timer0Init();//TIM0初始化
  82.         Wait_CREG();//等待GSM注册成功
  83.         Set_TEXT_Mode();//设置为TEXT模式
  84.   
  85.         while (1)
  86.         {
  87.     Check_New_Message();//短信检测
  88.                  
  89.         }
  90. }

  92. /********************* UART1中断函数************************/
  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++;                                        //缓存指针向后移动
  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位数据
  114.         //S1_USE_P30P31();                //UART1 使用P30 P31口        默认
  115.         S1_USE_P36P37();                //UART1 使用P36 P37口
  116.         //S1_USE_P16P17();                //UART1 使用P16 P17口
  117.         AUXR &= ~(1<<4);        //Timer stop                波特率使用Timer2产生
  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. * 函数名 : Timer0Init
  135. * 描述   : 定时器0初始化，20ms定时
  136. * 输入   :
  137. * 输出   :
  138. * 返回   :
  139. * 注意   :
  140. *******************************************************************************/
  141. void Timer0Init(void)                //20毫秒@11.0592MHz
  142. {
  143.         AUXR &= 0x7F;                //定时器时钟12T模式
  144.         TMOD &= 0xF0;                //
  145.         TMOD |= 0x01;                //设置定时器模式，16位定时器
  146.         TL0 = 0x70;                  //设置定时器初值
  147.         TH0 = 0xFC;                  //设置定时器初值
  148.         TF0 = 0;                    //清TF0标志
  149.         TR0 = 1;                    //定时器0开始计时
  150.         ET0 = 1;              //使能定时器0中断
  151. }

  153. /*******************************************************************************
  154. * 函数名 : CLR_Buf1
  155. * 描述   : 清除串口2缓存数据
  156. * 输入   :
  157. * 输出   :
  158. * 返回   :
  159. * 注意   :
  160. *******************************************************************************/
  161. void CLR_Buf1(void)
  162. {
  163.         u16 k;
  164.         for(k=0;k<Buf1_Max;k++)      //将缓存内容清零
  165.         {
  166.                 Uart1_Buf[k] = 0x00;
  167.         }
  168.     First_Int = 0;              //接收字符串的起始存储位置
  169. }



  173. /*******************************************************************************
  174. * 函数名 : 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. * 函数名 : Second_AT_Command
  192. * 描述   : 发送AT指令函数
  193. * 输入   : 发送数据的指针、希望收到的应答、发送等待时间(单位：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))            //查找需要应答的字符
  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. * 函数名 : Set_PDU_Mode
  234. * 描述   : 设置短信为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卡中进行       

  247. }

  249. /*******************************************************************************
  250. * 函数名 : Check_Message_rec
  251. * 描述   : 检查是否有新信息，并执行信息内容指令
  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);//等待数据全部接收完成
  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. * 函数名 : Wait_CREG
  287. * 描述   : 等待模块注册成功
  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 发送串口数据
  344. -----------------------------*/
  345. void UART1_SendData(u8 dat)
  346. {
  347.         ES=0;                                        //关串口中断
  348.         SBUF=dat;                       
  349.         while(TI!=1);        //等待发送成功
  350.         TI=0;                                        //清除发送中断标志
  351.         ES=1;                                        //开串口中断
  352. }
  353. /*----------------------------
  354. UART1 发送字符串
  355. -----------------------------*/
  356. void UART1_SendString(char *s)
  357. {
  358.         while(*s)//检测字符串结束符
  359.         {
  360.                 UART1_SendData(*s++);//发送当前字符
  361.         }
  362. }



  366. /*******************************************************************************
  367. * 函数名 : Timer0_ISR
  368. * 描述   : 定时器0中断服务入口函数,1ms中断一次
  369. * 输入   :
  370. * 输出   :
  371. * 返回   :
  372. * 注意   :
  373. *******************************************************************************/
  374. void Timer0_ISR() interrupt 1
  375. {
  376.         static u8 Time_count=0;
  377.         TR0=0;//关定时器
  378.         TL0 = 0x70;                //重设定时器初值
  379.         TH0 = 0xFC;                //重设定时器初值
  380.        
  381.        
  382.        
  383.         Time_count++;
  384.         if(Time_count>=50)
  385.         {
  386.                 Time_count = 0;
  387.                 if(count_20ms) //20ms延时计数器
  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;//开定时器
  399. }

复制代码


评分

参与人数 1黑币 +1 收起 理由
en_568 + 1 赞一个！

查看全部评分

回复

使用道具 举报

ID:47286 发表于 2017-4-2 19:02 | 显示全部楼层
太棒了 我刚买了个A6
回复

使用道具 举报

ID:194622 发表于 2017-5-6 01:16 | 显示全部楼层
好啊，雪中送炭
回复

使用道具 举报

ID:197367 发表于 2017-5-6 16:16 | 显示全部楼层
你们实现单片机控制了吗
回复

使用道具 举报

ID:202756 发表于 2017-5-20 08:46 | 显示全部楼层
你好请问一下：GPRS A6  如何验证  我用a6模块跟arduino连接    测试的时候没反应   接线也是正确的 不知道为什么  
回复

使用道具 举报

ID:212625 发表于 2017-6-22 10:34 | 显示全部楼层
太棒了   网上没有这方面的资料
回复

使用道具 举报

ID:231277 发表于 2017-9-5 22:58 | 显示全部楼层
证想做这个呢，先参考了谢谢，万分感谢，
回复

使用道具 举报

ID:231284 发表于 2017-9-5 23:21 | 显示全部楼层
谢谢分享
回复

使用道具 举报

ID:82765 发表于 2017-9-6 07:49 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复

使用道具 举报

ID:239519 发表于 2017-10-14 22:28 | 显示全部楼层
谢谢楼主分享，刚好需要用到，太感谢了。
回复

使用道具 举报

ID:233225 发表于 2017-11-15 13:40 | 显示全部楼层
666，希望可以用下
回复

使用道具 举报

ID:270999 发表于 2018-1-3 19:42 | 显示全部楼层
很棒，谢谢分享
回复

使用道具 举报

ID:268524 发表于 2018-1-3 20:53 | 显示全部楼层
想做这个呢，先参考了谢谢，万分感谢，
回复

使用道具 举报

ID:165122 发表于 2018-2-17 22:30 | 显示全部楼层
太棒啦，正好可以学习一下！
回复

使用道具 举报

ID:165122 发表于 2018-2-17 22:30 | 显示全部楼层
太棒啦，正好可以学习一下。感谢分享！
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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