找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 4847|回復(fù): 1
打印 上一主題 下一主題
收起左側(cè)

GPS定位程序 用51單片機+1602實現(xiàn)

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:719206 發(fā)表于 2020-3-31 15:54 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
          大二的時候?qū)W單片機沒事做搞得，現(xiàn)在快工作了，做個 紀(jì)念。。
     用到的器件：
           1、89c52
           2、gps
           3、1602顯示器



單片機源程序如下:
  1. //包含頭文件
  2. #include <REG52.h>
  3. #include "uart.c"

  5. //宏定義
  6. #define LCM_Data  P0                  //將P0口定義為LCM_Data
  7. #define uchar unsigned char
  8. #define uint  unsigned int

  10. //1602的控制腳
  11. sbit lcd1602_rs=P2^5;
  12. sbit lcd1602_rw=P2^6;
  13. sbit lcd1602_en=P2^7;

  15. #define RsBuf_N                800

  17. unsigned char xdata RsBuf[RsBuf_N];        //定義串口接收數(shù)據(jù)緩沖區(qū)
  18. uchar code sousuo[]="GPS Searching...";
  19. uint RsPoint;
  20. bit dis_flag=0;
  21. unsigned long weidunum=0;
  22. unsigned long jingdunum=0;
  23. //==================================================================================================
  24. //=======================================LCD1602====================================================
  25. //==================================================================================================
  26. //----------------延時函數(shù)，后面經(jīng)常調(diào)用----------------------
  27. void delay(uint xms)//延時函數(shù)，有參函數(shù)
  28. {
  29.         uint x,y;
  30.         for(x=xms;x>0;x--)
  31.          for(y=10;y>0;y--);
  32. }

  34. //--------------------------寫指令---------------------------
  35. void write_1602com(uchar com)//****液晶寫入指令函數(shù)****
  36. {
  37.         lcd1602_rs=0;//數(shù)據(jù)/指令選擇置為指令
  38.         lcd1602_rw=0; //讀寫選擇置為寫
  39.         P0=com;//送入數(shù)據(jù)
  40.         delay(1);
  41.         lcd1602_en=1;//拉高使能端，為制造有效的下降沿做準(zhǔn)備
  42.         delay(1);
  43.         lcd1602_en=0;//en由高變低，產(chǎn)生下降沿，液晶執(zhí)行命令
  44. }

  46. //-------------------------寫數(shù)據(jù)-----------------------------
  47. void write_1602dat(uchar dat)//***液晶寫入數(shù)據(jù)函數(shù)****
  48. {
  49.         lcd1602_rs=1;//數(shù)據(jù)/指令選擇置為數(shù)據(jù)
  50.         lcd1602_rw=0; //讀寫選擇置為寫
  51.         P0=dat;//送入數(shù)據(jù)
  52.         delay(1);
  53.         lcd1602_en=1; //en置高電平，為制造下降沿做準(zhǔn)備
  54.         delay(1);
  55.         lcd1602_en=0; //en由高變低，產(chǎn)生下降沿，液晶執(zhí)行命令
  56. }

  58. //-------------------------初始化-------------------------
  59. void lcd_init(void)
  60. {
  61.         uchar i;
  62.         write_1602com(0x38);//設(shè)置液晶工作模式，意思：16*2行顯示，5*7點陣，8位數(shù)據(jù)
  63.         write_1602com(0x0c);//開顯示不顯示光標(biāo)
  64.         write_1602com(0x06);//整屏不移動，光標(biāo)自動右移
  65.         write_1602com(0x01);//清顯示
  66.         delay(1000);
  67.         write_1602com(0x80);
  68.         for(i=0;i<16;i++)
  69.         write_1602dat(sousuo[i]);
  70. }

  72. //  通訊中斷接收程序   中斷函數(shù)無返回值
  73.   void uart_rx(void)  interrupt 4        using 3         
  74. {
  75.          EA=0;
  76.            if((RsPoint<RsBuf_N)&&RI) //必須判斷RI是否為1

  78.     {
  79.             RI=0;
  80.                 if(SBUF=='

  82. )
  83.                 RsPoint=0;
  84.             RsBuf[RsPoint++]=SBUF;
  85.     }
  86.         EA=1;
  87. }
  88. //==============================主函數(shù)===============================
  89. void main(void)
  90. {
  91.          uint i;
  92.         uchar shi;
  93.          lcd_init();
  94.         Uart_init();
  95.         for(i=0;i<RsBuf_N;i++)
  96.         RsBuf[i]='0';
  97.         while(1)
  98.         {
  99.                    if(RsBuf[0]=='

  101. &&RsBuf[1]=='G'&&RsBuf[2]=='P'&&RsBuf[3]=='G'&&RsBuf[4]=='G'&&RsBuf[5]=='A'&&RsBuf[44]!='0')
  102.                    {
  103.                         if(RI==0&&((RsBuf[30]-48)*100+(RsBuf[31]-48)*10+(RsBuf[32]-48))>=0&&((RsBuf[30]-48)*100+(RsBuf[31]-48)*10+(RsBuf[32]-48))<=180)
  104.                         {
  105.                                 TR0=1;
  106.                                 if(dis_flag==0)
  107.                                 {        
  108.                                         write_1602com(0x80);
  109.                                         write_1602dat('T');
  110.                                         write_1602dat('i');
  111.                                         write_1602dat('m');
  112.                                         write_1602dat('e');
  113.                                         write_1602dat(':');
  114.                                         shi=((RsBuf[7]-0x30)*10+(RsBuf[8]-0x30)+8)%24;
  115.                                         write_1602dat(shi/10+0x30);
  116.                                         write_1602dat(shi%10+0x30);
  117.                                         write_1602dat('-');
  118.                                         write_1602dat(RsBuf[9]);
  119.                                         write_1602dat(RsBuf[10]);
  120.                                         write_1602dat('-');
  121.                                         write_1602dat(RsBuf[11]);
  122.                                         write_1602dat(RsBuf[12]);
  123.                                         write_1602dat(' ');
  124.                                         write_1602dat(' ');
  125.                                         write_1602dat(' ');
  126.                
  127.                                         write_1602com(0xc0);
  128.                                         write_1602dat('W');
  129.                                         write_1602dat('X');
  130.                                         write_1602dat(':');
  131.                                         write_1602dat(RsBuf[46]);
  132.                                         write_1602dat(RsBuf[47]);  
  133.                                         write_1602dat(' ');
  134.                                         write_1602dat(' ');

  136.                                         write_1602com(0xc7);
  137.                                         write_1602dat('J');
  138.                                         write_1602dat('D');
  139.                                         write_1602dat(':');
  140.                                         write_1602dat(RsBuf[49]);
  141.                                         write_1602dat(RsBuf[50]);
  142.                                         write_1602dat(RsBuf[51]);
  143.                                         write_1602dat(RsBuf[52]);
  144.                                         write_1602dat(' ');
  145.                                         write_1602dat(' ');
  146.                                 }
  147.                                 else
  148.                                 {
  149.                                         weidunum=        ((RsBuf[17]-48)*10000000+(RsBuf[18]-48)*1000000)
  150.                                                                 +(((((RsBuf[19]-48)*10)+(RsBuf[20]-48))*100000)/6)
  151.                                                                 +(((((RsBuf[22]-48)*1000)+((RsBuf[23]-48)*100)+((RsBuf[24]-48)*10)+(RsBuf[25]-48))*10)/6);         
  152.                                         write_1602com(0x80);
  153.                                         write_1602dat('W');
  154.                                         write_1602dat('D');
  155.                                         write_1602dat(':');
  156.                                         write_1602dat(' ');
  157.                                         write_1602dat(weidunum/10000000+0x30);
  158.                                         write_1602dat(weidunum%10000000/1000000+0x30);
  159.                                         write_1602dat('.');
  160.                                         write_1602dat(weidunum%1000000/100000+0x30);
  161.                                         write_1602dat(weidunum%100000/10000+0x30);
  162.                                         write_1602dat(weidunum%10000/1000+0x30);
  163.                                         write_1602dat(weidunum%1000/100+0x30);
  164.                                         write_1602dat(weidunum%100/10+0x30);
  165.                                         write_1602dat(weidunum%10+0x30);        
  166.                                         write_1602dat(RsBuf[28]);
  167.                                         write_1602dat(' ');
  168.                                         write_1602dat(' ');
  169.                
  170.                
  171.                                         jingdunum=        (((RsBuf[30]-48)*100000000)+((RsBuf[31]-48)*10000000)+((RsBuf[32]-48)*1000000))
  172.                                                                 +(((((RsBuf[33]-48)*10)+(RsBuf[34]-48))*100000)/6)
  173.                                                                 +(((((RsBuf[36]-48)*1000)+((RsBuf[37]-48)*100)+((RsBuf[38]-48)*10)+(RsBuf[39]-48))*10)/6);           
  174.                                         write_1602com(0xc0);
  175.                                         write_1602dat('J');
  176.                                         write_1602dat('D');
  177.                                         write_1602dat(':');
  178.                                         write_1602dat(jingdunum/100000000+0x30);
  179.                                         write_1602dat(jingdunum%100000000/10000000+0x30);
  180.                                         write_1602dat(jingdunum%10000000/1000000+0x30);
  181.                                         write_1602dat('.');
  182.                                         write_1602dat(jingdunum%1000000/100000+0x30);
  183.                                         write_1602dat(jingdunum%100000/10000+0x30);
  184.                                         write_1602dat(jingdunum%10000/1000+0x30);
  185. ……………………

  187. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
882-GPS定位1602顯示.rar (1.66 MB, 下載次數(shù): 109)

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏5 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:261025 發(fā)表于 2021-8-26 17:00 | 只看該作者
為什么緯度和手機導(dǎo)航軟件手機衛(wèi)星地圖軟件不一樣   
手機導(dǎo)航上小數(shù)是078531  這個程序顯示068181
根據(jù)坐標(biāo)在衛(wèi)星地圖上看誤差1000多米
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表