0
  • 聊天消息
  • 系统消息
  • 评论与回复
登录后你可以
  • 下载海量资料
  • 学习在线课程
  • 观看技术视频
  • 写文章/发帖/加入社区
创作中心

完善资料让更多小伙伴认识你,还能领取20积分哦,立即完善>

3天内不再提示

基于单片机的儿童防丢失系统设计

精通单片机与嵌入式 来源:精通单片机与嵌入式 2023-12-04 09:06 次阅读

功能

(1)通过LCD12864显示GPS模块的经纬度数据;

(2)可设定当前的定位位置,自动计算与设定位置的距离,当检测到位置超过设定位置200M时,通过GPRS模块发送报警信息

(3)报警时通过通过蜂鸣器发出警报;

(4)根据位置自动计算定位的距离,当找到儿童时,成人可主动关闭警报器;

(5)可实现“一一键报警”功能,当按下按键时,主动发送当前的位置给设定的手机号;

(6)当找到儿童时,可手动取消报警。

系统框图

fbae1714-9234-11ee-939d-92fbcf53809c.png

原理图

fc991804-9234-11ee-939d-92fbcf53809c.png

程序源代码

#include  "project.h"
unsigned char ucMode = 0;
unsigned char xdata Longitude[13] = "E:";  //保存经度数据
unsigned char xdata Latitude[13] = "N:";//保存纬度数据
bit PosSuc = 0;  //定位成功的标志,为1时表示定位成功,为0表示定位不成功
double fLongitude = 0.0;   //保存浮点型数据,经度
double fLatitude = 0.0;    //保存浮点型数据, 纬度


double fLongitudeLoa = 0.0; //当前所在地的经度
double fLatitudeLoa = 0.0;    //当前所在地的纬度


    double Dis = 0.0;  
#define PI                      3.1415926
#define EARTH_RADIUS            6378.004        //地球近似半径
 
// 求弧度
double radian(double d)
{
    return d * PI / 180.0;   //角度1? = π / 180
}
 
//计算距离
double get_distance(double lat1, double lng1, double lat2, double lng2)
{
    xdata double radLat1 = radian(lat1);
    xdata double radLat2 = radian(lat2);
    xdata double a = radLat1 - radLat2;
    xdata double b = radian(lng1) - radian(lng2);
     
    xdata double dst = 2 * asin((sqrt(pow(sin(a / 2), 2) + cos(radLat1) * cos(radLat2) * pow(sin(b / 2), 2) )));
     
    dst = dst * EARTH_RADIUS;
    //dst= round(dst * 10000) / 10000;
    return dst;
}






/*********************************************************************************************************
** 函数名称:      ProcRxBuf
** 函数描述:      处理GPS接收的数据
** 输入参数:      NONE
** 输出参数:      NONE
** 返回值:        NONE
*********************************************************************************************************/
void ProcRxBuf(void)
{
    if(RxFlag == 1)  //数据接收完毕
    {
        
        EA = 0;
        RxFlag = 0;
        
        if(RxBuf[17] == 'A')
        {      
            ucMode = 1;
            if(PosSuc == 0)   //初次定位成功
            {
                
                fLongitudeLoa = fLongitude; //当前所在地的经度
                fLatitudeLoa = fLatitude;    //当前所在地的纬度
                fLongitudeLoa = fLongitude; //当前所在地的经度
                fLatitudeLoa = fLatitude;    //当前所在地的纬度   
                PosSuc = 1;
            }
            LCD_Location(1,0);
            LCD_Display("  GPS 定位成功  ");
            PosSuc = 1;  //定位成功标志置1
            Latitude[0] = 'N';
            Latitude[1] = ':';
            fLatitude = (double)atof(&RxBuf[21]) / (double)60.0 + (RxBuf[19] - 0x30)*10 + (RxBuf[20]- 0x30);
            Latitude[12] = 0;
            Latitude[2] =  (unsigned long)fLatitude %100 / 10 + 0x30;
            Latitude[3] =  (unsigned long)fLatitude % 10+ 0x30;
            Latitude[4] =  '.';
            Latitude[5] =  (unsigned long)(fLatitude * 10) % 10+ 0x30;
            Latitude[6] =  (unsigned long)(fLatitude * 100) % 10+ 0x30;
            Latitude[7] =  (unsigned long)(fLatitude * 1000) % 10+ 0x30;
            Latitude[8] =  (unsigned long)(fLatitude * 10000) % 10+ 0x30;
            Latitude[9] =  (unsigned long)(fLatitude * 100000) % 10+ 0x30;
            Latitude[10] =  (unsigned long)(fLatitude * 1000000) % 10+ 0x30;
            Latitude[11] =  (unsigned long)(fLatitude * 10000000) % 10+ 0x30;
            Latitude[12] = 0;          


            Longitude[0] = 'E';
            Longitude[1] = ':';   
            fLongitude = (double)atof(&RxBuf[34]) / (double)60.0 + (RxBuf[31] - 0x30)*100 + (RxBuf[32]- 0x30) * 10 + (RxBuf[33]- 0x30);
            Longitude[2] =  (unsigned long)fLongitude / 100 + 0x30;
            Longitude[3] =  (unsigned long)fLongitude %100 / 10 + 0x30;
            Longitude[4] =  (unsigned long)fLongitude % 10+ 0x30;
            Longitude[5] =  '.';
            Longitude[6] =  (unsigned long)(fLongitude * 10) % 10+ 0x30;
            Longitude[7] =  (unsigned long)(fLongitude * 100) % 10+ 0x30;
            Longitude[8] =  (unsigned long)(fLongitude * 1000) % 10+ 0x30;
            Longitude[9] =  (unsigned long)(fLongitude * 10000) % 10+ 0x30;
            Longitude[10] =  (unsigned long)(fLongitude * 100000) % 10+ 0x30;
            Longitude[11] =  (unsigned long)(fLongitude * 1000000) % 10+ 0x30;
            Longitude[12] = 0;    
        }
        else
        {
            PosSuc = 0;   //定位成功标志清零
        }
        
        memset(RxBuf,0,80);
        RxWP = 0;
        EA = 1;
    }
}


