主頁 >  其他 > 用51單片機控制SIM A6模塊發送短信,程式運行后沒有結果

用51單片機控制SIM A6模塊發送短信,程式運行后沒有結果

2020-09-29 07:04:49 其他

#include "reg52.h"
#include "temp.h"
#include "string.h"
#include "stdlib.h"

#define uint unsigned int
#define uchar unsigned char 
#define Buf_Max 80
#define TELL 13778386860

/*sbit LSA=P2^2;
sbit LSB=P2^3;
sbit LSC=P2^4;  */


sbit led1=P2^0;
sbit led2=P2^1;
sbit led3=P2^2;
sbit led4=P2^3;
sbit led5=P2^4;
sbit led6=P2^5;
sbit led7=P2^6;
sbit led8=P2^7;
sbit duan=P2^6;
sbit wei=P2^7;
sbit key=P3^4;

uchar flag=0,i=0;
uchar Rec_Buf[Buf_Max];

/*char num=0;
uchar DisplayData[8];  */
uchar code smgduan[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};

void delayms(uint z)
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}


/*void datapros(int temp)   //溫度讀取處理轉換函式
{
    float tp;  
if(temp< 0) //當溫度值為負數
   {
DisplayData[0] = 0x40;    //   -
//因為讀取的溫度是實際溫度的補碼,所以減1,再取反求出原碼
temp=temp-1;
temp=~temp;
tp=temp;
temp=tp*0.0625*100+0.5;

   }
  else
   {
DisplayData[0] = 0x00;
tp=temp;//因為資料處理有小數點所以將溫度賦給一個浮點型變數
//如果溫度是正的那么,那么正數的原碼就是補碼它本身
temp=tp*0.0625*100+0.5;

}
DisplayData[1] = smgduan[temp / 10000];
DisplayData[2] = smgduan[temp % 10000 / 1000];
DisplayData[3] = smgduan[temp % 1000 / 100] | 0x80;
DisplayData[4] = smgduan[temp % 100 / 10];
DisplayData[5] = smgduan[temp % 10];
}



/*void DigDisplay()  //數碼管顯示函式
{
uchar q;
for(q=0;q<6;i++)
{
switch(i)  //位選,選擇點亮的數碼管,
{
case(0):
LSA=0;LSB=0;LSC=0; break;//顯示第0位
case(1):
LSA=1;LSB=0;LSC=0; break;//顯示第1位
case(2):
LSA=0;LSB=1;LSC=0; break;//顯示第2位
case(3):
LSA=1;LSB=1;LSC=0; break;//顯示第3位
case(4):
LSA=0;LSB=0;LSC=1; break;//顯示第4位
case(5):
LSA=1;LSB=0;LSC=1; break;//顯示第5位
}
P0=DisplayData[5-q];//發送資料
delayms(1); //間隔一段時間掃描
P0=0x00;//消隱
}
}  */

void sinit () //定時器初始化
{
SCON=0x50;  //定時器1    10位UART 可變 允許接收
TMOD=0x20;  //八位自動重裝載模式
TH1=0xfd;
TL1=0xfd;
TR1=1; //啟動定時器1
IT1=1; //外部中斷1觸發方式控制允許
EA=1;   //打開總中斷
ES=1; //串行口中斷允許
EX1=1; //定時器T1中斷允許
}

void CLR_Buf() //清除快取內容
{
uchar k;
for (k=0;k<Buf_Max;k++)
{
Rec_Buf[k]=0;
}
i=0; //接收字串指標指回起點
}

bit  Hand(uchar *a)       //判斷快取中是否含有指定的字串函式
{
if (strstr(Rec_Buf,a)!=NULL)
return 1;
else 
return 0;


void Send_ASCII(uchar *b) //發送字符(ASCII碼)函式
{
EA=0;
for (b;*b!='\0';b++)
{
SBUF=*b;
while (TI!=1);
TI=0;
}
EA=1;
}

void Send_Hex(uchar c)    //發送字符(十六進制)函式
{
EA=0;
SBUF=c;
while(TI!=1);
TI=0;
EA=1;
}

void Send_message()
{
CLR_Buf();

Send_ASCII("AT+CMGF=1");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand("OK"));
CLR_Buf();
led1=~led1; 

Send_ASCII("AT+CMGS=TELL");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand(">"));

led2=~led2;

Send_ASCII("temperature: 28.65");
Send_Hex(0x1a);
delayms(1000);
while(!Hand("OK"));
CLR_Buf();
led4=~led4;
}














