【单片机】基于有方GPRS的智能电梯控制系统
前一篇文章《时钟及温度的显示》中所介绍的作品，是作为一个单片机新手在暑假学了一个月的单片机之后，做的第一个综合性作品，涵盖了二极管、蜂鸣器、数码管、液晶屏、按键、时钟芯片、温度传感器的控制操作。做完这个之后，也没碰过单片机了。在大三开始的时候，由于和同学参加了一个由有方公司提供GPRS芯片的比赛，便开始重拾单片机，完成了下面这个作品，还获奖了。
基于有方GPRS的智能电梯控制系统，名字感觉很高端，其实就是噱头。其功能描述如下（直接复制当初演示用的PPT）：
构思背景
目前的很多企业都在很高的楼层办公，每天上下班高峰期，电梯门口总是会排上很长的队，为了让电梯用最快的速度将所有的员工送到指定楼层，需要给出一些改进；下班的时候，由于楼层很高，员工往往需要花费一些时间等待电梯到达自己的楼层，利用一些改进可以让员工掌握电梯状态，从而节省一些等电梯的时间。
功能特色
功能一：我们对电梯作出这样的改进：在上班高峰时段，电梯只能向上运行时开门搭载上朝楼上去的人员，即电梯只会响应朝上行的按键,在向下运行的过程中，不会响应任何按钮。在下班时间段，也可以做相应修改。从而节省大多数人的时间，将人快速送达指定地点。
功能二： 平时，由于工作人员多工作于很高的楼层，而此时的电梯可能处于一楼，所以可以先向控制中心发送一条短信来获取电梯的实际位置，如果电梯此时距离自己所在的楼层还有一段距离，就可以提前向控制中心发送一条请求短信，这时控制中心会向电梯应用端发送请求信号，命令电梯开往指定的楼层，从而减少等待的时间。
具体操作
只需要编辑短信XY#到指定的电话号码就可以远程控制电梯的运行。其中X代表发信人所在楼层，Y代表发信人将要到达的楼层。电梯也会对发信人的要求进行应答，告诉电梯当前的运行情况，好让发信人掌握好乘坐电梯的时间。
GPRS的使用
我们主要用到了有方GPRS模块的短信收发功能。主要用于在上下班高峰时帮助员工获得电梯状态信息、向电梯发送停靠指令。命令电梯开往指定的楼层，从而减少等待的时间。电梯应用端使用有方GPRSM660+模块来接收来自控制中心的信号并发送短信作为应答，从而实现用户与电梯的交互通信。
硬件电路图
作品展示
原文：http://blog.csdn.net/tengweitw/article/details/45896479
作者：nineheadedbird
软件实现
#include<REG52.h>
#include<STRING.h>
#define uint unsigned int
#define uchar unsigned char
#define FLOOR 10
int Con_Floor = 1;//当前的楼层号
int com_dat = 0 ;
int flag2 = 0 ;
int low = 1 ;
int high = 9 ;
int sign_flag = 0 ;
void delayms(uint xms); //延时函数（毫秒级）
uint test(uchar * floor); //测试在几楼
uint checkinfo();
uchar ReceiveData(uchar* ,uchar*);
void writefloor(int);
void writestate(int);
void up_down_logic(); //电梯的运行逻辑
void com_init(void); //串口初始化
void send_uart(uchar ch); //向串口发送单个字符
void send_AT_IPR(void); //设置模块的波特率为9600bps
void send_AT_CMGF(void); //设置发短信为文本模式
void send_AT_CSCS(void); //发送TE的字符集为GSM
void send_AT_CNMI(void); //设置短信的提示信息
void send_AT_CMGR(); //发送读取命令
void send_AT_CMGS(uchar *phone_num); //选择发送目的手机号
void send_text(uchar *text); //发送短信文本
void init_GPRS(void); //初始化GPRS模块
sbit dula=P2^6;
sbit wela=P2^7;
sbit rs=P3^5;
sbit lcden=P3^4;
sbit s1=P2^0;
sbit s2=P2^1;
sbit s3=P2^2;
sbit s4=P2^3;
sbit rd=P3^7;
sbit dscs=P1^4;
sbit dsas=P1^5;
sbit dsrw=P1^6;
sbit dsds=P1^7;
sbit dsirq=P3^3;
uchar count,s1num,flag,flag1;
uchar miao,shi,fen;
uchar code table[]=" 2012-10-15 MON";
uchar code table1[]=" 00:00:00";
uchar code floor[]="FLOOR: 1";
uchar code state[]="STATE: IDLE";
uchar code welcome[]="WELCOME TO USE!";
uchar code up[]="UP ";
uchar code down[]="DOWN";
uchar code idle[]="IDLE";
void write_date(uchar);
void write_ds(uchar,uchar);
uchar read_ds(uchar); //从ds187读取时间
void init();
void keyscan();
void write_sfm(uchar add,uchar date);
uchar code *AT_CMGF = "AT+CMGF=1"; //发送AT+CMGF=1,设置文本模式
uchar code *AT_CSCS = "AT+CSCS="; //选择TE的字符集（默认是GSM），M580返回数据时缓冲数组是OK
uchar code *AT_IPR = "AT+IPR=9600"; //设置波特率为9600bps
uchar code *AT_CNMI ="AT+CNMI=2,1,0,0,0" ; //设置收到新短信存于SIM卡中并发CMTI通知
uchar code *AT_CMGR="AT+CMGR="; //发送读取短信的命令
uchar code *AT_CMGS="AT+CMGS=";
uchar xdata buffer[100]={0}; //单片机用于接收短信的缓冲
uchar code tab[]={0xff,0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//流水灯的状态
uchar code message0[] = "Sorry ,it is busy now ";
uchar code message1[] = "Sorry , we can only reach to ";//指明可以到达的终点
uchar code message2[] = "and now we are moving to ";//指明将要到达的楼层
uchar code message3[] = "Ok , we have accepted your request !";//接受请求后发送的消息
/**************************************************************\
*名称：test(char* )
*功能：判断电梯的此刻状态
\**************************************************************/
uint test(uchar * floor)
{
uint i;
for (i = 1 ; i < FLOOR ; i++)//从一楼开始判断
{
if(floor[i])
{
if(i < Con_Floor)
return 1;//表示电梯正在下降
else
return 0;//表示电梯正在上升
}
}
return 2;//表示此时电梯为空
}
/**************************************************************\
*名称：up_down_logic()
*功能:电梯的升降逻辑
\**************************************************************/
void up_down_logic()
{
uchar floor_data [FLOOR]={0};//判断执行方向
uchar buf[FLOOR]={0};
uchar tel[13] ;
uchar temp;
uint i=0;
uchar temp1 ;
while(1)
{
miao=read_ds(0); //没有响应时，时间可以正确的运行，但是一旦有请求，时间便会出现跳跃情况
fen=read_ds(2);
shi=read_ds(4);
write_sfm(10,miao);
write_sfm(7,fen);
write_sfm(4,shi);
delayms(100);
while(checkinfo())
{
/* i = 0;
while(tel[i])
{
tel[i] = 0 ;
i++;
}*/
temp=ReceiveData(&temp1,tel);//temp 表示起点,temp1表示终点
EA=0;//关中断
//以下是将缓冲区清空
i=0;
while(buffer[i])
{
buffer[i]=0;
i++;
}
com_dat=0;
if (test(floor_data)==1&&temp-'0'>=1&&Con_Floor>=1)//在下降
{
if(temp -'0' < Con_Floor&&!floor_data[temp-'0'])//8点之前为上楼的高峰，所以下楼的请求（在7点半以前）不予响应,电梯直接到达一楼
{
if(temp1-'0' < temp - '0' && temp1 - '0' >= low&&(read_ds(4)>8))//希望到楼下去,即temp1 < temp的且此时电梯所能到的最低点比temp1还小
{
floor_data[temp-'0']=1;
buf[temp-'0'] = temp1-'0';
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (temp1 - '0' < temp - '0' && temp1 - '0' < low &&(read_ds(4)>8))//希望到楼下去,即temp1 < temp的且此时电梯所能到的最低点比temp1大
{
if (buf[low] < low)//如果在电梯所能到的最低点处就没有请求了或有向下的请求
{
floor_data[temp-'0']=1;
buf[temp-'0'] = temp1-'0';
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message1);
send_uart(low+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
}
else if(temp1 - '0' < temp - '0' && temp1 - '0' < low &&(read_ds(4)<8))
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message0);
send_uart(low+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (temp1 - '0' > temp - '0'&& temp - '0' < low)//如果希望到楼上去,则仅当到最低点处没有请求或请求到达的地方小于temp后才可以
{
if ((buf[low] == 0||(buf[low] > temp - '0' && buf[low] < low))&&(read_ds(4)<5))//确保电梯到low层后无请求或有向下的但大于temp的请求
{
floor_data[temp - '0'] = 1 ;
buf[temp - '0'] = temp1 - '0' ;
high = temp1 - '0' ;//在电梯向上运行时所能到达的最高点
low = temp - '0' ;
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if(buf[low] > low &&(read_ds(4)<5))
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message1);
send_uart(low+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if(buf[low] < temp - '0' &&(read_ds(4)<5))
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message1);
send_uart(buf[low]+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else//不响应会执行下面的语句
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message0);
send_uart(buf[low]+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
}
}
}
else if (!test(floor_data)&&temp-'0'>=1&&Con_Floor>=1)//在上升
{
if(temp-'0' > Con_Floor&&!floor_data[temp-'0'])
{
if(temp1-'0' > temp - '0' && temp1 - '0' <= high &&(read_ds(4)<5))//请求者希望到楼上去,且此时电梯所能到达的最高点比请求temp1还大
{
floor_data[temp-'0']=1;
buf[temp-'0'] = temp1-'0';
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (temp1 - '0' > temp - '0' && temp1 - '0' > high &&(read_ds(4)<5))//请求者希望到楼上去,且此时请求的目的地已经超过了电梯所能到达的最高点
{
if (buf[high] > high || buf[high] == 0)//如果电梯到了最高点处还有向上的请求或者到了最高点处就没有请求了
{
floor_data[temp-'0']=1;
buf[temp-'0'] = temp1-'0';
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (buf[high] < high)
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message1);
send_uart(high+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
}
else if(temp1 - '0' > temp - '0' && temp1 - '0' > high &&(read_ds(4)>5))//不响应时执行
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message0);
send_uart(buf[low]+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (temp1 - '0' < temp - '0' && temp - '0' > high )//请求者希望到楼下去
{
if ((buf[high] == 0||(buf[high] < temp - '0'&&buf[high] > high))&&(read_ds(4)>8))//要确保电梯到达high层后没有请求或有向上的小于temp的请求
{
floor_data[temp - '0'] = 1 ;
buf[temp-'0'] = temp1 - '0';
low = temp1 - '0';
high = temp - '0';
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (buf[high] < high &&(read_ds(4)>8))
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message1);
send_uart(high+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if (buf[high] > temp - '0'&&(read_ds(4)>8))
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message1);
send_uart(buf[high]+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message0);
send_uart(low+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
}
}
}
else if (test(floor_data)==2&&temp-'0'!=Con_Floor&&temp-'0'>=1&&Con_Floor>=1)//电梯未被请求,则响应,但是请求的楼层数就是本层楼则不予响应
{
if (temp - '0' > temp1 - '0'&&(read_ds(4)>8))
{
low = temp1 - '0';
buf[temp - '0'] = temp1 - '0';
floor_data[temp-'0']=1;
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message3);
send_text(message2);
if(temp-'0'>Con_Floor)
send_uart(Con_Floor+1+'0');
else
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if(temp - '0' > temp1 - '0'&&(read_ds(4)<8))
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message0);
send_uart(low+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if(temp - '0' < temp1 - '0'&&(read_ds(4)<5))
{
high = temp1 - '0';
buf[temp - '0'] = temp1 - '0' ;
send_AT_CMGS(tel);//先发号码
floor_data[temp-'0']=1;
delayms(500);
send_text(message3);
send_text(message2);
if(temp-'0' > Con_Floor)
send_uart(Con_Floor+1+'0');
else
send_uart(Con_Floor-1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
else if(temp - '0' < temp1 - '0'&&(read_ds(4)>5))//不响应时执行
{
send_AT_CMGS(tel);//先发号码
delayms(500);
send_text(message0);
send_uart(buf[low]+'0');
delayms(10);
send_text(message2);
send_uart(Con_Floor+1+'0');
delayms(10);
send_uart(0x1a);
delayms(10);
}
}
}
if(test(floor_data)==1)//下降
{
writefloor(Con_Floor);
writestate(1);
delayms(3000);
Con_Floor--;
}
else if(!test(floor_data))//上升
{
writefloor(Con_Floor);
writestate(0);
delayms(3000);
Con_Floor++;
}
else if (test(floor_data) == 2)//处于空闲状态
{
writefloor(Con_Floor);
writestate(2);
high = 9;
low = 1 ;
}
if(floor_data[Con_Floor])//如果之前被请求过，则响应
{
P1=tab[Con_Floor];
delayms(3000);
if (buf[Con_Floor]!=0)
{
floor_data[buf[Con_Floor]] = 1 ;
buf[Con_Floor] = 0;
}
P1=0xff;
floor_data[Con_Floor] = 0 ;
}
EA = 1 ;//开中断
}
}
void delay(uint z)
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void write_com(uchar com)
{
rs=0;
lcden=0;
P0=com;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void write_date(uchar date)
{
rs=1;
lcden=0;
P0=date;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void init()
{
uchar num;
EA=1;
EX0=1;
IT0=1;
dula=0;
wela=0;
lcden=0;
write_ds(0x0B,0x26);
read_ds(0x0c);
write_com(0x38);
write_com(0x0c);
write_com(0x06);
write_com(0x01);
write_com(0x80);
//
for(num=0;num<15;num++)
{
write_date(table[num]);
delay(5);
}
write_com(0x80+0x40);
for(num=0;num<12;num++)
{
write_date(table1[num]);
delay(5);
}
//
miao=read_ds(0);
fen=read_ds(2);
shi=read_ds(4);
write_sfm(10,miao);
write_sfm(7,fen);
write_sfm(4,shi);
delayms(5000);
write_com(0x80);
write_com(0x01);
//
for(num=0;num<15;num++)
{
write_date(welcome[num]);
delay(20);
}
delay(3000);
write_com(0x01);
write_com(0x80+0x10);
for(num=0;num<8;num++)
{
write_date(floor[num]);
delay(20);
}
write_com(0x80+0x50);
for(num=0;num<11;num++)
{
write_date(state[num]);
delay(20);
}
for(num=0;num<16;num++)
{
write_com(0x18);
delay(50);
}
}
void writefloor(int i)
{
write_com(0x80+0x17);
write_date(0x30+i);
}
void writestate(int flaggg)
{
uint i ;
write_com(0x80+0x57);
if(flaggg==1)
{
for(i=0;i<strlen(down);i++)
{
write_date(down[i]);
}
}
if(flaggg==2)
{
for(i=0;i<strlen(idle);i++)
{
write_date(idle[i]);
}
}
if(flaggg==0)
{
for(i=0;i<strlen(up);i++)
{
write_date(up[i]);
}
}
}
void write_sfm(uchar add,uchar date)
{
uchar shi,ge;
shi=date/10;
ge=date%10;
write_com(0x80+0x40+add);
write_date(0x30+shi);
write_date(0x30+ge);
}
void keyscan()
{
rd=0;
if(flag1==1)
{
if(s2==0)
{
delay(5);
if(s2==0)
{
while(!s2);
flag1=0;
}
}
if(s3==0)
{
delay(5);
if(s3==0)
{
while(!s3);
flag1=0;
}
}
}
if(s4==0)
{
delay(5);
if(s4==0)
{
flag1=0;
miao=read_ds(0);
fen=read_ds(2);
shi=read_ds(4);
write_sfm(10,miao);
write_sfm(7,fen);
write_sfm(4,shi);
}
}
if(s1==0)
{
delay(5);
if(s1==0)
{ s1num++;
flag=1;
flag1=0;
while(!s1);
if(s1num==1)
{
TR0=0;
write_com(0x80+0x40+10);
write_com(0x0f);
}
}
if(s1num==2)
{
write_com(0x80+0x40+7);
}
if(s1num==3)
{
write_com(0x80+0x40+4);
}
if(s1num==4)
{
s1num=0;
write_com(0x0c);
flag=0;
write_ds(0,miao);
write_ds(2,fen);
write_ds(4,shi);
}
}
if(s1num!=0)
{
if(s2==0)
{
delay(1);
if(s2==0)
{
while(!s2);
if(s1num==1)
{
miao++;
if(miao==60)
miao=0;
write_sfm(10,miao);
write_com(0x80+0x40+10);
}
if(s1num==2)
{
fen++;
if(fen==60)
fen=0;
write_sfm(7,fen);
write_com(0x80+0x40+7);
}
if(s1num==3)
{
shi++;
if(shi==24)
shi=0;
write_sfm(4,shi);
write_com(0x80+0x40+4);
}
}
}
if(s3==0)
{
delay(1);
if(s3==0)
{
while(!s3);
if(s1num==1)
{
miao--;
if(miao==-1)
miao=59;
write_sfm(10,miao);
write_com(0x80+0x40+10);
}
if(s1num==2)
{
fen--;
if(fen==-1)
fen=59;
write_sfm(7,fen);
write_com(0x80+0x40+7);
}
if(s1num==3)
{
shi--;
if(shi==-1)
shi=23;
write_sfm(4,shi);
write_com(0x80+0x40+4);
}
}
}
}
}
void write_ds(uchar add,uchar date)
{
dscs=0;
dsas=1;
dsds=1;
dsrw=1;
P0=add;
dsas=0;
dsrw=0;
P0=date;
dsrw=1;
dsas=1;
dscs=1;
}
uchar read_ds(uchar add)
{
uchar ds_date;
dsas=1;
dsds=1;
dsrw=1;
dscs=0;
P0=add;
dsas=0;
dsds=0;
P0=0xff;
ds_date=P0;
dsds=1;
dsas=1;
dscs=1;
return ds_date;
}
//
/**************************************************************\
* 名称: send_uart(unsigned char ch)
* 功能: 向串口发送一个字符
* 输入: 无
* 输出: 无
\**************************************************************/
void send_uart(uchar ch)
{
SBUF = ch;
while(0 == TI);//当TI为1时跳出死循环(表明数据已从串口发出)，并进入中断处理程序，不过在中断处理程序中并不会对TI进行任何操作,转而执行下面的清0语句
TI = 0;
}/* end function send_uart */
/**************************************************************\
* 名称: send_AT_CMGS
* 功能: 发送AT+CMGS=***********，选择目的手机号
* 输入: 无
* 输出: 无
\**************************************************************/
void send_AT_CMGS(uchar *phone_num)
{
uint i ;
for(i = 0; i < strlen(AT_CMGS); i++)
{
send_uart(AT_CMGS[i]);
delayms(10);
}
delayms(10);
send_uart(0X22); //双引号
delayms(10);
for(i = 0; i < strlen(phone_num)-1; i++)
{
send_uart(phone_num[i]);
delayms(10);
}
delayms(10);
send_uart(0X22);
delayms(10);
send_uart('\r'); //发送回车符号
delayms(10);
send_uart('\n'); //发送换行符号
delayms(100);
}/* end function send_AT_CMGS */
/**************************************************************\
* 名称: send_text
* 功能: 发送短信内容
* 输入: 无
* 输出: 无
\**************************************************************/
void send_text(uchar *text)
{
uint i ;
for(i = 0; i < strlen(text); i++)
{
send_uart(text[i]);
delayms(10);
}
delayms(10);
}/* end function send_text */
/**************************************************************\
* 名称: send_AT_IPR
* 功能: 设置模块波特率为9600bps
* 输入: 无
* 输出: 无
***************************************************************/
void send_AT_IPR(void)//设置波特率9600
{
uint i;
for(i = 0; i < strlen(AT_IPR); i++)
{
send_uart(AT_IPR[i]);
delayms(10);
}
delayms(10);
send_uart('\r'); //发送回车符号
delayms(10);
send_uart('\n');
delayms(200);
}/* end function send_AT_IPR */
/*************************************************************\
*名称：send_AT_CNMI()
*功能：发送CNMI
\*************************************************************/
void send_AT_CNMI(void)//设置短信提示方式
{
uint i;
for (i = 0; i < strlen(AT_CNMI) ; i++)
{
send_uart(AT_CNMI[i]);
delayms(10);
}
delayms(10);
send_uart('\r');
delayms(10);
send_uart('\n');
delayms(200);
}
/*************************************************************\
*功能：发送读命令
\*************************************************************/
void send_AT_CMGR()
{
uint i;
for (i = 0 ; i < strlen(AT_CMGR) ; i++)
{
send_uart(AT_CMGR[i]);
delayms(10);
}
delayms(10);
}
/**************************************************************\
* 名称: send_AT_CMGF
* 功能: 短信AT指令，发送AT+CMGF=1，设置文本模式
* 输入: 无
* 输出: 无
***************************************************************/
void send_AT_CMGF(void)//设置短信的读模式
{
uint i ;
for(i = 0; i < strlen(AT_CMGF); i++)
{
send_uart(AT_CMGF[i]);
delayms(10);
}
delayms(10);
send_uart('\r'); //发送回车符号
delayms(10);
send_uart('\n');
delayms(200);
}/* end function send_AT_CMGF */
/**************************************************************\
* 名称: send_AT_CSCS
* 功能: 发送AT+CSCS="GSM"，选择TE的字符集
* 输入: 无
* 输出: 无
\**************************************************************/
void send_AT_CSCS(void)//设置字符集为"GSM"
{
uint i ;
for(i = 0;i < strlen(AT_CSCS); i++)
{
send_uart(AT_CSCS[i]);
delayms(10);
}
delayms(10);
send_uart(0X22); //双引号
delayms(10);
send_uart('G');
delayms(10);
send_uart('S');
delayms(10);
send_uart('M');
delayms(10);
send_uart(0X22);
delayms(10);
send_uart('\r'); //发送回车符号
delayms(10);
send_uart('\n');
delayms(200);
}/* end function send_AT_CSCS */
/**************************************************************\
* 函数名及功能：delayms —— 延时函数（毫秒级),晶振频率为11.0592MHz
* 入口参数： 欲延时毫秒数，必须为正整数
* 出口参数： 无
* 备注： 此函数需要根据晶振频率修改j的初值
\**************************************************************/
void delayms(uint xms)
{
uint i,j;
for(i=xms;i>0;i--)
for(j=113;j>0;j--);
}/* end function delayms */
/**************************************************************\
* 名称: com_int()
* 功能: 串口中断子函数
* 输入: 无
* 输出: 无
\**************************************************************/
void com_int(void) interrupt 4
{
EA=0; //关总中断
if(1 == RI) //当硬件接收到一个数据时，RI会置高位
{
buffer[com_dat] = SBUF; //存取串口接收的数据
RI = 0; //软件置RI为0
if(buffer[com_dat]=='#')
{
flag2 = 1; //接收短信内容结束
com_dat++;//#号不一定是最后一个字符！！！
}
else
{
com_dat++;
}
}
EA = 1; //开总中断
}/* end function com_int */
/**************************************************************\
* 名称: com_init()
* 功能: 串口初始化，晶振11.0592MHz,波特率9600bps
* 输入: 无
* 输出: 无
\**************************************************************/
void com_init(void)
{
TMOD=0X20;
TH1=253;
TL1=253;
TR1=1;
EA=1;
ES=1;
SM0=0;
SM1=1;
REN=1;
}
/************************************************************\
*名称：checkinfo()
*功能：检查是否有数据到达
\************************************************************/
uint checkinfo()
{
uint i=0;
if(buffer[0]!=0&&flag2==0)//短信到达的提示命令已经被单片机接收
{
while(buffer[i])
{
if(buffer[i]==',')
return 1 ;//有短信到达
i++;
}
}
return 0;//数据暂时不能接收
}
/************************************************************\
*名称：ReceiveData()
*功能：接收数据并返回
\************************************************************/
uchar ReceiveData(uchar *buf , uchar *buf2)
{
//这是为了发送接收数据的命令
uint i=0;
uint j ;
send_AT_CMGR();
delayms(10);
while(buffer[i] != ',')//检查时顺便将buffer[i]清0
{
buffer[i] = 0 ;
i++ ;
}
buffer[i] = 0 ;//将，清0
i++;
buffer[i++]=0;//将空格清0
while(buffer[i])
{
if(buffer[i]>='0'&&buffer[i]<='9')
{
send_uart(buffer[i]);
buffer[i]=0;//发完数据后将该位清0
delayms(10);
}
else
break;//数据接收完后跳出
i++;
}
delayms(10);
send_uart('\r');
delayms(10);
send_uart('\n');
delayms(100);
com_dat = 0 ;//为下次接收数据做准备
//这是为了检测需要的数据
delayms(3000);
i = 0 ;
j = 0 ;
while(1)
{
if(buffer[0]!=0&&flag2==1)
{
flag2=0;
while(buffer[i]!='#')
{
if (buffer[i] == '\"')
{
sign_flag++;
}
if (sign_flag == 3)
{
buf2[j++]=buffer[i+1];//接收电话号码
}
i++;
}
sign_flag = 0;
*buf = buffer[i-1];//目的地点
return buffer[i-2];//模拟的楼层数不超过10楼,所以可只返回一个字符，起点
}
}
}
/**************************************************************\
*名称：init_GPRS()
*功能：初始化GPRS模块
\**************************************************************/
void init_GPRS()
{
uint i = 0 ;
delayms(1000);
send_AT_IPR();//设置波特率
delayms(15000);
send_AT_CMGF();//设置短信格式
delayms(1000);
send_AT_CSCS();//设置字符集
delayms(1000);
send_AT_CNMI();//设置短信提示方式
delayms(3000);
while(buffer[i])//将初始化时接收到的数据清0
{
buffer[i] = 0 ;
i++ ;
}
com_dat = 0 ;//为下一次接收做准备
}
void main()
{
init();//初始化时钟芯片,液晶显示屏
//
delayms(20000);//避开开机时的无用数据
com_init();//串口初始化
delayms(1500);
init_GPRS();//给gprs设置必要的参数
while(1)
{
keyscan();//只是在时间不准确时会被按下，其它时间，不予理会
if(flag==0)//表示没有键盘按下
{
up_down_logic();
}
}
}
void exter() interrupt 0
{
uchar c;
flag1=1;
c=read_ds(0x0c);
}
【单片机】基于有方GPRS的智能电梯控制系统的更多相关文章
- STM32F0单片机基于Hal库温控智能风扇
一.项目概述 设计采用STM32F0系列单片机做主控芯片,通过DHT11采集温湿度,将温度显示在OLED 屏幕上.根据温度的不同,利用STM32对风扇进行调速,总体硬件设计如下图所示 1.效果展示 2 ...
- GSM/GPRS模块 AT指令集C语言编程——基于有方M660+和MSP430单片机
GSM/GPRS芯片是手机中负责收发短信.拨打电话以及访问GPRS网络的核心器件.有方M660+为深圳有方公司生产的一款超小封装的GSM/GPRS工业无线模块,可以提供高品质的语音.短信.数据业务等功 ...
- 基于ZigBee和STM32的智能家居控制系统的设计与实现(三)
基于ZigBee和STM32的智能家居控制系统的设计与实现(三) 自从前两篇博客介绍了智能家居系统的基本实现机理后,收到了好多朋友的来信,和我讨论了好多的这方面的知识,在此很高兴,虽然自己做的这个所谓 ...
- 毕业设计——基于ZigBee的智能窗户控制系统的设计与实现
题目:基于物联网的智能窗户控制系统的设计与实现 应用场景:突降大雨,家里没有关窗而进水:家中燃气泄漏,不能及时通风,威胁人身安全,存在火灾的隐患:家中窗户没关,让坏人有机可乘.长时间呆在人多.封闭的空 ...
- 基于能量收集的智能家居-2013国家级大学生创业实践项目申报_商业计划书_V0.2
SmartHome项目商业计划 基于能量收集的 免电池无线智能家居系统 IA-SmartHome团队 2012.12 l 基于无线的智能家居解决方案,节省施工成本: l 基于能 ...
- 基于Qt的wifi智能小车的制作(一)
基于Qt的wifi智能小车的制作(一) 好久不写博客了,真的是有点惭愧了.翻开上一次的博客,到现在已经2个多月了,只能说是自己太懒惰了!忙是另一回事!趁今天晚上有点时间回顾下这一段时间的收获以及做的 ...
- 基于Laravel+Swoole开发智能家居后端
基于Laravel+Swoole开发智能家居后端 在上一篇<Laravel如何优雅的使用Swoole>中我已经大概谈到了Laravel结合Swoole的用法. 今天,我参与的智能家居项目基 ...
- 陕西中际现代:基于自适应算法的PLC滴灌控制系统
基于自适应算法的PLC滴灌控制系统 陕西中际现代包装科技有限公司滴灌部 1.介绍 水资源正在成为一种珍贵的资源.城镇的市民使用成千上万立方的水来浇灌花园和绿地.他们依赖于使用固定灌溉计划的控制器.而这 ...
- 基于 HTML5 Canvas 的智能安防 SCADA 巡逻模块
基于 HTML5 Canvas 的智能安防 SCADA 巡逻模块 前言 最近学习了 HT for Web flow 插件,除了正常的 flow 效果,其中还有两个十分好用的两个接口 getPercen ...
随机推荐
- chrome官方完整安装包
But did you know Google allows you to download the full standalone installer of Chrome from its offi ...
- Android Multimedia框架总结（二十一）MediaCodec中创建到start过程(到jni部分)
转载请把头部出处链接和尾部二维码一起转载,本文出自逆流的鱼yuiop:http://blog.csdn.net/hejjunlin/article/details/53386117 我最近正在参加CS ...
- Hadoop 伪分布式安装、运行测试例子
1. 配置linux系统环境 centos 6.4 下载地址:http://pan.baidu.com/s/1geoSWuv[VMWare专用CentOS.rar](安装打包好的VM压缩包) 并配置虚 ...
- WmS简介(三)之Activity窗口是如何创建的?基于Android7.0源码
OK,在前面两篇博客中我们分别介绍了WmS中的token,同时也向小伙伴们区分了Window和窗口的区别,并且按照type值的不同将Android系统中的窗口分为了三大类,那么本篇博客我们就来看看应用 ...
- cassandra eclipse 环境构建
摘要 本文主要介绍如何在eclipse中搭建cassandra环境 更多cassandra,nosql 相关知识请访问http://www.webpersonaldeveloper.cn 正文 1.f ...
- Struts 1 之<logic>标签库
1. logic:empty logic:empty标签是用来判断是否为空的.如果为空,该标签体中嵌入的内容就会被处理.该标签用于以下情况: 当Java对象为null时 当String对象为" ...
- ORACLE数据库学习之逻辑结构
逻辑结构 数据库逻辑结构包含表空间.段.范围(extent).数据块和模式对象. (一)表空间 一个数据库划分为一个或多个逻辑单位,该逻辑单位称为表空间类似于sybase下的设备.(TABLES ...
- Java中Excel导入功能实现、excel导入公共方法_POI -
这是一个思路希望能帮助到大家:如果大家有更好的解决方法希望分享出来 公司导入是这样做的 每个到导入的地方 @Override public List<DataImportMessage> ...
- javascript中的XML
IE下创建DOM并载入XML var xmldoc = new ActiveXObject("Microsoft.XMLDOM"); xmldoc.load(url); //载入X ...
- Android必知必会-Fragment监听返回键事件
如果移动端访问不佳,请尝试 Github版<–点击左侧 背景 项目要求用户注册成功后进入修改个人资料的页面,且不允许返回到上一个页面,资料修改完成后结束当前页面,进入APP主页. 由于是使用多个 ...