找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2752|回复: 4
收起左侧

stm32单片机驱动TC35I GSM模块接打电话,收发短信

[复制链接]
ID:343883 发表于 2018-6-3 11:25 | 显示全部楼层 |阅读模式
本程序用stm32驱动tc35i 收发短信打电话很实用

单片机源程序如下:
  1. #include"stm32f10x.h"
  2. #include"uart.h"
  3. #include"nvic.h"
  4. #include"w25x.h"
  5. #include"lcd.h"
  6. #include"jm.h"
  7. #include"gpio.h"
  8. #include"tim2.h"
  9. #include"clock.h"

  10. extern u16 usarnum;
  11. extern u16 jieshou[100];
  12. extern u8 wei1;
  13. u8 shu;

  14. int main(void)
  15. {
  16.         u8 t=0;
  17.         u8 k=0;
  18.         u8 i,x;
  19.         u32 kkk;
  20.         u8 kk=0;
  21.         TIM2_NVIC_Configuration();
  22.         TIM2_Configuration();
  23.         GPIO_Config();
  24.         ling_0;
  25.         Init_LCD();
  26.         /*初始化中断向量*/
  27.         NVIC_Config();
  28.         /*uart串口初始化*/
  29.         USART1_Config();
  30.         USART1_Puts("AT&F\r");
  31.         delay_ms(500);
  32.         USART1_Puts("AT+CMGF=1\r");
  33.         delay_ms(500);
  34.     USART1_Puts("AT+CNMI=2,1\r");
  35.         delay_ms(500);
  36.         USART1_Puts("AT+CMGL=ALL\r");
  37.         wei1=0;
  38.         kkk=6000000;
  39.         while(kkk--)
  40.         {
  41.                 if(usarnum==0x4c)
  42.                 {
  43.                         wei1=0;
  44.                 }               
  45.         }
  46.         for(x=1;x<(jieshou[2]-0x2f);x++)    //删除所有短信
  47.         {
  48.                 USART1_Puts("AT+CMGD=");
  49.                 USART1_Putc(0x30+x);
  50.                 USART1_Puts("\r");
  51.                 delay_ms(200);        
  52.         }

  53.         W25X_FLASH_Init();
  54.         W25X_ReleasePowerDown();
  55.         jiemian_init();        
  56.         while(1)
  57.         {
  58.                  t=KEY_Check();                //矩阵键盘扫描
  59.                  if(t)
  60.                  {
  61.                          switch(t)                        //出口1        输出键值
  62.                          {
  63.                          case 13:                                                   //打电话
  64.                                           jiemian_tonghua();
  65.                                          saomiao_tonghua();
  66.                                          break;
  67.                          case 15:duanxin_jiemian();                   //发短信
  68.                                            saomiao_duanxin();
  69.                                  break;
  70.                          case 16:if(kk)                                        //查看短信
  71.                                           {
  72.                                                   USART1_Puts("AT+CMGR=");
  73.                                                  USART1_Putc(shu);
  74.                                                  USART1_Puts("\r");
  75.                                                  wei1=0;
  76.                                                  delay_ms(300);
  77.                                                  xianshiduanxin();
  78.                                                  shanduanxin();
  79.                                                  wei1=0;
  80.                                                  kk=0;
  81.                                          }
  82.                                           break;
  83.                          }                                                   
  84.                  }
  85.                  k=zhuangtai();        
  86.                  if(k)
  87.                 {
  88.                    switch(k)
  89.                    {
  90.                              case 1:ling_1;laidian();laidian_saomiao();wei1=0;break;                  //检测来电
  91.                           case 5:Chinesestr(24,120,"收到新信息",BLACK,WHITE);                          //检测短信
  92.                                            Chinesestr(24,140,"请按  查看",BLACK,WHITE);
  93.                                          LCD_ShowString(56,140," D"); kk=1;
  94.                                          shu=jieshou[12];
  95.                                          for(i=0;i<20;i++)
  96.                                            {
  97.                                                 jieshou[i]=0;
  98.                                          }
  99.                                          k=0;
  100.                                            break;
  101.                    }        
  102.                 }                                             
  103.         }
  104. }
复制代码

所有资料51hei提供下载:
GSM(接打电话 收发短信).zip (332.33 KB, 下载次数: 52)
回复

使用道具 举报

ID:341045 发表于 2018-6-5 09:04 | 显示全部楼层
好东东, 谢谢分享
回复

使用道具 举报

ID:390236 发表于 2018-8-26 22:06 | 显示全部楼层
stm32单片机驱动TC35I GSM模块接打电话,收发短信
记号以后会用得到
回复

使用道具 举报

ID:305653 发表于 2018-8-27 09:10 | 显示全部楼层
学习一下,感谢
回复

使用道具 举报

ID:447337 发表于 2018-12-16 16:46 | 显示全部楼层
好,谢谢分享
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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