標題:
SIM900A簡易報警器程序(51單片機遠程控制LED)
[打印本頁]
作者:
孟榜鑫
時間:
2019-4-1 10:46
標題:
SIM900A簡易報警器程序(51單片機遠程控制LED)
哈哈 51單片機的有點老 想要STM32的聯(lián)系我 遠程控制LED
1.上電后,進入等待接收短信模式,如果接收到的數(shù)據(jù)中包含 ledon 字符串就會點亮LED7,熄滅LE6
如果不包含 ledon 字符串,就點亮LED6,熄滅LED7。
2.按鍵和LED對應(yīng)的端口,請參考程序。
IMG_20180625_111558.jpg
(4.45 MB, 下載次數(shù): 32)
下載附件
成品圖
2019-4-1 10:40 上傳
單片機源程序如下:
/**************************************************************
51 單片機例程
本例程使用11.0592MHZ時鐘---->必須為11.0592M
串口設(shè)置為:9600,8,n,1.
******************************************/
#include <reg52.h>
#include "string.h"
#include "GA6_module_errors.h"
typedef unsigned char u8;
typedef unsigned int u16;
typedef unsigned long u32;
/************* 本地常量聲明 **************/
#define Buf_Max 70 //串口1緩存長度
#define STABLE_TIMES 10 //等待上電后穩(wěn)定
/************* 本地變量聲明 **************/
//串口1發(fā)送回車換行
#define UART1_SendLR() UART1_SendData(0X0D);UART1_SendData(0X0A)
/*LED端口定義*/
sbit LED0 = P1^0;
sbit LED1 = P1^1;
sbit LED2 = P1^2;
sbit LED3 = P1^3;
sbit LED4 = P1^4;
sbit LED5 = P1^5;
sbit LED6 = P1^6;
sbit LED7 = P1^7;
/*KEY端口定義*/
sbit KEY0 = P2^0;
sbit KEY1 = P2^1;
sbit KEY2 = P2^2;
sbit KEY3 = P2^3;
/************* 本地變量聲明 **************/
xdata u8 Uart1_Buf[Buf_Max];
u8 First_Int = 0;
u16 count_20ms;
u8 receive_mode = 0;
u8 find_string_flag = 0;
idata char num_message[4];//暫時假設(shè)最多只能存999條短信
idata char AT_CMGR[15];
/************* 本地函數(shù)聲明 **************/
void delay_ms(u16 ms); //延時ms個20ms ms*20ms
void CLR_Buf(void); //清串口接收緩存
u8 Find(u8 *a); //查找字符串
void UART1_SendData(u8 dat); //串口1發(fā)送 1字節(jié)
void UART1_SendString(char *s);//串口1發(fā)送 字符串
void UART1_Send_Command(char *s); //發(fā)送命令
u8 UART1_Send_AT_Command(u8 *b,u8 *a,u8 wait_time,u16 interval_time);//發(fā)送AT指令集
u8 Wait_CREG(u8 query_times);
void Timer0Init(void) //20毫秒@115200
{
TMOD &= 0xF0;
TMOD |= 0x01; //
TL0 = (65536-20000)%256; //
TH0 = (65536-20000)/256; //
TF0 = 0; //
ET0 = 1; //
TR0 = 1; //開始計時
}
void Uart1Init(void) //9600bps@11.05926MHz
{
PCON &= 0x7F; //
SCON = 0x50; //
TMOD &= 0x0F; //
TMOD |= 0x20; //
TL1 = 0xFD; //
TH1 = 0xFD; //
ET1 = 0; //
TR1 = 1; //
ES = 1; //
}
int check_status(void)//檢查狀態(tài)
{
int ret;
ret = UART1_Send_AT_Command("AT","OK",3,50);//測試通信是否成功
if(ret == 0)
{
return COMMUNITE_ERROR;
}
ret = UART1_Send_AT_Command("AT+CPIN?","READY",2,50);//查詢卡是否插上
if(ret == 0)
{
return NO_SIM_CARD_ERROR;
}
ret = Wait_CREG(3);//查詢卡是否注冊到網(wǎng)絡(luò)
if(ret == 0)
{
return SIM_CARD_NO_REG_ERROR;
}
return 1;
}
/***************************************************************
注:當然你可以返回其他值,來確定到底是哪一步發(fā)送指令出現(xiàn)失敗了。
****************************************************************/
int config_format(void)//配置格式
{
u8 ret;
//設(shè)置存儲位置
ret = UART1_Send_AT_Command("AT+CPMS=\"SM\",\"ME\",\"SM\"","OK",3,100);
if(ret == 0)
{
return AT_CPMS_ERROR;
}
ret = UART1_Send_AT_Command("AT+CMGF=1","OK",3,50);//配置為TEXT模式
if(ret == 0)
{
return AT_CMGF_ERROR;
}
ret = UART1_Send_AT_Command("AT+CSCS=\"GSM\"","OK",3,50);//設(shè)置字符格式
if(ret == 0)
{
return AT_CSCS_ERROR;
}
return 1;
}
int read_message(void)//讀取消息
{
char *buffer_ptr;
u8 i,len;
u8 ret;
memset(num_message,'\0',4);
memset(AT_CMGR,'\0',15);
buffer_ptr = strstr(Uart1_Buf,"\"SM\",");
len = strlen("\"SM\",");
i = len;
if(buffer_ptr != NULL)
{
while(*(buffer_ptr + i) != 0x0D && i < (len+3))
{
num_message[i-len] = *(buffer_ptr + i);
i++;
}
}
else
{
return NO_SMS_LEN_ERROR;
}
memset(AT_CMGR,'\0',15);
strcpy(AT_CMGR,"AT+CMGR=");
strcat(AT_CMGR,num_message);
ret = UART1_Send_AT_Command(AT_CMGR,"OK",3,50);
return ret;
}
/**********************************************/
/*設(shè)計思路:
(0)進行串口、定時器初始化工作。
(1)開機等待22秒,等待模塊準備好。
(2)發(fā)送相應(yīng)的指令。
************************************************/
void main(void)
{
u8 i;
int ret;
Uart1Init(); //串口初始化
Timer0Init();//TIM0初始化
EA = 1; //開啟總中斷
for(i = 0;i < STABLE_TIMES;i++)//等待網(wǎng)絡(luò)穩(wěn)定
{
delay_ms(50);
}
ret = check_status();
if(ret == 1)
{
ret = config_format();//配置
if(ret == 1)
{
LED0 = 0;
}
else
{
LED0 = 1;
}
}
CLR_Buf();
receive_mode = 1;
while (1)
{
delay_ms(50);
LED1 = ~LED1;
if(find_string_flag == 1)
{
delay_ms(5);//延時一點,讓串口把數(shù)據(jù)接收完成
if(Find("+CMTI"))//說明接收到了短信
{
ret = read_message(); //讀取信息
if(ret == 1)
{
if(Find("key1on"))
{
KEY3=1;
CLR_Buf();//清除緩存
find_string_flag = 0;
}
if(Find("key1off"))
{
KEY3=0;
CLR_Buf();//清除緩存
find_string_flag = 0;
}
}
}
}
}
}
/*******************************************************************************
* 函數(shù)名 : Timer0_ISR
* 描述 : 定時器0中斷服務(wù)入口函數(shù),1ms中斷一次
* 輸入 :
* 輸出 :
* 返回 :
* 注意 :
*******************************************************************************/
void Timer0_ISR() interrupt 1
{
TR0=0;//關(guān)定時器
TL0 = (65536-20000)%256; //重設(shè)定時器初值
TH0 = (65536-20000)/256; //
if(count_20ms > 0) //20ms延時計數(shù)器
{
count_20ms--;
}
TR0=1;//開定時器
}
/********************* UART1中斷函數(shù)************************/
void UART1_ISR (void) interrupt 4
{
if (RI)
{
RI = 0; //清除RI位
Uart1_Buf[First_Int] = SBUF; //將接收到的字符串存到緩存中
First_Int++; //緩存指針向后移動
if(First_Int > Buf_Max) //如果緩存滿,將緩存指針指向緩存的首地址
{
First_Int = 0;
}
if(receive_mode == 1)
{
if(First_Int > 6)
{
find_string_flag = 1;
}
}
}
if (TI)
{
TI = 0; //清除TI位
}
}
/*******************************************************************************
* 函數(shù)名 : CLR_Buf
* 描述 : 清除串口2緩存數(shù)據(jù)
* 輸入 :
* 輸出 :
* 返回 :
* 注意 :
*******************************************************************************/
void CLR_Buf(void)
{
u8 k;
for(k=0;k<Buf_Max;k++) //將緩存內(nèi)容清零
{
Uart1_Buf[k] = 0x00;
}
First_Int = 0; //接收字符串的起始存儲位置
}
/*******************************************************************************
* 函數(shù)名 : Find
* 描述 : 判斷緩存中是否含有指定的字符串
* 輸入 :
* 輸出 :
* 返回 : unsigned char:1 找到指定字符,0 未找到指定字符
* 注意 :
*******************************************************************************/
u8 Find(u8 *a)
{
ES = 0; //改進程序
if(strstr(Uart1_Buf,a)!=NULL)
{
ES = 1;
return 1;
}
else
{
ES = 1;
return 0;
}
}
/*******************************************************************************
* 函數(shù)名 : Wait_CREG
* 描述 : 等待模塊注冊成功
* 輸入 :
* 輸出 :
* 返回 :
* 注意 :
*******************************************************************************/
u8 Wait_CREG(u8 query_times)
{
u8 i;
u8 k;
u8 j;
i = 0;
CLR_Buf();
while(i == 0)
{
UART1_Send_Command("AT+CREG?");
delay_ms(100);
for(k=0;k<Buf_Max;k++)
{
if((Uart1_Buf[k] == '+')&&(Uart1_Buf[k+1] == 'C')&&(Uart1_Buf[k+2] == 'R')&&(Uart1_Buf[k+3] == 'E')&&(Uart1_Buf[k+4] == 'G')&&(Uart1_Buf[k+5] == ':'))
{
if((Uart1_Buf[k+7] == '1')&&((Uart1_Buf[k+9] == '1')||(Uart1_Buf[k+9] == '5')))
{
i = 1;
return 1;
}
}
}
j++;
if(j > query_times)
{
return 0;
}
}
return 0;
}
/*----------------------------
UART1 發(fā)送串口數(shù)據(jù)
-----------------------------*/
void UART1_SendData(u8 dat)
{
ES=0; //關(guān)串口中斷
SBUF=dat;
while(TI!=1); //等待發(fā)送成功
TI=0; //清除發(fā)送中斷標志
ES=1; //開串口中斷
}
……………………
…………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼
所有資料51hei提供下載:
5.短信控制led.zip
(75.6 KB, 下載次數(shù): 76)
2019-4-1 10:45 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1