void main()
{
    int  led;
uchar  *j, l;
char   o[5];


sinit();
while(!Hand("OK"))
{
Send_ASCII("AT");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(2000);
}
CLR_Buf();
led1=0;
delayms(2000);
Send_ASCII("AT+CPMS=\"SM\",\"SM\",\"SM\"");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(2000);
while(!Hand("OK"));
Send_ASCII(Rec_Buf);

CLR_Buf();
led2=0;

delayms(2000);
Send_ASCII("AT+CNMI=2,1");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand("OK"));
CLR_Buf();
led3=0;

delayms(2000);
Send_ASCII("AT+CMGF=1");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand("OK"));
CLR_Buf();
led4=0;

delayms(2000);
Send_ASCII("AT+CMGD=1,4");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand("OK"));
CLR_Buf();
led5=0;
while(1)
{
/* datapros(Ds18b20ReadTemp());  //資料處理函式
    DigDisplay();//數碼管顯示函式 */

if (strstr(Rec_Buf,"+CMTI")!=NULL)
{
led6=~led6;
delayms(2000);
Send_ASCII("AT+CMGR=1");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand("OK"));
led7=~led7;
if (strstr(Rec_Buf,"open led3")!=NULL)
{
led3=0;
Send_message();
}
else if (strstr(Rec_Buf,"close led3")!=NULL)
led3=1;
else if (strstr(Rec_Buf,"led=")!=NULL)
{
j=strstr(Rec_Buf,"led=");
j+=4;
while(*j!='\0')
{
o[l]=*j;
j++;
l++;
}
o[l]='\0';
led=atoi(o);
j=0;
l=0;
P0=0xff;
wei=1;
P0=0x00;
wei=0;
P0=0xff;
duan=1;
P0=smgduan[led];
duan=0;
}
CLR_Buf();

delayms(2000);
Send_ASCII("AT+CMGD=1,4");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!Hand("OK"));
CLR_Buf();
}
if(flag==1)
{
flag=0;
delayms(2000);
Send_ASCII("ATDTELL");
Send_Hex(0x0d);
Send_Hex(0x0a);
delayms(1000);
while(!(Hand("NO")||Hand("BUSY")));
CLR_Buf();
}
led8=1;
delayms(1000);
led8=0;
delayms(1000);

}
}

void sint () interrupt 4
{
ES=0;
if(TI)
{
TI=0;
}
if(RI)
{
RI=0;
Rec_Buf[i]=SBUF;
i++;
if(i>80)
{
i=0;
}
}
ES=1;
}

void int1() interrupt 2
{
EX1=0;
delayms(100);
if(key==0);
{
led1=~led1;
flag=1;
}
while(key==0);
delayms(100);
while(key==0);
EX1=1;
}

uj5u.com熱心網友回復:

這種與硬體有關的問題,光看代碼也很難看出問題的。
建議樓主,先確定硬體作業正常先。

  1. GSM模塊可以用ttl轉usb或者轉232接到PC上,用串口除錯工具發AT指令,確定是可以作業

  2. 把單片機板上的uart介面也用ttl轉usb/232接到pc上測驗,確定接收/發送都是正常的

如果都正常,再檢查代碼了

uj5u.com熱心網友回復:

這樓主,誰沒事看你這么長的代碼

轉載請註明出處,本文鏈接:https://www.uj5u.com/qita/137349.html

標籤:單片機/工控

上一篇:急求“基于RFID技術的智能景區服務系統”

下一篇:GPS采集到的模塊怎么轉換成平面圖,進行路徑規劃達到全覆寫呢?

標籤雲
其他(157675) Python(38076) JavaScript(25376) Java(17977) C(15215) 區塊鏈(8255) C#(7972) AI(7469) 爪哇(7425) MySQL(7132) html(6777) 基礎類(6313) sql(6102) 熊猫(6058) PHP(5869) 数组(5741) R(5409) Linux(5327) 反应(5209) 腳本語言(PerlPython)(5129) 非技術區(4971) Android(4554) 数据框(4311) css(4259) 节点.js(4032) C語言(3288) json(3245) 列表(3129) 扑(3119) C++語言(3117) 安卓(2998) 打字稿(2995) VBA(2789) Java相關(2746) 疑難問題(2699) 细绳(2522) 單片機工控(2479) iOS(2429) ASP.NET(2402) MongoDB(2323) 麻木的(2285) 正则表达式(2254) 字典(2211) 循环(2198) 迅速(2185) 擅长(2169) 镖(2155) 功能(1967) .NET技术(1958) Web開發(1951) python-3.x(1918) HtmlCss(1915) 弹簧靴(1913) C++(1909) xml(1889) PostgreSQL(1872) .NETCore(1853) 谷歌表格(1846) Unity3D(1843) for循环(1842)