bit Key1Up = 1;  //按键松开标志,为1时表示按键已经松开,为0时,表示按键未松开
sbit KEY1 = P3^4;  //按键,按下按键时发送定位信息到手机
sbit KEY2 = P3^5;  //按键,按下按键时存储正确的定位信息


/*********************************************************************************************************
** 函数名称:      SendHelp
** 函数描述:      发送求救信息
** 输入参数:      NONE
** 输出参数:      NONE
** 返回值:        NONE
*********************************************************************************************************/
void SendHelp(double Dis)
{
    unsigned char i = 0;
    xdata unsigned char ucTemp[45] = {0};


    for(i = 0; i < 13;i++)
    {
        ucTemp[i] = Latitude[i];
    }
    for(i = 0; i < 13; i++)
    {
        ucTemp[i+12] = Longitude[i];
    }
    strcat(ucTemp,"distance=");
    ucTemp[33] = ((unsigned long)Dis % 100 /  10 + 0x30);
    ucTemp[34] = ((unsigned long)Dis %10 + 0x30);
    ucTemp[35] = ('.');
    ucTemp[36] = ((unsigned long)(Dis * 10) %  10 + 0x30);
    ucTemp[37] = ((unsigned long)(Dis * 100) %  10 + 0x30);
    ucTemp[38] = ((unsigned long)(Dis * 1000) %  10 + 0x30);
    ucTemp[39] = 'k';
    ucTemp[40] = 'm';
    SendSMS(ucTemp,41);  //发送手机短信 
    DelayMs(1000);
    UART1_ClearRxBuf();
}


/*********************************************************************************************************
** 函数名称:      ProcKey
** 函数描述:      处理按键函数,按键按下时发送定位信息到手机
** 输入参数:      NONE
** 输出参数:      NONE
** 返回值:        NONE
*********************************************************************************************************/
void ProcKey1(void)
{    


    if( (Key1Up == 1) && (KEY1 == 0))  //按键处于松开状态时,按键按下,定位完成才判断按键
    {
        DelayMs(20);   //防抖动延时
        if(KEY1 == 0)
        {       
            Key1Up = 0;            
            if(PosSuc == 1)
            {            
                SendHelp(Dis);
            }
            else if(PosSuc == 0)
            {
                LCD_Location(3,0);
                LCD_Display("请等定位成功    ");
                DelayMs(2000);
                LCD_Location(3,0);
                LCD_Display("                ");
            }
        }
    }    
    else if(KEY1 == 1)
    {
        Key1Up = 1;
    }
}

审核编辑:汤梓红
声明:本文内容及配图由入驻作者撰写或者入驻合作网站授权转载。文章观点仅代表作者本人,不代表电子发烧友网立场。文章及其配图仅供工程师学习之用,如有内容侵权或者其他违规问题,请联系本站处理。 举报投诉
  • 单片机
    +关注

    关注

    6001

    文章

    43973

    浏览量

    620834
  • gps
    gps
    +关注

    关注

    22

    文章

    2748

    浏览量

    164331
  • GPRS
    +关注

    关注

    21

    文章

    980

    浏览量

    128619
  • 程序
    +关注

    关注

    114

    文章

    3631

    浏览量

    79541