熱門瀏覽
  • 網閘典型架構簡述

    網閘架構一般分為兩種:三主機的三系統架構網閘和雙主機的2+1架構網閘。 三主機架構分別為內端機、外端機和仲裁機。三機無論從軟體和硬體上均各自獨立。首先從硬體上來看,三機都用各自獨立的主板、記憶體及存盤設備。從軟體上來看,三機有各自獨立的作業系統。這樣能達到完全的三機獨立。對于“2+1”系統,“2”分為 ......

    uj5u.com 2020-09-10 02:00:44 more
  • 如何從xshell上傳檔案到centos linux虛擬機里

    如何從xshell上傳檔案到centos linux虛擬機里及:虛擬機CentOs下執行 yum -y install lrzsz命令,出現錯誤:鏡像無法找到軟體包 前言 一、安裝lrzsz步驟 二、上傳檔案 三、遇到的問題及解決方案 總結 前言 提示:其實很簡單,往虛擬機上安裝一個上傳檔案的工具 ......

    uj5u.com 2020-09-10 02:00:47 more
  • 一、SQLMAP入門

    一、SQLMAP入門 1、判斷是否存在注入 sqlmap.py -u 網址/id=1 id=1不可缺少。當注入點后面的引數大于兩個時。需要加雙引號, sqlmap.py -u "網址/id=1&uid=1" 2、判斷文本中的請求是否存在注入 從文本中加載http請求,SQLMAP可以從一個文本檔案中 ......

    uj5u.com 2020-09-10 02:00:50 more
  • Metasploit 簡單使用教程

    metasploit 簡單使用教程 浩先生, 2020-08-28 16:18:25 分類專欄: kail 網路安全 linux 文章標簽: linux資訊安全 編輯 著作權 metasploit 使用教程 前言 一、Metasploit是什么? 二、準備作業 三、具體步驟 前言 Msfconsole ......

    uj5u.com 2020-09-10 02:00:53 more
  • 游戲逆向之驅動層與用戶層通訊

    驅動層代碼: #pragma once #include <ntifs.h> #define add_code CTL_CODE(FILE_DEVICE_UNKNOWN,0x800,METHOD_BUFFERED,FILE_ANY_ACCESS) /* 更多游戲逆向視頻www.yxfzedu.com ......

    uj5u.com 2020-09-10 02:00:56 more
  • 北斗電力時鐘(北斗授時服務器)讓網路資料更精準

    北斗電力時鐘(北斗授時服務器)讓網路資料更精準 北斗電力時鐘(北斗授時服務器)讓網路資料更精準 京準電子科技官微——ahjzsz 近幾年,資訊技術的得了快速發展,互聯網在逐漸普及,其在人們生活和生產中都得到了廣泛應用,并且取得了不錯的應用效果。計算機網路資訊在電力系統中的應用,一方面使電力系統的運行 ......

    uj5u.com 2020-09-10 02:01:03 more
  • 【CTF】CTFHub 技能樹 彩蛋 writeup

    ?碎碎念 CTFHub:https://www.ctfhub.com/ 筆者入門CTF時時剛開始刷的是bugku的舊平臺,后來才有了CTFHub。 感覺不論是網頁UI設計,還是題目質量,賽事跟蹤,工具軟體都做得很不錯。 而且因為獨到的金幣制度的確讓人有一種想去刷題賺金幣的感覺。 個人還是非常喜歡這個 ......

    uj5u.com 2020-09-10 02:04:05 more
  • 02windows基礎操作

    我學到了一下幾點 Windows系統目錄結構與滲透的作用 常見Windows的服務詳解 Windows埠詳解 常用的Windows注冊表詳解 hacker DOS命令詳解(net user / type /md /rd/ dir /cd /net use copy、批處理 等) 利用dos命令制作 ......

    uj5u.com 2020-09-10 02:04:18 more
  • 03.Linux基礎操作

    我學到了以下幾點 01Linux系統介紹02系統安裝,密碼啊破解03Linux常用命令04LAMP 01LINUX windows: win03 8 12 16 19 配置不繁瑣 Linux:redhat,centos(紅帽社區版),Ubuntu server,suse unix:金融機構,證券,銀 ......

    uj5u.com 2020-09-10 02:04:30 more
  • 05HTML

    01HTML介紹 02頭部標簽講解03基礎標簽講解04表單標簽講解 HTML前段語言 js1.了解代碼2.根據代碼 懂得挖掘漏洞 (POST注入/XSS漏洞上傳)3.黑帽seo 白帽seo 客戶網站被黑帽植入劫持代碼如何處理4.熟悉html表單 <html><head><title>TDK標題,描述 ......

    uj5u.com 2020-09-10 02:04:36 more
最新发布
  • 2023年最新微信小程式抓包教程

    01 開門見山 隔一個月發一篇文章,不過分。 首先回顧一下《微信系結手機號資料庫被脫庫事件》,我也是第一時間得知了這個訊息,然后跟蹤了整件事情的經過。下面是這起事件的相關截圖以及近日流出的一萬條資料樣本: 個人認為這件事也沒什么,還不如關注一下之前45億快遞資料查詢渠道疑似在近日復活的訊息。 訊息是 ......

    uj5u.com 2023-04-20 08:48:24 more
  • web3 產品介紹:metamask 錢包 使用最多的瀏覽器插件錢包

    Metamask錢包是一種基于區塊鏈技術的數字貨幣錢包,它允許用戶在安全、便捷的環境下管理自己的加密資產。Metamask錢包是以太坊生態系統中最流行的錢包之一,它具有易于使用、安全性高和功能強大等優點。 本文將詳細介紹Metamask錢包的功能和使用方法。 一、 Metamask錢包的功能 數字資 ......

    uj5u.com 2023-04-20 08:47:46 more
  • vulnhub_Earth

    前言 靶機地址->>>vulnhub_Earth 攻擊機ip:192.168.20.121 靶機ip:192.168.20.122 參考文章 https://www.cnblogs.com/Jing-X/archive/2022/04/03/16097695.html https://www.cnb ......

    uj5u.com 2023-04-20 07:46:20 more
  • 從4k到42k,軟體測驗工程師的漲薪史,給我看哭了

    清明節一過,盲猜大家已經無心上班,在數著日子準備過五一,但一想到銀行卡里的余額……瞬間心情就不美麗了。最近,2023年高校畢業生就業調查顯示,本科畢業月平均起薪為5825元。調查一出,便有很多同學表示自己又被平均了。看著這一資料,不免讓人想到前不久中國青年報的一項調查:近六成大學生認為畢業10年內會 ......

    uj5u.com 2023-04-20 07:44:00 more
  • 最新版本 Stable Diffusion 開源 AI 繪畫工具之中文自動提詞篇

    🎈 標簽生成器 由于輸入正向提示詞 prompt 和反向提示詞 negative prompt 都是使用英文,所以對學習母語的我們非常不友好 使用網址:https://tinygeeker.github.io/p/ai-prompt-generator 這個網址是為了讓大家在使用 AI 繪畫的時候 ......

    uj5u.com 2023-04-20 07:43:36 more
  • 漫談前端自動化測驗演進之路及測驗工具分析

    隨著前端技術的不斷發展和應用程式的日益復雜,前端自動化測驗也在不斷演進。隨著 Web 應用程式變得越來越復雜,自動化測驗的需求也越來越高。如今,自動化測驗已經成為 Web 應用程式開發程序中不可或缺的一部分,它們可以幫助開發人員更快地發現和修復錯誤,提高應用程式的性能和可靠性。 ......

    uj5u.com 2023-04-20 07:43:16 more
  • CANN開發實踐:4個DVPP記憶體問題的典型案例解讀

    摘要:由于DVPP媒體資料處理功能對存放輸入、輸出資料的記憶體有更高的要求(例如,記憶體首地址128位元組對齊),因此需呼叫專用的記憶體申請介面,那么本期就分享幾個關于DVPP記憶體問題的典型案例,并給出原因分析及解決方法。 本文分享自華為云社區《FAQ_DVPP記憶體問題案例》,作者:昇騰CANN。 DVPP ......

    uj5u.com 2023-04-20 07:43:03 more
  • msf學習

    msf學習 以kali自帶的msf為例 一、msf核心模塊與功能 msf模塊都放在/usr/share/metasploit-framework/modules目錄下 1、auxiliary 輔助模塊,輔助滲透(埠掃描、登錄密碼爆破、漏洞驗證等) 2、encoders 編碼器模塊,主要包含各種編碼 ......

    uj5u.com 2023-04-20 07:42:59 more
  • Halcon軟體安裝與界面簡介

    1. 下載Halcon17版本到到本地 2. 雙擊安裝包后 3. 步驟如下 1.2 Halcon軟體安裝 界面分為四大塊 1. Halcon的五個助手 1) 影像采集助手:與相機連接,設定相機引數,采集影像 2) 標定助手:九點標定或是其它的標定,生成標定檔案及內參外參,可以將像素單位轉換為長度單位 ......

    uj5u.com 2023-04-20 07:42:17 more
  • 在MacOS下使用Unity3D開發游戲

    第一次發博客,先發一下我的游戲開發環境吧。 去年2月份買了一臺MacBookPro2021 M1pro(以下簡稱mbp),這一年來一直在用mbp開發游戲。我大致分享一下我的開發工具以及使用體驗。 1、Unity 官網鏈接: https://unity.cn/releases 我一般使用的Apple ......

    uj5u.com 2023-04-20 07:40:19 more