原文标题:【011】基于51单片机、GPS、GPRS的儿童防丢失系统(源代码、原理图、参考论文、演示视频等)

文章出处:【微信号:精通单片机与嵌入式,微信公众号:精通单片机与嵌入式】欢迎添加关注!文章转载请注明出处。

收藏 人收藏

    评论

    相关推荐

    基于AT89C51单片机追尾系统

    基于AT89C51单片机追尾系统
    发表于 08-14 11:35

    浅谈Silabs 的Flash 单片机丢失程序的原因及对策

    本帖最后由 eehome 于 2013-1-5 09:49 编辑 浅谈Silabs 的Flash 单片机丢失程序的原因及对策
    发表于 08-16 15:54

    【FireBLE申请】基于BLE的儿童丢器设计

    申请理由:目前正在学习ble,通过学习ble计划制作一个儿童测温器,同时包括计步,丢等功能,同时对应的开发ios app。项目描述:通过蓝牙低功耗进行儿童丢器设计,计划利用一颗20
    发表于 07-08 09:51

    基于单片机的智能小区安系统

    求基于单片机的智能小区安系统 论文及原理图呀 有偿也行
    发表于 04-16 23:01

    基于51单片机的车窗夹控制系统

    有没有前辈做这方面的研究,初学单片机,课程题目就是车窗夹控制系统,感觉有种无处下手的感觉,希望前辈们提点建议
    发表于 04-21 21:32

    单片机数据丢失原因

    STC单片机的EEPROM中存储的数据会丢失,想知道丢失的原理;还有J-LINK固件丢失的原因。
    发表于 02-27 12:38

    请问什么是单片机中的时钟丢失检测?

    MC9S08DZ60这款单片机中有一个复位源是时钟丢失,但是上面并没有详细介绍时钟丢失的内容。希望大家讲解一下时钟丢失
    发表于 09-10 23:54

    单片机的基本构成及工作原理是什么

    有了电子电路和数字电路的基础知识,就可以开始学习嵌入式系统的核心元件-单片机。从本期开始我们将为大家介绍单片机的基础知识。在单片机入门系列讲座中,首先学习
    发表于 07-13 08:32

    如何利用单片机实现智能小区安系统设计

    单片微型计算机作为居民家庭第一监视端,与单片机连接各种用于家庭安保的传感器作为收集信号并送给单片机初步处理,单片机实时与远方主监控计算机通信,将从传感器接受来的信号实时传给主机,主机
    发表于 11-10 06:58

    设计一个基于单片机的车辆碰撞及自动刹车系统

    系统的目的是设计一个基于单片机的车辆碰撞及自动刹车系统系统通过对汽车行进过程中前后车距离的实时检测与过近声光报警功能有效的解决当前汽车
    发表于 11-19 07:18

    如何去实现一种基于单片机的智能安系统设计

    设计简介:本设计是基于单片机的智能安系统,主要实现以下功能:可通过LCD1602安状态和是否有人;可通过按键控制安状态;通过人体红外监
    发表于 02-18 06:44

    如何去实现一种基于单片机酒驾系统设计

    本设计是基于单片机酒驾系统,主要实现以下功能:可通过LCD1602显示车内酒精浓度;可通过按键调整酒精浓度最大值;通过人体红外检测是否有人;通过MQ-3检测酒精浓度。标签:51单片机
    发表于 02-18 07:51

    Silabs的Flash单片机丢失程序原因

    本内容介绍了Silabs的Flash单片机丢失程序原因
    发表于 06-14 15:07 122次下载
    Silabs的Flash<b class='flag-5'>单片机</b><b class='flag-5'>丢失</b>程序原因

    如何使用GPS和GSM进行儿童防走失的单片机定位系统设计

    鉴于传统儿童防走失系统使用的局限性 , 设计一种利用单片机控制 、 GPS 定 位 和 GSM 通 信 等 技术的儿童防走失系统 。 设 计
    发表于 03-25 08:00 27次下载
    如何使用GPS和GSM进行<b class='flag-5'>儿童</b>防走失的<b class='flag-5'>单片机</b>定位<b class='flag-5'>系统</b>设计

    玩嗨OpenHarmony:基于OpenHarmony的丢失儿童寻找系统

    51CTO 开源基础软件社区 #DAYU200体验官# 《 丢失儿童寻找系统 》  1. 项目背景 根据《中国走失人口白皮书(2020)》,在整个2020年期间,我国走失人次达到了100万。其中
    的头像 发表于 11-30 19:45 497次阅读